A086013 -id:A086013 - cp's OEIS frontend

A086008 Number of 0's in decimal expansion of n^2.

1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 1, 1, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 1, 0, 1, 1, 1, 2, 1, 1, 1, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 1, 0, 0, 0, 0, 0, 0, 1, 0, 2, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 1, 0, 1, 1, 1, 4, 2, 2, 2, 1

Offset: 0

Jason Earls, Jul 07 2003

			10^2 = 100, so a(10)=2 and 32^2 = 1024, so a(32)=1.

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 1's A086009, 2's A086010, 3's A086011, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 8's A086016, 9's A086017.

Cf. A269250 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 0] (* G. C. Greubel, Dec 13 2016 *)

A086008(n)=!n+#select(d->!d,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086017 Number of 9's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 2, 1, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0, 1, 0, 1, 1, 2, 1, 1, 0, 0, 0, 1, 0

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 2's A086010, 3's A086011, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 8's A086016.

Cf. A269249 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 9] (* G. C. Greubel, Dec 13 2016 *)

A086017(n)=#select(d->d==9,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086009 Number of 1's in decimal expansion of n^2.

Original entry on oeis.org

0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 2, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 0, 2, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 0, 0, 0, 0, 1, 0, 0, 1, 1, 2, 1, 1, 2

Offset: 0

Jason Earls, Jul 07 2003

			4^2 = 16, so a(4)=1 and 11^2 = 121, so a(11)=2.

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 2's A086010, 3's A086011, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 8's A086016, 9's A086017.

Cf. A269241 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 1] (* G. C. Greubel, Dec 13 2016 *)

A086009(n)=#select(d->d==1,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086016 Number of 8's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 1, 2, 1, 1, 2, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 2's A086010, 3's A086011, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 9's A086017.

Cf. A269248 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 8] (* G. C. Greubel, Dec 13 2016 *)

A086016(n)=#select(d->d==8,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A269245 Number of times the digit 5 appears in the decimal expansion of n^3.

Original entry on oeis.org

0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 2, 1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 2, 1, 1, 0, 0, 0, 1, 1, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 1, 1, 0, 2, 2, 0, 1, 1, 2, 1, 1, 1, 1, 2, 0, 0, 0, 2, 0, 1, 1, 2

Offset: 0

M. F. Hasler, Feb 20 2016

The cubes corresponding to the first occurrence of 1, 2, 3, ... are listed in A036532, i.e., A036532(n)^(1/3) = A048370(n) is the index of the first occurrence of n.

			0^3 = 0, 1^3 = 1, 2^3 = 8 and 3^3 = 27 all have a(0) = a(1) = a(2) = a(3) = 0 digits '5'.
5^3 = 125 has a(5) = 1 digit '5'.

Cf. A036532 and A036527 - A036536; A048370 and A048365 - A048374.
Analog for the other digits 0, 1, ..., 9: A269250, A269241, A269242, A269243, A269244, A269245, A269246, A269247, A269248, A269249.
Analog for squares: A086013 (digit 5), and A086008 - A086017 for digits 0 - 9.

Table[DigitCount[n^3, 10, 5], {n, 0, 100}] (* Robert Price, Mar 21 2020 *)

PARI
```
A269245(n)=#select(t->t==5,digits(n^3))
```

A086010 Number of 2's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 2, 1, 1, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 2, 1, 0, 0, 1, 0, 0, 0, 0, 0, 2, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 2, 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 2, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 3's A086011, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 8's A086016, 9's A086017.

Cf. A269242 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 2] (* G. C. Greubel, Dec 13 2016 *)

A086010(n)=#select(d->d==2,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086011 Number of 3's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 2, 1, 2, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 2's A086010, 4's A086012, 5's A086013, 6's A086014, 7's A086015, 8's A086016, 9's A086017.

Cf. A269243 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 3] (* G. C. Greubel, Dec 13 2016 *)

A086011(n)=#select(d->d==3,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086012 Number of 4's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 2, 0, 0, 0, 0, 0, 1, 0, 1, 2, 2, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 3, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 2, 0, 1, 1, 1, 2, 2, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 2, 1, 0, 0, 0, 1, 1, 0, 0, 0, 2, 0, 0

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 2's A086010, 3's A086011, 5's A086013, 6's A086014, 7's A086015, 8's A086016, 9's A086017.

Cf. A269244 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 4] (* G. C. Greubel, Dec 13 2016 *)

A086012(n)=#select(d->d==4,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086014 Number of 6's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 1, 0, 0, 0, 0, 1, 1, 2, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 1, 1, 2, 1, 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 1

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 2's A086010, 3's A086011, 4's A086012, 5's A086013, 7's A086015, 8's A086016, 9's A086017.

Cf. A269246 for the n^3 analog.

Table[DigitCount[n^2,10,6],{n,0,110}] (* Harvey P. Dale, May 24 2014 *)

A086014(n)=#select(d->d==6,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

A086015 Number of 7's in decimal expansion of n^2.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 2, 0, 0, 0, 0, 0, 1, 0, 1, 1, 1, 1, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset: 0

Jason Earls, Jul 07 2003

G. C. Greubel, Table of n, a(n) for n = 0..1000

Cf. 0's A086008, 1's A086009, 2's A086010, 3's A086011, 4's A086012, 5's A086013, 6's A086014, 8's A086016, 9's A086017.

Cf. A269247 for the n^3 analog.

DigitCount[(Range[0, 100])^2, 10, 7] (* G. C. Greubel, Dec 13 2016 *)

A086015(n)=#select(d->d==7,digits(n^2)) \\ M. F. Hasler, Feb 21 2016

cp's OEIS Frontend

A086008 Number of 0's in decimal expansion of n^2.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

PARI

A086017 Number of 9's in decimal expansion of n^2.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

A086009 Number of 1's in decimal expansion of n^2.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

PARI

A086016 Number of 8's in decimal expansion of n^2.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

A269245 Number of times the digit 5 appears in the decimal expansion of n^3.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

PARI

A086010 Number of 2's in decimal expansion of n^2.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

A086011 Number of 3's in decimal expansion of n^2.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

A086012 Number of 4's in decimal expansion of n^2.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

A086014 Number of 6's in decimal expansion of n^2.

Views

Author

Keywords