1,2
Also numbers n such that (49*10^n-13)/9 is prime.
Table of n, a(n) for n=1..12.
Makoto Kamada, Factorizations of 544...443.
Index entries for primes involving repunits.
Do[ If[ PrimeQ[(49*10^n - 13)/9], Print[n]], {n, 0, 10000}]
Sequence in context: A034421 A211221 A029448 * A116552 A225288 A167930
Adjacent sequences: A103011 A103012 A103013 * A103015 A103016 A103017
more,nonn
Robert G. Wilson v, Jan 18 2005
approved