|
Search: id:A094137
|
|
|
| A094137 |
|
Values y of smallest positive pair (x,y) satisfying x^2 - 2*y^2 = -+d, where d=A058529(n). |
|
+0
6
|
|
| 1, 2, 3, 1, 4, 5, 1, 5, 6, 2, 1, 7, 7, 8, 2, 8, 8, 9, 3, 9, 1, 10, 11, 10, 11, 1, 11, 12, 11, 4, 12, 3, 2, 12, 13, 14, 13, 13, 13, 14, 2, 1, 14, 14, 14, 15, 4, 16, 2, 1, 15, 17, 16, 5, 16, 17, 16, 16, 2, 1, 17, 17, 17, 17, 4, 18, 19, 3, 2, 18, 20, 19, 18, 19, 20, 19, 19, 20, 19, 1, 7, 20, 21
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Here (x,y) is considered smaller than (u,v) iff x+y < u+v or (x+y = u+v and x < u).
|
|
EXAMPLE
|
A058529(5) = 31; (1, 4), (7, 3), (9, 5), (13, 10), ... are pairs satisfying x^2 - 2*y^2 = -+31; (1, 4) is the smallest one, so a(5) = 4.
|
|
PROGRAM
|
(PARI) {for(n=1, 765, fac=factor(n); v=vector(matsize(fac)[1], j, fac[j, 1])%8; b=1; for(k=1, length(v), if(v[k]>1&&v[k]<7, b=0)); if(b>0, print1(sp(n)[2], ", ")))}. For sp(n) see A094136.
|
|
CROSSREFS
|
Cf. A058529, A094136, A094138.
Sequence in context: A034867 A055446 A104706 this_sequence A038802 A092942 A131225
Adjacent sequences: A094134 A094135 A094136 this_sequence A094138 A094139 A094140
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Lekraj Beedassy (blekraj(AT)yahoo.com), May 04 2004
|
|
EXTENSIONS
|
Edited, corrected and extended by Klaus Brockhaus (klaus-brockhaus(AT)t-online.de) May 31 2004
|
|
|
Search completed in 0.002 seconds
|
