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-6 of 6 results.

A097408 Initial decimal digit of n^4.

Original entry on oeis.org

1, 1, 8, 2, 6, 1, 2, 4, 6, 1, 1, 2, 2, 3, 5, 6, 8, 1, 1, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 8, 9, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 4, 4, 5, 5, 6, 6, 7, 7, 8, 9, 9, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 5, 5, 5, 5, 6, 6, 6, 7, 7, 7, 8, 8, 8, 9, 9, 1, 1, 1, 1, 1, 1
Offset: 1

Views

Author

Eric W. Weisstein, Aug 16 2004

Keywords

Examples

			1, 16, 81, 256, 625, 1296, 2401, 4096, 6561, 10000, ...
		

Crossrefs

Programs

  • Maple
    a:= n-> parse(""||(n^4)[1]):
    seq(a(n), n=1..120);  # Alois P. Heinz, Jan 28 2016

A097409 Initial decimal digit of n^5.

Original entry on oeis.org

1, 3, 2, 1, 3, 7, 1, 3, 5, 1, 1, 2, 3, 5, 7, 1, 1, 1, 2, 3, 4, 5, 6, 7, 9, 1, 1, 1, 2, 2, 2, 3, 3, 4, 5, 6, 6, 7, 9, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 9, 9, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 6, 6, 6, 7, 7, 8, 8, 9, 9, 1, 1, 1, 1, 1, 1
Offset: 1

Views

Author

Eric W. Weisstein, Aug 16 2004

Keywords

Examples

			1, 32, 243, 1024, 3125, 7776, 16807, 32768, 59049, 100000, ...
		

Crossrefs

Programs

  • Maple
    a:= n-> parse(""||(n^5)[1]):
    seq(a(n), n=1..120);  # Alois P. Heinz, Jan 28 2016

A097413 Initial decimal digit of n^9.

Original entry on oeis.org

1, 5, 1, 2, 1, 1, 4, 1, 3, 1, 2, 5, 1, 2, 3, 6, 1, 1, 3, 5, 7, 1, 1, 2, 3, 5, 7, 1, 1, 1, 2, 3, 4, 6, 7, 1, 1, 1, 2, 2, 3, 4, 5, 6, 7, 9, 1, 1, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 8, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 5, 6, 7, 8, 9, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 6, 7, 8, 9, 1, 1, 1, 1
Offset: 1

Views

Author

Eric W. Weisstein, Aug 16 2004

Keywords

Examples

			1, 512, 19683, 262144, 1953125, 10077696, 40353607, 134217728, 387420489, 1000000000, ...
		

Crossrefs

Programs

  • Maple
    idd:= n -> floor(n/10^ilog10(n)):
    seq(idd(n^9),n=2..100); # Robert Israel, Jan 28 2016
  • Mathematica
    Table[IntegerDigits[n^9][[1]],{n,120}] (* Harvey P. Dale, Aug 25 2023 *)

Formula

a(n) = A000030(n^9) = floor(n^9/10^A004216(n^9)). - Robert Israel, Jan 28 2016

A097410 Initial decimal digit of n^6.

Original entry on oeis.org

1, 6, 7, 4, 1, 4, 1, 2, 5, 1, 1, 2, 4, 7, 1, 1, 2, 3, 4, 6, 8, 1, 1, 1, 2, 3, 3, 4, 5, 7, 8, 1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 5, 6, 7, 8, 9, 1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 6, 7, 8, 9, 9, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 6, 6, 6, 7, 7, 8, 8, 9, 1, 1, 1, 1
Offset: 1

Views

Author

Eric W. Weisstein, Aug 16 2004

Keywords

Examples

			1, 64, 729, 4096, 15625, 46656, 117649, 262144, 531441, 1000000, ...
		

Crossrefs

Programs

  • Mathematica
    IntegerDigits[#][[1]]&/@(Range[110]^6) (* Harvey P. Dale, Mar 23 2018 *)

Extensions

One prepended by Harvey P. Dale, Mar 23 2018

A097412 Initial decimal digit of n^8.

Original entry on oeis.org

0, 1, 2, 6, 6, 3, 1, 5, 1, 4, 1, 2, 4, 8, 1, 2, 4, 6, 1, 1, 2, 3, 5, 7, 1, 1, 2, 2, 3, 5, 6, 8, 1, 1, 1, 2, 2, 3, 4, 5, 6, 7, 9, 1, 1, 1, 2, 2, 2, 3, 3, 4, 5, 6, 7, 8, 9, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 5, 6, 7, 8, 8, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 9, 1, 1, 1, 1
Offset: 0

Views

Author

Eric W. Weisstein, Aug 16 2004

Keywords

Examples

			1, 256, 6561, 65536, 390625, 1679616, 5764801, 16777216, 43046721, 100000000, ...
		

Crossrefs

Extensions

a(0) and a(1) added by Neven Juric, Sep 23 2010

A097414 Initial decimal digit of n^10.

Original entry on oeis.org

1, 1, 5, 1, 9, 6, 2, 1, 3, 1, 2, 6, 1, 2, 5, 1, 2, 3, 6, 1, 1, 2, 4, 6, 9, 1, 2, 2, 4, 5, 8, 1, 1, 2, 2, 3, 4, 6, 8, 1, 1, 1, 2, 2, 3, 4, 5, 6, 7, 9, 1, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 8, 9, 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 4, 5, 6, 7, 8, 9, 1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 7, 8, 9, 1, 1, 1, 1
Offset: 1

Views

Author

Eric W. Weisstein, Aug 16 2004

Keywords

Examples

			1, 1024, 59049, 1048576, 9765625, 60466176, 282475249, 1073741824, 3486784401, 10000000000, ...
		

Crossrefs

Programs

  • Mathematica
    IntegerDigits[#][[1]]&/@(Range[120]^10) (* Harvey P. Dale, Jan 12 2024 *)

Extensions

a(1) inserted by Pontus von Brömssen, Jul 02 2021
Showing 1-6 of 6 results.