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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A108090 Numbers of the form (11^i)*(13^j). 20
1, 11, 13, 121, 143, 169, 1331, 1573, 1859, 2197, 14641, 17303, 20449, 24167, 28561, 161051, 190333, 224939, 265837, 314171, 371293, 1771561, 2093663, 2474329, 2924207, 3455881, 4084223, 4826809, 19487171, 23030293, 27217619 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

MATHEMATICA

mx = 3*10^7; Sort@ Flatten@ Table[ 11^i*13^j, {i, 0, Log[11, mx]}, {j, 0, Log[13, mx/11^i]}] (* Robert G. Wilson v, Aug 17 2012 *)

fQ[n_]:=PowerMod[143, n, n] == 0; Select[Range[2 10^7], fQ] (* Vincenzo Librandi, Jun 27 2016 *)

PROG

(Haskell)

import Data.Set (singleton, deleteFindMin, insert)

a108090 n = a108090_list !! (n-1)

a108090_list = f $ singleton (1, 0, 0) where

   f s = y : f (insert (11 * y, i + 1, j) $ insert (13 * y, i, j + 1) s')

         where ((y, i, j), s') = deleteFindMin s

-- Reinhard Zumkeller, May 15 2015

(MAGMA) [n: n in [1..10^7] | PrimeDivisors(n) subset [11, 13]]; // Vincenzo Librandi, Jun 27 2016

(PARI) list(lim)=my(v=List(), t); for(j=0, logint(lim\=1, 13), t=13^j; while(t<=lim, listput(v, t); t*=11)); Set(v) \\ Charles R Greathouse IV, Aug 29 2016

CROSSREFS

Cf. A003586, A003592, A003593, A003591, A003594, A003595, A003596, A003597, A003598, A003599, A107326, A107364, A107466, A108056.

Sequence in context: A089824 A276694 A086549 * A136296 A094621 A178426

Adjacent sequences:  A108087 A108088 A108089 * A108091 A108092 A108093

KEYWORD

nonn

AUTHOR

Douglas Winston (douglas.winston(AT)srupc.com), Jun 03 2005

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 May 20 20:16 EDT 2019. Contains 323426 sequences. (Running on oeis4.)