A228359 Numbers n whose 10's complement is not prime, i.e., 10^k-n, where k is the number of digits of n, is not prime.

1, 2, 4, 6, 9, 10, 12, 13, 14, 15, 16, 18, 19, 20, 22, 23, 24, 25, 26, 28, 30, 31, 32, 34, 35, 36, 37, 38, 40, 42, 43, 44, 45, 46, 48, 49, 50, 51, 52, 54, 55, 56, 58, 60, 61, 62, 64, 65, 66, 67, 68, 70, 72, 73, 74, 75, 76, 78, 79, 80, 82, 84, 85, 86, 88, 90, 91, 92

Offset

1,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Mathematica

Select[Range[100], ! PrimeQ[10^(IntegerLength[#]) - #]&]

Crossrefs

Cf. A228075.

Sequence in context: A359515 A162202 A210380 * A347745 A156165 A024968

Adjacent sequences: A228356 A228357 A228358 * A228360 A228361 A228362

Keyword

nonn,easy,base,less

Author

Vincenzo Librandi, Aug 21 2013

Status

approved