|
Search: id:A157678
|
|
|
| A157678 |
|
Numbers n such that n + floor(average of digits of n) is prime. |
|
+0 1
|
|
| 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; listen)
|
|
|
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: A064695 A162824 A077617 this_sequence A109240 A020740 A086980
Adjacent sequences: A157675 A157676 A157677 this_sequence 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
|
|
|
Search completed in 0.002 seconds
|