Search: id:A082508 Results 1-1 of 1 results found. %I A082508 %S A082508 1,2,2,4,2,4,2,4,2,4,2,4,2,4,2,4,8,4,2,4,2,4,4,2,2,4,2,2,4,2,4,2,4,2,2, %T A082508 4,2,4,2,4,2,4,8,4,8,4,8,2,2,4,8,4,2,4,8,4,8,4,2,2,2,4,2,2,4,2,4,8,8,8, %U A082508 4,8,4,8,4,2,2,4,2,4,2,4,4,2,4,4,8,8,4,4,8,4,2,2,2,2,4,2,4,8,2,8,8,4,2 %N A082508 Differences between consecutive primes that are powers of 2 in order of their appearance. Differences not powers of 2 are deleted from A001223. %t A082508 Do[s=Log[2, Prime[n+1]-Prime[n]]; If[IntegerQ[s], Print[Prime[n+1]]], {n, 1, 1000}] %Y A082508 Cf. A001223. %Y A082508 Sequence in context: A045841 A040003 A106469 this_sequence A163824 A075526 A001223 %Y A082508 Adjacent sequences: A082505 A082506 A082507 this_sequence A082509 A082510 A082511 %K A082508 nonn %O A082508 1,2 %A A082508 Labos E. (labos(AT)ana.sote.hu), Apr 28 2003 Search completed in 0.002 seconds