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.

A226797 Number of n-digit numbers x such that the digits of x^2 occur with frequency 1.

This page as a plain text file.
%I A226797 #5 Jun 21 2013 16:45:40
%S A226797 10,49,162,220,170,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
%T A226797 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
%U A226797 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
%N A226797 Number of n-digit numbers x such that the digits of x^2 occur with frequency 1.
%C A226797 After a(5), all terms are 0.
%e A226797 All numbers 0 to 9 have squares containing only digits of frequency 1: 0, 1, 4, 9, 16, 25, 36, 49, 64, 81.
%t A226797 cnt = 0; x = 0; t2 = Table[While[x < 10^n, If[Union[Last[Transpose[Tally[IntegerDigits[x^2]]]]] == {1}, cnt++]; x++]; cnt, {n, 5}]; Differences[Join[{0}, t2]]
%Y A226797 Cf. A225428, A226796.
%K A226797 nonn,base
%O A226797 1,1
%A A226797 _T. D. Noe_, Jun 21 2013