login
Primes in A191746.
2

%I #5 May 26 2021 02:44:40

%S 193,53069,58422233,1348470667,2847740783,3237916229,5029745827,

%T 7643871979,15107731019,17902513283,21052092827,22187962591,

%U 28412311451,59363922119,81459096899,85780812149,102742076659,123894775231,137692362377,143889901511,170038274723,174648621811

%N Primes in A191746.

%e a(1)=193=A191746(3) is the first prime in A191746 and a(2)=53069=A191746(11) is the second.

%t (* function a037074[ ] and support functions are defined in A074040 *)

%t a191746[n_] := Rest[FoldList[Plus, 0, a037074[n]]]

%t a344147x[n_] := Select[a191746[n], PrimeQ]

%t a344147[550]

%Y Cf. A037074, A074040, A077800, A079164, A191746.

%K nonn

%O 1,1

%A _Hartmut F. W. Hoft_, May 10 2021