login
A084430
Smallest prime with "n^3" as central digit(s).
1
101, 113, 181, 1277, 2647, 11251, 12161, 23431, 15121, 17291, 410009, 213319, 117281, 421973, 127447, 233759, 240967, 249131, 158329, 168599, 180001, 192611, 1106489, 1121671, 2138249, 2156251, 1175767, 1196837, 2219527, 2243893, 1270001, 3297911, 2327681
OFFSET
0,1
LINKS
FORMULA
a(n) = A084413(n^3). - Sean A. Irvine, Apr 14 2026
MAPLE
f:= proc(n) local k, r, p, d;
for k from 1 do
d:= 1+ilog10(k);
r:= tcat(k, n)*10^d;
p:= nextprime(r);
if p - r < 10^d then return p fi
od
end proc:
f(0):= 101:
map(f, [$0..100]); # Robert Israel, Apr 17 2026
PROG
(PARI) a(n) = {n = n^3; for (i = 1, 9, forstep (j=1, 9, 2, v = j + 10*n + i*10^(1+length(Str(n))); if (isprime(v), return (v)); ); ); } \\ Michel Marcus, Oct 05 2013
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Jun 27 2003
EXTENSIONS
More terms from Michel Marcus, Oct 05 2013
STATUS
approved