A088622
Smallest prime obtained as the concatenation of a power of n followed by a 1, or 0 if no such number exists.
Original entry on oeis.org
11, 41, 31, 41, 251, 61, 71, 641, 811, 101, 259374246011, 0, 131, 75295361, 151, 40961
Offset: 1
-
f[n_] := Block[{k = 1}, While[ !PrimeQ[10*n^k + 1] && k != 1500, k++ ]; If[k == 1500, 0, 10*n^k + 1]]; Table[ f[n], {n, 1, 50}] (* Robert G. Wilson v, Oct 25 2003 *)
Next term is too large to include. -
Ray Chandler, Oct 23 2003
A089776
If n mod 10 is 1, 3, 7, or 9, then a(n) = least prime of the form 1 followed by n^r; else a(n) = least prime of the form n^r followed by a 1. In both cases r must be > 1 and a(n) = 0 if no such prime exists.
Original entry on oeis.org
11, 41, 13, 41, 251, 61, 17, 641, 19, 101, 114641, 0, 113, 75295361, 151, 40961, 1289, 181, 1361, 4001, 11025506433613486607375777617584133309366191904729927960524981845743709132117581, 1368800680154120519681, 1907846434775996175406740561329, 241, 251, 6761, 127, 281, 1500246412961, 9001, 131
Offset: 1
a(12) = 0 because 1+10*12^r is always divisible by 11.
a(32) = 0 because 1+10*32^r is divisible by 3 if r is odd and by 11 if r is even.
Showing 1-2 of 2 results.
Comments