A055851 -id:A055851 - cp's OEIS frontend

A204519 Square root of floor(A055851(n)/6).

0, 0, 0, 1, 2, 4, 11, 20, 40, 109, 198, 396, 1079, 1960, 3920, 10681, 19402, 38804, 105731, 192060, 384120, 1046629, 1901198, 3802396, 10360559, 18819920, 37639840, 102558961, 186298002

Offset: 1

M. F. Hasler, Jan 15 2012

Base-6 analog of A031150 [base 10], A204512 [base 8], A204517 (base 7), A204521 [base 5], A001353 [base 3], A001542 [base 2]. For bases 4 and 9, the corresponding sequence contains all integers.

Cf. A055792, A055793, A055812, A204517, A204512, A204503 and A023110.

Sqrt[Floor[Select[Range[100000],IntegerQ[Sqrt[Quotient[#^2,6]]]&]^2/6]] (* Vaclav Kotesovec, Nov 26 2012 *)

b=6;for(n=1,2e9,issquare(n^2\b) & print1(sqrtint(n^2\b),","))

Conjecture (for n>=8): a(n) = 10*a(n-3) - a(n-6). - Vaclav Kotesovec, Nov 26 2012

Empirical g.f.: x^4*(x^3+4*x^2+2*x+1) / (x^6-10*x^3+1). - Colin Barker, Sep 15 2014

More terms from Vaclav Kotesovec, Nov 26 2012

A204573 A204519(n)^2 = floor(A055851(n)/6): Squares which written in base 6, with some digit appended, yield another square.

Original entry on oeis.org

0, 0, 0, 1, 4, 16, 121, 400, 1600, 11881, 39204, 156816, 1164241, 3841600, 15366400, 114083761, 376437604, 1505750416, 11179044361, 36887043600, 147548174400, 1095432263641, 3614553835204, 14458215340816, 107341182792481, 354189388806400, 1416757555225600

Offset: 1

M. F. Hasler, Jan 16 2012

Base-6 analog of A202303.

See also A031149=sqrt(A023110) (base 10), A204502=sqrt(A204503) (base 9), A204514=sqrt(A055872) (base 8), A204516=sqrt(A055859) (base 7), A204518=sqrt(A055851) (base 6), A204520=sqrt(A055812) (base 5), A004275=sqrt(A055808) (base 4), A001075=sqrt(A055793) (base 3), A001541=sqrt(A055792) (base 2).

b=6;for(n=0,1e7,issquare(n^2\b) & print1(n^2\b,","))

Conjecture: a(n) = 99*a(n-3)-99*a(n-6)+a(n-9) for n>10. - Colin Barker, Sep 20 2014

Empirical g.f.: -x^4*(x^6+16*x^5+4*x^4+22*x^3+16*x^2+4*x+1) / ((x-1)*(x^2+x+1)*(x^6-98*x^3+1)). - Colin Barker, Sep 20 2014

A023110 Squares which remain squares when the last digit is removed.

Original entry on oeis.org

0, 1, 4, 9, 16, 49, 169, 256, 361, 1444, 3249, 18496, 64009, 237169, 364816, 519841, 2079364, 4678569, 26666896, 92294449, 341991049, 526060096, 749609641, 2998438564, 6746486769, 38453641216, 133088524969, 493150849009, 758578289296, 1080936581761

Offset: 1

David W. Wilson

This A023110 = A031149^2 is the base 10 version of A001541^2 = A055792 (base 2), A001075^2 = A055793 (base 3), A004275^2 = A055808 (base 4), A204520^2 = A055812 (base 5), A204518^2 = A055851 (base 6), A204516^2 = A055859 (base 7), A204514^2 = A055872 (base 8) and A204502^2 = A204503 (base 9). - M. F. Hasler, Sep 28 2014

For the first 4 terms the square has only one digit. It is understood that deleting this digit yields 0. - Colin Barker, Dec 31 2017

R. K. Guy, Neg and Reg, preprint, Jan 2012.

Jon E. Schoenfield, Table of n, a(n) for n = 1..70 (terms 1..38 from David W. Wilson, terms 39..40 from Robert G. Wilson v, terms 41..67 from Dmitry Petukhov)
M. F. Hasler, Truncated squares, OEIS wiki, Jan 16 2012
Joshua Stucky, Pell's Equation and Truncated Squares, Number Theory Seminar, Kansas State University, Feb 19 2018.
Index to sequences related to truncating digits of squares.

Cf. A023111.
Cf. A031150, A053784, A031149, A055792, A055793, A055808, A055812, A055851, A055859, A055872.
Cf. A001541, A001075, A004275, A204520, A204518, A204516, A204514, A204502, A204503.

count:= 1: A[1]:= 0:
for n from 0 while count < 35 do
  for t in [1,4,6,9] do
    if issqr(10*n^2+t) then
       count:= count+1;
       A[count]:= 10*n^2+t;
    fi
  od
od:
seq(A[i],i=1..count); # Robert Israel, Sep 28 2014

fQ[n_] := IntegerQ@ Sqrt@ Quotient[n^2, 10]; Select[ Range@ 1000000, fQ]^2 (* Robert G. Wilson v, Jan 15 2011 *)

for(n=0,1e7, issquare(n^2\10) & print1(n^2",")) \\  M. F. Hasler, Jan 16 2012

Appears to satisfy a(n)=1444*a(n-7)+a(n-14)-76*sqrt(a(n-7)*a(n-14)) for n >= 16. For n = 15, 14, 13, ... this would require a(1) = 16, a(0) = 49, a(-1) = 169, ... - Henry Bottomley, May 08 2001; edited by Robert Israel, Sep 28 2014
a(n) = A031149(n)^2. - M. F. Hasler, Sep 28 2014
Conjectures from Colin Barker, Dec 31 2017: (Start)
G.f.: x^2*(1 + 4*x + 9*x^2 + 16*x^3 + 49*x^4 + 169*x^5 + 256*x^6 - 1082*x^7 - 4328*x^8 - 9738*x^9 - 4592*x^10 - 6698*x^11 - 6698*x^12 - 4592*x^13 + 361*x^14 + 1444*x^15 + 3249*x^16 + 256*x^17 + 169*x^18 + 49*x^19 + 16*x^20) / ((1 - x)*(1 + x + x^2 + x^3 + x^4 + x^5 + x^6)*(1 - 1442*x^7 + x^14)).
a(n) = 1443*a(n-7) - 1443*a(n-14) + a(n-21) for n>22.
(End)

More terms from M. F. Hasler, Jan 16 2012

A055812 a(n) and floor(a(n)/5) are both squares; i.e., squares which remain squares when written in base 5 and last digit is removed.

Original entry on oeis.org

0, 1, 4, 9, 49, 81, 324, 2209, 15129, 25921, 103684, 710649, 4870849, 8346321, 33385284, 228826129, 1568397609, 2687489281, 10749957124, 73681302249, 505019158609, 865363202001, 3461452808004

Offset: 1

Henry Bottomley, Jul 14 2000

For the first 3 terms, the above "base 5" interpretation is questionable, since they have only 1 digit in base 5. It is understood that dropping this digit yields 0. - M. F. Hasler, Jan 15 2012

			a(4) = 49 because 49 = 7^2 = 144 base 5 and 14 base 5 = 9 = 3^2.

For analogs in other bases see A055792 (base 2), A055793 (base 3), A055808 (base 4), A055851 (base 6), A204517 (base 7), A204512 (base 8), A204503 (base 9) and A023110 (base 10).

Squares of A204520. The square roots of floor[a(n)/5] are given in A204521.

b=5;for(n=1,2e9,issquare(n^2\b) && print1(n^2,","))  \\ M. F. Hasler, Jan 15 2012

Empirical g.f.: -x^2*(9*x^11 +49*x^10 +324*x^9 +81*x^8 -698*x^7 -698*x^6 -968*x^5 -242*x^4 +49*x^3 +9*x^2 +4*x +1) / ((x -1)*(x +1)*(x^2 -4*x -1)*(x^2 +1)*(x^2 +4*x -1)*(x^4 +18*x^2 +1)). - Colin Barker, Sep 15 2014

More terms added and offset changed to 1 by M. F. Hasler, Jan 15 2012

A204502 Numbers such that floor[a(n)^2 / 9] is a square.

Original entry on oeis.org

0, 1, 2, 3, 4, 6, 9, 12, 15, 18, 21, 24, 27, 30, 33, 36, 39, 42, 45, 48, 51, 54, 57, 60, 63, 66, 69, 72, 75, 78, 81, 84, 87, 90, 93, 96, 99, 102, 105, 108, 111, 114, 117, 120, 123, 126, 129, 132, 135, 138, 141, 144, 147, 150, 153, 156, 159, 162, 165, 168, 171, 174, 177

Offset: 1

M. F. Hasler, Jan 15 2012

nonn

Or, numbers n such that n^2, with its last base-9 digit dropped, is again a square. (Except maybe for the 3 initial terms whose square has only 1 digit in base 9.)

M. F. Hasler, Truncated squares, OEIS wiki, Jan 16 2012
Index to sequences related to truncating digits of squares.

The squares are in A204503, the squares with last base-9 digit dropped in A204504, and the square roots of the latter in A028310.

Cf. A031149=sqrt(A023110) (base 10), A204514=sqrt(A055872) (base 8), A204516=sqrt(A055859) (base 7), A204518=sqrt(A055851) (base 6), A204520=sqrt(A055812) (base 5), A004275=sqrt(A055808) (base 4), A001075=sqrt(A055793) (base 3), A001541=sqrt(A055792) (base 2).

Select[Range[0,200],IntegerQ[Sqrt[Floor[#^2/9]]]&] (* Harvey P. Dale, May 05 2018 *)

b=9;for(n=0,200,issquare(n^2\b) & print1(n","))

Conjecture: a(n) = 3*n-12 for n>5. G.f.: x^2*(x^2+x+1)*(x^3-x+1)/(x-1)^2. [Colin Barker, Nov 23 2012]

A204503 Squares n^2 such that floor(n^2/9) is again a square.

Original entry on oeis.org

0, 1, 4, 9, 16, 36, 81, 144, 225, 324, 441, 576, 729, 900, 1089, 1296, 1521, 1764, 2025, 2304, 2601, 2916, 3249, 3600, 3969, 4356, 4761, 5184, 5625, 6084, 6561, 7056, 7569, 8100, 8649, 9216, 9801, 10404, 11025, 11664, 12321, 12996, 13689, 14400, 15129, 15876

Offset: 1

M. F. Hasler, Jan 15 2012

Or: Squares which remain squares when their last base-9 digit is dropped.
(For the first three terms, which have only 1 digit in base 9, dropping that digit is meant to yield zero.)
Base-9 analog of A055792 (base 2), A055793 (base 3), A055808 (base 4), A055812 (base 5), A055851 (base 6), A055859 (base 7), A055872(base 8) and A023110 (base 10).

M. F. Hasler, Truncated squares, OEIS wiki, Jan 16 2012
Index to sequences related to truncating digits of squares.

Select[Range[0,200]^2,IntegerQ[Sqrt[Floor[#/9]]]&] (* Harvey P. Dale, Jan 27 2012 *)

b=9;for(n=1,200,issquare(n^2\b) & print1(n^2,","))

a(n) = A204502(n)^2.

Conjectures: a(n) = 9*(n-4)^2 for n>5. G.f.: x^2*(7*x^6-12*x^5-11*x^4-x-1) / (x-1)^3. - Colin Barker, Sep 15 2014

A204514 Numbers such that floor(a(n)^2 / 8) is again a square.

Original entry on oeis.org

0, 1, 2, 3, 6, 17, 34, 99, 198, 577, 1154, 3363, 6726, 19601, 39202, 114243, 228486, 665857, 1331714, 3880899, 7761798, 22619537, 45239074, 131836323, 263672646, 768398401, 1536796802, 4478554083, 8957108166, 26102926097, 52205852194, 152139002499, 304278004998, 886731088897

Offset: 1

M. F. Hasler, Jan 15 2012

Or: Numbers whose square, with its last base-8 digit dropped, is again a square. (Except maybe for the 3 initial terms whose square has only 1 digit in base 8.)

See A204504 for the squares resulting from truncation of a(n)^2, and A204512 for their square roots. - M. F. Hasler, Sep 28 2014

M. F. Hasler, Truncated squares, OEIS wiki, Jan 16 2012
Index to sequences related to truncating digits of squares.
Index entries for linear recurrences with constant coefficients, signature (0,6,0,-1).

Cf. A031149=sqrt(A023110) (base 10), A204502=sqrt(A204503) (base 9), A204516=sqrt(A055859) (base 7), A204518=sqrt(A055851) (base 6), A204520=sqrt(A055812) (base 5), A004275=sqrt(A055808) (base 4), A001075=sqrt(A055793) (base 3), A001541=sqrt(A055792) (base 2).

Cf. A003499, A055872, A204504, A204512.

A204514 := proc(n) coeftayl((x^2+2*x^3-3*x^4-6*x^5)/(1-6*x^2+x^4), x=0, n); end proc: seq(A204514(n), n=1..30); # Wesley Ivan Hurt, Sep 28 2014

CoefficientList[Series[(x^2 + 2*x^3 - 3*x^4 - 6*x^5)/(x (1 - 6*x^2 + x^4)), {x, 0, 30}], x] (* Wesley Ivan Hurt, Sep 28 2014 *)
LinearRecurrence[{0,6,0,-1},{0,1,2,3,6},40] (* Harvey P. Dale, Nov 23 2022 *)

b=8;for(n=0,1e7,issquare(n^2\b) & print1(n","))

A204514(n)=polcoeff((x + 2*x^2 - 3*x^3 - 6*x^4)/(1 - 6*x^2 + x^4+O(x^(n+!n))),n-1,x)

G.f. = (x^2 + 2*x^3 - 3*x^4 - 6*x^5)/(1 - 6*x^2 + x^4).
a(n) = sqrt(A055872(n)). - M. F. Hasler, Sep 28 2014
a(2n) = A001541(n-1). a(2n+1) = A003499(n-1). - R. J. Mathar, Feb 05 2020

A204518 Numbers such that floor(a(n)^2 / 6) is a square.

Original entry on oeis.org

0, 1, 2, 3, 5, 10, 27, 49, 98, 267, 485, 970, 2643, 4801, 9602, 26163, 47525, 95050, 258987, 470449, 940898, 2563707, 4656965, 9313930, 25378083, 46099201, 92198402, 251217123, 456335045, 912670090, 2486793147, 4517251249, 9034502498, 24616714347

Offset: 1

M. F. Hasler, Jan 15 2012

Or: Numbers whose square, with its last base-6 digit dropped, is again a square. (For the three initial terms whose square has only one digit in base 6, this is then meant to yield zero.)

Index entries for linear recurrences with constant coefficients, signature (0,0,10,0,0,-1).

Cf. A023110 (base 10), A204502 (base 9), A204514 (base 8), A204516 (base 7), A204520 (base 5), A004275 (base 4), A055793 (base 3), A055792 (base 2).

b=6;for(n=0,2e9,issquare(n^2\b) & print1(n","))

concat(0, Vec(-x^2*(x+1)*(3*x^4+7*x^3-2*x^2-x-1)/(x^6-10*x^3+1) + O(x^100))) \\ Colin Barker, Sep 18 2014

a(n) = sqrt(A055851(n)).
From Colin Barker, Sep 18 2014: (Start)
a(n) = 10*a(n-3) - a(n-6) for n > 7.
G.f.: -x^2*(x+1)*(3*x^4 + 7*x^3 - 2*x^2 - x - 1) / (x^6-10*x^3+1). (End)
a(3n+2) = A001079(n). a(3n) = A087799(n-1). - R. J. Mathar, Feb 05 2020

More terms from Colin Barker, Sep 18 2014

A055872 a(n) and floor(a(n)/8) are both squares; i.e., squares that remain squares when written in base 8 and last digit is removed.

Original entry on oeis.org

0, 1, 4, 9, 36, 289, 1156, 9801, 39204, 332929, 1331716, 11309769, 45239076, 384199201, 1536796804, 13051463049, 52205852196, 443365544449, 1773462177796, 15061377048201, 60245508192804

Offset: 1

Henry Bottomley, Jul 14 2000

For the first 3 terms which have only 1 digit in base 8, removing this digit is meant to yield 0.

Base-8 analog of A055792 (base 2), A055793 (base 3), A055808 (base 4), A055812 (base 5), A055851 (base 6), A055859 (base 7), A204503 (base 9) and A023110 (base 10). - M. F. Hasler, Jan 15 2012

			a(5) = 289 because 289 = 17^2 = 441 base 8 and 44 base 8 = 36 = 6^2.

M. F. Hasler, Truncated squares, OEIS wiki, Jan 16 2012.
Index to sequences related to truncating digits of squares.
Index entries for linear recurrences with constant coefficients, signature (0,35,0,-35,0,1)

Cf. A023110, A055792 (bisection).

Select[Range[0,8*10^6]^2,IntegerQ[Sqrt[FromDigits[Most[ IntegerDigits[ #,8]], 8]]]&] (* Harvey P. Dale, Aug 02 2016 *)

b=8;for(n=1,200,issquare(n^2\b) && print1(n^2,",")) \\ M. F. Hasler, Jan 15 2012

a(n) = A204514(n)^2. - M. F. Hasler, Jan 15 2012

Empirical g.f.: -x^2*(4*x+1)*(9*x^4-26*x^2+1) / ((x-1)*(x+1)*(x^2-6*x+1)*(x^2+6*x+1)). - Colin Barker, Sep 15 2014

More terms added and offset changed to 1 by M. F. Hasler, Jan 15 2012

A204517 Square root of floor[A055859(n)/7].

Original entry on oeis.org

0, 0, 0, 1, 3, 6, 17, 48, 96, 271, 765, 1530, 4319, 12192, 24384, 68833, 194307, 388614, 1097009, 3096720, 6193440, 17483311, 49353213, 98706426, 278635967, 786554688, 1573109376, 4440692161, 12535521795, 25071043590, 70772438609, 199781794032, 399563588064

Offset: 1

M. F. Hasler, Jan 15 2012

nonn

M. F. Hasler, Truncated squares, OEIS wiki, Jan 16 2012
Index to sequences related to truncating digits of squares.

See also A031149=sqrt(A023110) (base 10), A204502=sqrt(A204503) (base 9), A204514=sqrt(A055872) (base 8), A204516=sqrt(A055859) (base 7), A204518=sqrt(A055851) (base 6), A204520=sqrt(A055812) (base 5), A004275=sqrt(A055808) (base 4), A001075=sqrt(A055793) (base 3), A001541=sqrt(A055792) (base 2).

b=7;for(n=1,2e9,issquare(n^2\b) & print1(sqrtint(n^2\b),","))

A204517(n)=polcoeff((x^4 + 3*x^5 + 6*x^6 + x^7)/(1 - 16*x^3 + x^6+O(x^n)),n)

A204517(n) = sqrt(floor(A204516(n)^2/7)).

G.f. = (x^4 + 3*x^5 + 6*x^6 + x^7)/(1 - 16*x^3 + x^6)

cp's OEIS Frontend

A204519 Square root of floor(A055851(n)/6).

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions

A204573 A204519(n)^2 = floor(A055851(n)/6): Squares which written in base 6, with some digit appended, yield another square.

Views

Author

Keywords

Comments

Crossrefs

Programs

PARI

Formula

A023110 Squares which remain squares when the last digit is removed.

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Formula

Extensions

A055812 a(n) and floor(a(n)/5) are both squares; i.e., squares which remain squares when written in base 5 and last digit is removed.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

PARI

Formula

Extensions

A204502 Numbers such that floor[a(n)^2 / 9] is a square.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A204503 Squares n^2 such that floor(n^2/9) is again a square.

Views

Author

Keywords

Comments

Links

Programs

Mathematica

PARI

Formula

A204514 Numbers such that floor(a(n)^2 / 8) is again a square.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Maple

Mathematica

PARI

PARI

Formula