|
| |
|
|
A157678
|
|
Numbers n such that n + floor(average of digits of n) is prime.
|
|
0
| |
|
|
1, 12, 16, 27, 30, 34, 38, 41, 56, 63, 67, 70, 74, 89, 92, 96, 101, 102, 105, 107, 112, 125, 128, 130, 136, 146, 147, 154, 161, 164, 168, 175, 186, 188, 190, 193, 208, 210, 219, 226, 229, 231, 236, 237, 247, 254, 258, 265, 273, 276, 278, 280, 290, 305, 308, 309
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| n = 89 -> 89 + floor((8+9)/2) = 89 + 8 = 97 (prime). n = 190 -> 190 + floor((1+9+0)/3) = 190 + 3 = 193 (prime).
|
|
|
MAPLE
| a := proc (n) local nn: nn := convert(n, base, 10): if isprime(n+floor(add(nn[j], j = 1 .. nops(nn))/nops(nn))) = true then n else end if end proc: seq(a(n), n = 1 .. 350); [From Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 07 2009]
|
|
|
CROSSREFS
| Sequence in context: A189763 A077617 A192609 * A109240 A020740 A086980
Adjacent sequences: A157675 A157676 A157677 * A157679 A157680 A157681
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Kyle D. Balliet (kdballie(AT)bloomu.edu), Mar 04 2009
|
|
|
EXTENSIONS
| Corrected and extended by Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 07 2009
|
| |
|
|
