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.

Showing 1-5 of 5 results.

A239463 a(n) = A239460(n) / n^2.

Original entry on oeis.org

11, 12, 103, 104, 1005, 1006, 1007, 1008, 1009, 10010, 10011, 10012, 10013, 10014, 10015, 10016, 10017, 10018, 10019, 10020, 10021, 100022, 100023, 100024, 100025, 100026, 100027, 100028, 100029, 100030, 100031, 100032, 100033, 100034, 100035, 100036, 100037
Offset: 1

Views

Author

Colin Barker, Mar 19 2014

Keywords

Examples

			a(9) = 1009 because A239460(9)/9^2 = 81729/81 = 1009.
		

Crossrefs

Programs

  • Mathematica
    Table[ToExpression[ToString[n^2] <> ToString[n^3]]/n^2, {n, 1, 30}] (* Vaclav Kotesovec, Mar 24 2014 *)
  • PARI
    vector(100, n, eval(Str(n^2, n^3))/n^2)

A239459 Concatenation of n^3 and n.

Original entry on oeis.org

11, 82, 273, 644, 1255, 2166, 3437, 5128, 7299, 100010, 133111, 172812, 219713, 274414, 337515, 409616, 491317, 583218, 685919, 800020, 926121, 1064822, 1216723, 1382424, 1562525, 1757626, 1968327, 2195228, 2438929, 2700030, 2979131, 3276832, 3593733
Offset: 1

Views

Author

Colin Barker, Mar 19 2014

Keywords

Comments

a(n) is divisible by n.

Examples

			a(13) = 219713 because 2197 = 13^3 and 13 = 13^1.
		

Crossrefs

Programs

  • Mathematica
    Table[ToExpression[ToString[n^3]<>ToString[n]],{n,1,30}] (* Vaclav Kotesovec, Mar 24 2014 *)
    Table[n^3*10^IntegerLength[n]+n,{n,40}] (* Harvey P. Dale, Sep 07 2020 *)
  • PARI
    vector(100, n, eval(Str(n^3, n)))

A239461 Concatenation of n^3 and n^2.

Original entry on oeis.org

11, 84, 279, 6416, 12525, 21636, 34349, 51264, 72981, 1000100, 1331121, 1728144, 2197169, 2744196, 3375225, 4096256, 4913289, 5832324, 6859361, 8000400, 9261441, 10648484, 12167529, 13824576, 15625625, 17576676, 19683729, 21952784, 24389841, 27000900
Offset: 1

Views

Author

Colin Barker, Mar 19 2014

Keywords

Comments

a(n) is divisible by n^2.

Examples

			a(9) = 72981 because 729 = 9^3 and 81 = 9^2.
		

Crossrefs

Programs

  • Mathematica
    Table[ToExpression[ToString[n^3]<>ToString[n^2]],{n,1,30}] (* Vaclav Kotesovec, Mar 24 2014 *)
    Table[FromDigits[Flatten[IntegerDigits/@{n^3,n^2}]],{n,30}] (* Harvey P. Dale, Nov 28 2024 *)
  • PARI
    vector(100, n, eval(Str(n^3, n^2)))

A239462 A239459(n) / n.

Original entry on oeis.org

11, 41, 91, 161, 251, 361, 491, 641, 811, 10001, 12101, 14401, 16901, 19601, 22501, 25601, 28901, 32401, 36101, 40001, 44101, 48401, 52901, 57601, 62501, 67601, 72901, 78401, 84101, 90001, 96101, 102401, 108901, 115601, 122501, 129601, 136901, 144401, 152101
Offset: 1

Views

Author

Colin Barker, Mar 19 2014

Keywords

Examples

			a(13) = 16901 because A239459(13)/13 = 219713/13 = 16901.
		

Crossrefs

Programs

  • Mathematica
    Table[ToExpression[ToString[n^3]<>ToString[n]]/n,{n,1,30}] (* Vaclav Kotesovec, Mar 24 2014 *)
  • PARI
    vector(100, n, eval(Str(n^3, n))/n)

A239464 A239461(n) / n^2.

Original entry on oeis.org

11, 21, 31, 401, 501, 601, 701, 801, 901, 10001, 11001, 12001, 13001, 14001, 15001, 16001, 17001, 18001, 19001, 20001, 21001, 22001, 23001, 24001, 25001, 26001, 27001, 28001, 29001, 30001, 31001, 320001, 330001, 340001, 350001, 360001, 370001, 380001, 390001
Offset: 1

Views

Author

Colin Barker, Mar 19 2014

Keywords

Examples

			a(9) = 901 because A239461(9)/9^2 = 72981/81 = 901.
		

Crossrefs

Programs

  • Mathematica
    Table[ToExpression[ToString[n^3] <> ToString[n^2]]/n^2, {n, 1, 30}] (* Vaclav Kotesovec, Mar 24 2014 *)
    Table[(FromDigits[Flatten[IntegerDigits/@{n^3,n^2}]])/n^2,{n,40}] (* Harvey P. Dale, Nov 28 2024 *)
  • PARI
    vector(100, n, eval(Str(n^3, n^2))/n^2)
Showing 1-5 of 5 results.