|
| |
|
|
A066935
|
|
bigomega(n+1)==0 (mod bigomega(n)) where bigomega(n)=A001222(n) is the number of prime divisors of n (counted with multiplicity).
|
|
1
| |
|
|
2, 3, 5, 7, 9, 11, 13, 14, 15, 17, 19, 21, 23, 25, 27, 29, 31, 33, 34, 35, 37, 38, 39, 41, 43, 44, 47, 53, 55, 57, 59, 61, 63, 67, 71, 73, 75, 79, 83, 85, 86, 87, 89, 93, 94, 95, 97, 98, 101, 103, 107, 109, 113, 116, 118, 121, 122, 124, 127, 131, 133, 134, 135, 137, 139
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,1000
|
|
|
MATHEMATICA
| bigomega[n_] := Plus@@Last/@FactorInteger[n]; Select[Range[2, 150], Mod[bigomega[ #+1], bigomega[ # ]]==0&]
|
|
|
PROG
| (PARI) { n=0; for (m=2, 10^10, if (bigomega(m+1) % bigomega(m) == 0, write("b066935.txt", n++, " ", m); if (n==1000, return)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Apr 08 2010]
|
|
|
CROSSREFS
| Sequence in context: A061979 A050748 A079051 * A042943 A186330 A153809
Adjacent sequences: A066932 A066933 A066934 * A066936 A066937 A066938
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Jan 24 2002
|
|
|
EXTENSIONS
| Edited by Dean Hickerson (dean.hickerson(AT)yahoo.com), Jan 27 2002
|
| |
|
|
