|
Search: id:A084752
|
|
| |
|
| 3, 5, 7, 7, 11, 13, 13, 11, 19, 33, 19, 19, 17, 23, 23, 31, 34, 51, 31, 31, 37, 29, 37, 43, 43, 91, 95, 47, 58, 43, 47, 119, 53, 41, 143, 74, 59, 67, 67, 161, 59, 82, 73, 67, 71, 209, 71, 221, 59, 71, 89, 185, 106, 89, 221, 79, 71, 122, 83, 222, 103, 177, 103, 101, 107, 109
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
PROGRAM
|
(PARI) x = vector(80); B = vector(80); i = 3; count = 0; while (count < 80, i++; if (omega(i) > 1, f = factor(i); s = sum(j = 1, matsize(f)[1], f[j, 1]); if (!(i%s), works = 1; j = 1; while (works && j <= count, if (i%x[j], j++, works = 0)); if (works, count++; x[count] = i; B[count] = i/s)))); B (Wasserman)
|
|
CROSSREFS
|
Cf. A064623.
Sequence in context: A109535 A082433 A082683 this_sequence A037464 A060265 A098566
Adjacent sequences: A084749 A084750 A084751 this_sequence A084753 A084754 A084755
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jun 16 2003
|
|
EXTENSIONS
|
More terms from David Wasserman (wasserma(AT)spawar.navy.mil), Jan 04 2005
|
|
|
Search completed in 0.002 seconds
|
