login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A253643 Numbers n such that n^k is zeroless for k=0,...,3. 1
1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 12, 13, 14, 15, 17, 18, 19, 21, 23, 24, 25, 26, 27, 28, 29, 31, 35, 36, 38, 39, 41, 44, 46, 54, 56, 57, 58, 61, 62, 65, 66, 68, 72, 75, 76, 77, 81, 82, 83, 85, 88, 91, 92, 96, 111, 113, 114, 119, 121, 122, 125, 129, 132, 133, 136, 137, 139, 146, 154, 156, 157, 158, 161 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

See A252484 for the subsequence of numbers having this property up to k=4.

LINKS

Table of n, a(n) for n=1..73.

MATHEMATICA

Select[Range[200], AllTrue[#^Range[3], DigitCount[#, 10, 0]==0&]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jul 15 2015 *)

PROG

(PARI) is_A253643(n, K=3)=!forstep(k=K, 1, -1, vecmin(digits(n^k))||return)

(Python)

for n in range(100):

..s1, s2, s3 = str(n), str(n**2), str(n**3)

..if s1.find('0') + s2.find('0') + s3.find('0') == -3:

....print(n, end=', ') # Derek Orr, Mar 09 2015

CROSSREFS

Cf. A052382, A252484 (k <= 4), A253644 (k <= 5), A253645 (primes, k <= 5), A253647 (k <= 6), A253646 (primes, k <= 6), A124648 (k <= 7), A124649 (k <= 8).

Cf. A104264.

Sequence in context: A188301 A178160 A052044 * A050743 A306311 A028964

Adjacent sequences:  A253640 A253641 A253642 * A253644 A253645 A253646

KEYWORD

nonn,base,easy

AUTHOR

M. F. Hasler, Mar 09 2015

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified November 21 14:18 EST 2019. Contains 329371 sequences. (Running on oeis4.)