A069841 - OEIS

A069841

A036937(n) - 222...2 (with n 2s) interpreted as binary numbers and converted to decimal.

0, 1, 1, 7, 15, 5, 7, 1, 47, 21, 1, 61, 5, 13, 51, 41, 29, 29, 31, 19, 33, 7, 13, 31, 19, 67, 27, 93, 25, 43, 9, 49, 5, 81, 67, 1, 91, 21, 121, 81, 15, 149, 19, 161, 23, 119, 25, 107, 117, 43, 9, 117, 13, 85, 55, 131, 9, 7, 57, 17, 145, 73, 17, 301, 305, 157, 341

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,4

COMMENTS

Values of k arising from Mathematica calculation of A036937.

LINKS

Table of n, a(n) for n=1..67.

Robert G. Wilson v, Comments and first 121 terms

MATHEMATICA

Do[p = 2(10^n - 1)/9; k = 0; While[ ! PrimeQ[p], k++; p = FromDigits[ PadLeft[ IntegerDigits[k, 2], n] + 2]]; Print[p], {n, 1, 30}]

CROSSREFS

Cf. A036937.