STATUS
editing
approved
editing
approved
Harvey P. Dale, <a href="/A129077/b129077_1.txt">Table of n, a(n) for n = 1..1000</a>
approved
editing
editing
approved
Primes in the partial sums of all primes, starting with 11, that have 1 as their final digit. - Harvey P. Dale, Nov 15 2024
Select[Accumulate[Select[Prime[Range[2000]], Mod[#, 10]==1&]], PrimeQ] (* Harvey P. Dale, Nov 15 2024 *)
approved
editing
editing
approved
Harvey P. Dale, <a href="/A298360/b298360_1.txt">Table of n, a(n) for n = 1..1000</a>
approved
editing
editing
approved
Select[Range[500], MemberQ[{3, 7, 13, 27}, Mod[#, 30]]&] (* Harvey P. Dale, Nov 15 2024 *)
approved
editing
editing
approved
Harvey P. Dale, <a href="/A372984/b372984_1.txt">Table of n, a(n) for n = 1..1000</a>
approved
editing