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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A238579 Home prime sequence (see A037274) starting at 146. 1
146, 273, 3713, 4779, 333359, 1325643, 3111717139, 29177760383, 69142225413, 3471134339561, 7980350584141, 1324115101168677, 33147123900129853, 1941131324815763997, 37816317113233982621, 291304010934939102849, 333777134924210136703397, 7409854792211363875345439 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Second sequence of this kind with as yet unknown trajectory (see A037274, A056938). - J. Lowell, Apr 27 2017

LINKS

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

Wikipedia, Home prime

EXAMPLE

146 = 2*73 so next term is 273; 273 = 3*7*13 so next term is 3713.

MATHEMATICA

NestList[FromDigits@ Flatten@ Map[IntegerDigits, FactorInteger[#] /. {p_, e_} /; p >= 1 :> If[p == 1, 1, ConstantArray[p, e]]] &, 146, 17] (* Michael De Vlieger, Apr 27 2017 *)

PROG

(PARI) lista(nn) = {n = 146; for (i=1 , nn, print1(n, ", "); f = factor(n); s = ""; for (j=1, #f~, for (k=1, f[j, 2], s = concat(s, Str(f[j, 1])); ); ); n = eval(s); ); } \\ Michel Marcus, Mar 31 2014

CROSSREFS

Cf. A037274 (home primes), A056938.

Sequence in context: A135666 A119379 A118699 * A238028 A179572 A211838

Adjacent sequences:  A238576 A238577 A238578 * A238580 A238581 A238582

KEYWORD

nonn,base

AUTHOR

J. Lowell, Mar 30 2014

EXTENSIONS

One more term added by J. Lowell, Mar 30 2014

More terms from Jon E. Schoenfield, Mar 30 2014

One further term from N. J. A. Sloane, Mar 31 2014

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 20 20:02 EDT 2018. Contains 316402 sequences. (Running on oeis4.)