|
| |
|
|
A117819
|
|
Final digit d of n is in the sequence iff d is prime or n is prime.
|
|
1
| |
|
|
2, 3, 5, 7, 1, 2, 3, 5, 7, 9, 2, 3, 5, 7, 9, 1, 2, 3, 5, 7, 1, 2, 3, 5, 7, 2, 3, 5, 7, 9, 1, 2, 3, 5, 7, 1, 2, 3, 5, 7, 9, 2, 3, 5, 7, 9, 2, 3, 5, 7, 1, 2, 3, 5, 7, 9, 2, 3, 5, 7, 2, 3, 5, 7, 1, 2, 3, 5, 7, 9, 2, 3, 5, 7, 9, 1, 2, 3, 5, 7, 2, 3, 5, 7, 2, 3, 5, 7, 9, 1, 2, 3, 5, 7, 1, 2, 3, 5, 7, 9, 2, 3, 5, 7, 1
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| Calculations:
n: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 ...
d: - 2 3 - 5 - 7 - - -- -1 -2 -3 -- -5 -- -7 -- -9 -- ...
|
|
|
PROG
| (PARI) for(n=1, 211, if(isprime(d=n%10)||isprime(n), print1(d, ", ")))
|
|
|
CROSSREFS
| Cf. A118385.
Sequence in context: A033308 A134690 A065859 * A074461 A073342 A074462
Adjacent sequences: A117816 A117817 A117818 * A117820 A117821 A117822
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Apr 30 2006
|
|
|
EXTENSIONS
| Edited, corrected and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), May 02 2006
|
| |
|
|