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.

A030295 Cubes with at most three distinct digits.

This page as a plain text file.
%I A030295 #16 Feb 10 2020 20:13:27
%S A030295 0,1,8,27,64,125,216,343,512,729,1000,1331,2744,3375,8000,27000,46656,
%T A030295 64000,238328,343000,778688,1000000,1030301,1331000,5177717,7077888,
%U A030295 8000000,9393931,27000000,64000000,343000000,700227072
%N A030295 Cubes with at most three distinct digits.
%H A030295 Hugo Pfoertner, <a href="/A030295/b030295.txt">Table of n, a(n) for n = 1..111</a>
%F A030295 a(n) = A030294(n)^3. - _Peter Munn_, Feb 02 2020
%t A030295 Select[Range[900]^3, Length@ Union@ IntegerDigits[#] <= 3 &] (* _Michael De Vlieger_, Feb 10 2020 *)
%o A030295 (PARI)  disdigs(n,nd)={my(v=vector(10),d=digits(n^3));for(j=1,#d,v[d[j]+1]=1);if(vecsum(v)<=nd,n^3,0)};
%o A030295 print1(0,", ");for(k=1,1000,if(j=disdigs(k,3),print1(j,", "))) \\ _Hugo Pfoertner_, Feb 10 2020
%Y A030295 Cf. A030293 (subsequence), A030294, A235718.
%K A030295 nonn,base
%O A030295 1,3
%A A030295 _Patrick De Geest_