cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 31-40 of 49 results. Next

A031609 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 21.

Original entry on oeis.org

1033, 5674, 9106, 9685, 13577, 14045, 19213, 19769, 20333, 25189, 26794, 33413, 33778, 40361, 41165, 42797, 43625, 51517, 53341, 59093, 59578, 61538, 63029, 64033, 69269, 70321, 71381, 71914, 72986, 74066, 74609, 75154, 75701, 93257, 94477, 96941
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Extensions

First term 442 removed by Georg Fischer, Jun 16 2019

A031610 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 22.

Original entry on oeis.org

3161, 6133, 6449, 10690, 15497, 22073, 28114, 35633, 36389, 37153, 37538, 38314, 46157, 47017, 47885, 54265, 65554, 66578, 67093, 68129, 76801, 77354, 77909, 79586, 80149, 80714, 81281, 82421, 89533, 105817, 108425, 109741, 119297, 120677
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Extensions

First term 485 removed by Georg Fischer, Jun 16 2019

A031616 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 28.

Original entry on oeis.org

5209, 16210, 16465, 16981, 24457, 35513, 45169, 46021, 58853, 59338, 60314, 72185, 74345, 75437, 92857, 106154, 107458, 108113, 110753, 123826, 124529, 125941, 127361, 128074, 128789, 131669, 151273, 168941, 170585, 172237, 173897
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Programs

  • Mathematica
    cf28Q[n_]:=Module[{s=Sqrt[n],cf,len},cf=If[IntegerQ[s],{1,1}, ContinuedFraction[ s][[2]]];len=Length[cf];OddQ[len]&&cf[[(len+1)/2]] == 28]; Rest[Select[Range[174000],cf28Q]] (* Harvey P. Dale, Jun 24 2020 *)

Extensions

First term 785 removed by Georg Fischer, Jun 16 2019

A031617 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 29.

Original entry on oeis.org

5501, 10453, 17770, 18037, 26365, 27017, 36269, 49066, 63793, 76537, 81017, 112754, 114773, 116129, 132394, 133121, 134581, 135314, 136049, 136786, 138266, 139009, 139754, 140501, 154393, 159133, 180617, 185741, 187465, 203461, 204362
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Programs

  • Mathematica
    opct29Q[n_]:=Module[{cf=ContinuedFraction[Sqrt[n]][[2]],len}, len= Length[ cf]; OddQ[len]&&cf[[Floor[len/2]]]==29]; Select[Range[205000], !IntegerQ[Sqrt[#]]&&opct29Q[#]&] (* Harvey P. Dale, Dec 14 2011 *)

Extensions

Corrected by Harvey P. Dale, Dec 14 2011

A031618 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 30.

Original entry on oeis.org

5801, 11498, 18577, 28345, 29021, 39373, 40169, 51754, 54049, 66853, 85625, 100297, 102841, 121633, 124433, 125138, 126554, 142001, 143509, 144266, 145786, 146549, 148081, 150394, 170473, 175453, 194441, 201545, 218117, 219985, 224690
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Extensions

First term 901 removed by Georg Fischer, Jun 16 2019

A031620 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 32.

Original entry on oeis.org

13274, 21106, 21397, 21985, 44269, 58789, 75914, 77573, 78689, 93997, 96461, 114685, 116041, 118777, 120157, 139658, 143413, 162229, 163034, 163841, 167906, 169546, 170369, 196093, 219865, 227417, 229325, 249962, 250961, 252965, 253970
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Programs

  • Mathematica
    cf32Q[n_]:=Module[{s=Sqrt[n],cf,len},cf=If[IntegerQ[s],{1,1},ContinuedFraction[ s][[2]]];len=Length[cf];OddQ[len]&&cf[[Floor[len/2]]]==cf[[Ceiling[len/2]]] == 32]; Select[ Range[254000],cf32Q] (* Harvey P. Dale, May 01 2022 *)

Extensions

First term 1025 removed by Georg Fischer, Jun 16 2019

A031621 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 33.

Original entry on oeis.org

2509, 13738, 23185, 61729, 64234, 79813, 80378, 81514, 83233, 98957, 101485, 102761, 147218, 150298, 151073, 152629, 171194, 172021, 175349, 176186, 177866, 178709, 180401, 205033, 231241, 233165, 235097, 238985, 263105, 265157, 267217
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Extensions

First term 1090 removed by Georg Fischer, Jun 16 2019

A031622 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 34.

Original entry on oeis.org

2713, 7421, 14449, 24106, 24730, 49453, 65761, 68869, 84389, 86138, 87314, 88498, 105337, 106637, 131485, 154193, 156554, 162133, 182101, 183809, 184666, 187249, 190721, 191594, 212329, 244877, 250841, 254857, 256877, 282922, 285050
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Extensions

First term 1157 removed by Georg Fischer, Jun 16 2019

A031623 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 35.

Original entry on oeis.org

15178, 25681, 38537, 52153, 53069, 53993, 70981, 72586, 90289, 91493, 115961, 137341, 140317, 164554, 166993, 168629, 170273, 171098, 192469, 193346, 195989, 196874, 197761, 201329, 229213, 258905, 260941, 262985, 265037, 267097, 271241
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Programs

  • Mathematica
    ct35Q[n_]:=Module[{s=Sqrt[n],cf,len,ctr},If[IntegerQ[s],cf={1,1},cf= ContinuedFraction[ s][[2]]];len=Length[cf];ctr=Floor[len/2];OddQ[len] && Take[cf,{ctr,ctr+1}]=={35,35}]; Select[Range[280000],ct35Q] (* Harvey P. Dale, Apr 16 2013 *)

Extensions

Corrected by Harvey P. Dale, Apr 16 2013

A031624 Numbers k such that the continued fraction for sqrt(k) has odd period and if the last term of the periodic part is deleted the two central terms are both 36.

Original entry on oeis.org

16178, 16433, 26650, 26977, 40121, 40925, 56813, 74209, 75301, 94538, 95153, 97633, 120077, 121465, 122861, 150985, 176929, 178613, 204026, 204929, 208561, 209474, 210389, 211306, 214069, 240829, 279625, 283865, 285997, 288137, 315682
Offset: 1

Views

Author

David W. Wilson

Keywords

Crossrefs

Subsequence of A003814.

Extensions

First term 1297 removed by Georg Fischer, Jun 16 2019
Previous Showing 31-40 of 49 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.