|
%I #16 Sep 08 2023 07:06:52
%S 14,14,21,35,623,7,30950488016,88724209,6980785,69671,875,
%T 37694807317667973799073247846210703885038753432,7,641572735013,84,
%U 623,0,91,229702492483605585073,7,21,264412149709993583141322266592,7,50559275579995,0,50115278206,0,571470109
%N Integers divisible by 7 which are sequentially obtained from the decimal expansion of sqrt(2) = 1.4142135...
%e a(3)=21 because it is the first integer divisible by 7 which is obtained from the beginning of the unused part of the decimal expansion of square root 2.
%o (PARI)
%o SeqDigits(v,pred)={my(L=List(), k=1); for(i=1, #v, my(t=fromdigits(v[k..i])); if(pred(t), listput(L,t); k=i+1)); Vec(L)}
%o { localprec(400); SeqDigits(digits(floor(sqrt(2)*10^250)), t->t%7==0) } \\ _Andrew Howroyd_, Nov 06 2019
%Y Cf. A002193, A099205.
%K nonn,base,less
%O 1,1
%A Serhat Sevki Dincer (mesti_mudam(AT)yahoo.com), Oct 04 2004
%E Terms a(9) and beyond from _Andrew Howroyd_, Nov 06 2019
|
