Search: id:A105093 Results 1-1 of 1 results found. %I A105093 %S A105093 18,24,30,36,60,84,120,162,204,210,216,240,288,330,372,390,456,520,540, %T A105093 624,726,762,798,840,852,882,924,978,990,1104,1140,1164,1200,1392,1410, %U A105093 1428,1530,1632,1650,1716,1740,1764,1794,1848,1974,2052,2100,2112,2184 %N A105093 Numbers n such that n = prime(k) + prime(k+3) = prime(k+1) + prime(k+2) for some k. %H A105093 Eric Weisstein's World of Mathematics, Goldbach Conjecture %e A105093 a(1)=18 because prime(3)+prime(6)=prime(4)+prime(5)=5+13=7+11=18. %t A105093 lst = {}; Do[ If[ Prime[n] + Prime[n + 3] == Prime[n + 1] + Prime[n + 2], AppendTo[lst, Prime[n] + Prime[n + 3]]], {n, 184}]; lst (from Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 07 2005) %Y A105093 Cf. A001172, A000954, first primes in A022885. %Y A105093 Sequence in context: A076770 A105679 A076771 this_sequence A162331 A092536 A125261 %Y A105093 Adjacent sequences: A105090 A105091 A105092 this_sequence A105094 A105095 A105096 %K A105093 nonn %O A105093 1,1 %A A105093 Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Apr 06 2005 %E A105093 Edited and extended from Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 07 2005 Search completed in 0.001 seconds