|
%I #12 Jan 15 2022 15:30:52
%S 12,19,30,34,44,50,59,62,71,77,80,84,87,95,98,103,107,111,114,119,128,
%T 130,141,147,149,157,160,165,168,176,182,184,189,192,196,199,204,206,
%U 218,220,227,233,237,240,245,247,252,261,263,270,275,280,283
%N Positions of multiples of 10 in A204890 (differences of primes).
%C For a guide to related sequences, see A205558.
%H Harvey P. Dale, <a href="/A205718/b205718.txt">Table of n, a(n) for n = 1..1000</a>
%e In A204890=(1,3,2,5,4,2,9,8,6,4,11,10,8,...), multiples of 10 are in positions 12,19,30,... See the example at A205720.
%t (See the program at A205720.)
%t Position[With[{prs=Prime[Range[30]]},Flatten[Table[prs[[n]]-Take[prs,n-1],{n,2,Length[prs]}]]],_?(Divisible[#,10]&)]//Flatten (* _Harvey P. Dale_, Jan 15 2022 *)
%Y Cf. A204890, A205720, A205558.
%K nonn
%O 1,1
%A _Clark Kimberling_, Jan 31 2012
|
