|
| |
|
|
A110632
|
|
Every 6-th term of A083946 starting from position 0.
|
|
3
| |
|
|
1, 6, 6, 3, 6, 2, 6, 4, 4, 6, 3, 2, 1, 2, 3, 1, 6, 6, 1, 2, 6, 4, 2, 4, 2, 6, 2, 4, 2, 6, 5, 2, 2, 1, 5, 3, 6, 6, 2, 5, 3, 1, 4, 5, 4, 6, 2, 4, 3, 1, 6, 2, 3, 3, 6, 4, 1, 6, 3, 2, 5, 3, 3, 3, 6, 6, 5, 4, 2, 5, 3, 2, 4, 3, 3, 2, 6, 6, 3, 1, 5, 3, 6, 2, 4, 2, 6, 5, 4, 3, 3, 1, 4, 2, 4, 3, 3, 6, 3, 5, 5, 4, 4, 6, 4
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
PROG
| (PARI) {a(n)=local(d=6, m=6, A=1+m*x); for(j=2, d*n, for(k=1, m, t=polcoeff((A+k*x^j+x*O(x^j))^(1/m), j); if(denominator(t)==1, A=A+k*x^j; break))); polcoeff(A, d*n)}
|
|
|
CROSSREFS
| Cf. A083946, A110633, A110634, A110631 (m=5), A110635 (m=7).
Sequence in context: A112112 A193085 A197510 * A202068 A088454 A095228
Adjacent sequences: A110629 A110630 A110631 * A110633 A110634 A110635
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com) and Paul D. Hanna (pauldhanna(AT)juno.com), Aug 30 2005
|
| |
|
|
