login
A376699
Positions of primes in the sequence of numbers of the form 2^i * 3^j - 1 (A069353).
3
3, 4, 5, 6, 8, 10, 11, 13, 15, 16, 18, 21, 22, 25, 31, 32, 36, 39, 40, 42, 51, 57, 61, 63, 65, 66, 71, 73, 79, 82, 94, 97, 106, 107, 110, 120, 121, 127, 128, 129, 130, 138, 142, 144, 161, 192, 204, 205, 212, 216, 232, 234, 244, 259, 264, 265, 308, 329, 346, 348
OFFSET
1,1
LINKS
FORMULA
A069353(a(n)) = A003586(a(n)) - 1 = A005105(n).
MATHEMATICA
With[{lim = 10^10}, Position[Sort@ Flatten@ Table[2^i*3^j - 1, {i, 0, Log2[lim]}, {j, 0, Log[3, lim/2^i]}], _?PrimeQ] // Flatten]
PROG
(PARI) lista(lim) = {my(s = List()); for(i = 0, logint(lim, 2), for(j = 0, logint(lim >> i, 3), listput(s, 2^i * 3^j - 1))); s = Set(s); for(i = 1, #s, if(isprime(s[i]), print1(i, ", "))); }
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Oct 02 2024
STATUS
approved