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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A093100 "Lucas-digits": start with "13", append sum of first 2 digits to the preceding number, drop first digit. 1
13, 34, 47, 711, 118, 182, 829, 2910, 91011, 101110, 11101, 11012, 10122, 1221, 2213, 2134, 1343, 3434, 4347, 3477, 4777, 77711, 771114, 7111414, 1114148, 1141482, 1414822, 4148225, 1482255, 4822555, 82255512, 225551210, 255512104, 555121047 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

There are only 7 primes in the first 1000 terms of this sequence.  The first 6 primes are 13, 47, 829, 2213, 77711, and 174111811681183993.  The 7th prime, a(920), has 214 digits. - Harvey P. Dale, Aug 04 2014

LINKS

Harvey P. Dale, Table of n, a(n) for n = 1..1000

EXAMPLE

a(4): sum of first 2 digits of a(3)=11, append 11 to 47 and get 4711, drop first digit and get 711.

MATHEMATICA

ld[n_]:=Module[{idn=IntegerDigits[n]}, FromDigits[Rest[Join[ idn, IntegerDigits[ Total[ Take[idn, 2]]]]]]]; NestList[ld, 13, 40] (* Harvey P. Dale, Aug 04 2014 *)

CROSSREFS

Cf. A093086-A093099.

Sequence in context: A164539 A245170 A134864 * A081271 A190458 A180673

Adjacent sequences:  A093097 A093098 A093099 * A093101 A093102 A093103

KEYWORD

nonn,base

AUTHOR

Bodo Zinser, Mar 22 2004

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 July 26 02:08 EDT 2017. Contains 289798 sequences.