A134439 -id:A134439 - cp's OEIS frontend

A134962 Numbers n with property that for each single digit d of n, we can also see the decimal expansion of d^2 as a substring of n. Also n may not contain any 0 digits.

1, 11, 111, 1111, 11111, 111111, 1111111, 3648169, 3649816, 3681649, 3698164, 8163649, 8164369, 8164936, 8169364, 9364816, 9368164, 9816364, 9816436, 11111111, 13648169, 13649816, 13681649, 13698164, 16364819, 16364981

Offset: 1

Zak Seidov and N. J. A. Sloane, Feb 03 2008

The number of terms less than 10^k: 1, 2, 3, 4, 5, 6, 19, 410, 8083, ... . - Robert G. Wilson v, Jan 06 2012

			In 3648169, for 3 we can see 9, for 6 we can see 36, for 4 we can see 16, for 8 we can see 64, for 1 we can see 1 and for 9 we can see 81.

Robert G. Wilson v, Table of n, a(n) for n = 1..11523 (first 300 terms from David Applegate)

Cf. A134439, A134692, A134698, A135463, A135464.

fQ[n_] := (id = IntegerDigits@ n; Union[id][[1]] != 0 && Sort[ StringPosition[ ToString[n], ToString[#]] & /@ Evaluate[ id^2]][[1]] != {}); k = 0; lst = {}; While[k < 2*10^7, If[fQ@k, AppendTo[lst, k]; Print@ k]; k++] (* Robert G. Wilson v, Jan 06 2012 *)

sq = {d:str(int(d)**2) for d in "123456789"}
def ok(n): return "0" not in (s:=str(n)) and all(sq[d] in s for d in set(s))
print([k for k in range(10**7) if ok(k)]) # Michael S. Branicky, May 05 2023

a(9) onwards computed by David Applegate, Feb 03 2008

A134698 Self-power numbers (or SPN's): numbers n with property that for each single digit d of n, we can also see the decimal expansion of the d-th power of some number as a substring of n and also n contains no 0's or 1's.

Original entry on oeis.org

32564, 232564, 256432, 322564, 325642, 325643, 325644, 325645, 325646, 325648, 325664, 332564, 432564, 532564, 632564, 643256, 832564, 2232564, 2256432, 2322564, 2325642, 2325643, 2325644, 2325645, 2325646, 2325648, 2325664, 2332564, 2432564, 2532564

Offset: 1

Eric Angelini, Jul 05 2005

Computed by M. F. Hasler, Feb 02 2008, Feb 03 2008

There are an infinite number of SPN's, since for example we can prefix n by any digit of n.

			n = 32564 is a member because we can see a cube (64) in n, a square (4 or 25), a fifth power (32), a sixth power (64) and a fourth power (256).

M. F. Hasler, Table of n, a(n) for n = 1..1158

Cf. A134949, A134947, A134439, A134692, A134948.

More terms from M. F. Hasler, Feb 02 2008

A134692 Numbers k with the property that for each digit d from 1 to 9, the decimal expansion of d^3 is a substring of k.

Original entry on oeis.org

1251216427293438, 1251216427298343, 1251216434327298, 1251216434382729, 1251216482729343, 1251216483432729, 1251272921643438, 1251272921648343, 1251272934321648, 1251272934382164, 1251272982164343, 1251272983432164

Offset: 1

Zak Seidov, Feb 02 2008

See A134439 for further information.

David Applegate, Table of n, a(n) for n = 1..300

Cf. A134439, A134698.

Corrected by David Applegate, Feb 09 2008

A134948 Self-factorial numbers: numbers n with property that for each single digit d of n, we can also see the decimal expansion of d! as a substring of n.

Original entry on oeis.org

1, 2, 10, 11, 12, 21, 22, 24, 100, 101, 102, 110, 111, 112, 120, 121, 122, 124, 201, 210, 211, 212, 221, 222, 224, 241, 242, 244, 424, 1000, 1001, 1002, 1010, 1011, 1012, 1020, 1021, 1022, 1024, 1100, 1101, 1102, 1110, 1111, 1112, 1120, 1121, 1122, 1124, 1200

Offset: 1

Alexander R. Povolotsky, Feb 02 2008

As 9 does not occur in d! for all d in {0..9}, all self-factorials cannot contain 9 as a digit, cf. A007095. - Reinhard Zumkeller, Sep 26 2014

			24 is a self-factorial number because we can see both 2! = 2 and 4! = 24 in the decimal expansion 24.

D. Applegate and R. Zumkeller, Table of n, a(n) for n = 1..10000 (first 300 terms from David Applegate)

Cf. A134698, A134947, A134439, A134692.

Cf. A000142.

import Data.List (nub, sort, isInfixOf)
a134948 n = a134948_list !! (n-1)
a134948_list = filter h [0..] where
   h x = all (`isInfixOf` xs)
             (map (fss !!) $ map (read . return) $ sort $ nub xs)
         where xs = show x
   fss = map show $ take 10 a000142_list
-- Reinhard Zumkeller, Sep 26 2014

isA134948 := proc(n) local nbase10,dgs,d,dfac ; nbase10 := convert(n,base,10) ; dgs := convert(nbase10,set) ; for d in dgs do dfac := convert(d!,base,10) ; if verify(dfac,nbase10,'sublist') = false then RETURN(false) ; fi ; od: RETURN(true) ; end: for n from 1 to 10000 do if isA134948(n) then printf("%d ",n) ; fi ; od: # R. J. Mathar, Feb 05 2008

a(1) - a(18) computed by N. J. A. Sloane, Feb 02 2008
a(19) onwards from David Applegate, Feb 09 2008
More terms from R. J. Mathar, Feb 05 2008

A135441 Numbers k such that for any single digit d of k the d-th semiprime sp(k) is substring of k.

Original entry on oeis.org

104, 410, 1004, 1014, 1040, 1041, 1044, 1104, 1410, 4010, 4100, 4101, 4104, 4110, 4410, 10004, 10014, 10040, 10041, 10044, 10104, 10114, 10140, 10141, 10144, 10145, 10400, 10401, 10404, 10410, 10411, 10414, 10440, 10441, 10444, 10514, 11004, 11014, 11040

Offset: 1

Zak Seidov, Feb 17 2008

sp(1..9)=4,6,9,10,14,15,21,22,25, with the convention that sp(0)=1.

David Applegate, Table of n, a(n) for n = 1..300

Cf. A134439, A134962, A135463.

Corrected and extended by David Applegate, Feb 18 2008

A135411 Numbers n with property that for each single digit d of n, we can also see the decimal expansion of d+2 as a substring of n.

Original entry on oeis.org

113579, 113597, 113759, 113795, 113957, 113975, 115379, 115397, 115739, 115793, 115937, 115973, 117359, 117395, 117539, 117593, 117935, 117953, 119357, 119375, 119537, 119573, 119735, 119753, 311579, 311597, 311759, 311795, 311957, 311975

Offset: 1

Zak Seidov, Feb 17 2008

There are exactly 120 six-digit such integers.
These include 24 primes: 113759, 113957, 115793, 117539, 311957, 351179, 375119, 511793, 531197, 539711, 573119, 579113, 579311, 591137, 593711, 711539, 739511, 751139, 751193, 759113, 793511, 911357, 937511, 971153;
and 36 semiprimes: 113579, 115397, 115937, 117953, 119537, 119573, 119753, 311579, 311759, 359117, 375911, 379511, 391157, 395711, 397115, 511379, 511397, 511739, 539117, 571139, 593117, 711593, 731195, 753119, 753911, 791135, 911573, 931157, 935117, 935711, 937115, 951137, 957113, 957311, 975113, 975311.

Cf. A134439, A134692, A134948, A135015, A135016, A135463, A135495.

cp's OEIS Frontend

A134962 Numbers n with property that for each single digit d of n, we can also see the decimal expansion of d^2 as a substring of n. Also n may not contain any 0 digits.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Python

Extensions

A134698 Self-power numbers (or SPN's): numbers n with property that for each single digit d of n, we can also see the decimal expansion of the d-th power of some number as a substring of n and also n contains no 0's or 1's.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Extensions

A134692 Numbers k with the property that for each digit d from 1 to 9, the decimal expansion of d^3 is a substring of k.

Views

Author

Keywords

Comments

Links

Crossrefs

Extensions

A134948 Self-factorial numbers: numbers n with property that for each single digit d of n, we can also see the decimal expansion of d! as a substring of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Maple

Extensions

A135441 Numbers k such that for any single digit d of k the d-th semiprime sp(k) is substring of k.

Views

Author

Keywords

Comments

Links

Crossrefs

Extensions

A135411 Numbers n with property that for each single digit d of n, we can also see the decimal expansion of d+2 as a substring of n.

Views

Author

Keywords

Comments

Crossrefs