|
%I #14 Apr 25 2020 18:16:07
%S 3,7,6,12,20,15,23,24,26,34,39,46,48,52,50,55,62,69,71,77,75,85,87,92,
%T 100,109,106,109,116,122,132,131,139,147,157,155,158,172,174,174,185,
%U 190,194,202,206,202,218,228,228,229,238,247,243,251,266,270,273,280
%N Sum of prime(n) and n-th digit of Pi after the decimal point.
%C In some cases n resembles the prime number in the subsequent prime row. Some slight intervals can be observed: for example 599(593+6) to 641(641+0) to 691(683+8) to 743(743+0) to 809(811+2), each 8 rows apart and 3 instances 10 rows apart.
%H Alois P. Heinz, <a href="/A109635/b109635.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) ~ n log n.
%e The first column gives the primes, the second column the digits of Pi and the third column their sum.
%e 2 1 3
%e 3 4 7
%e 5 1 6
%e 7 5 12
%e ...
%t Total/@With[{nn=60},Thread[{Prime[Range[nn]],Rest[RealDigits[Pi,10,nn+1][[1]]]}]] (* _Harvey P. Dale_, Apr 25 2020 *)
%K nonn,base,less
%O 1,1
%A _E.J.P. Vening_, Aug 03 2005
|
