login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A074762 Fifth root of n contains n as a string of digits to the immediate right of the decimal point (excluding leading zeros). 8
633, 634, 635, 636, 637, 638, 639, 877, 878, 879, 880, 881, 882, 883, 884, 1185, 5061, 33459, 438240, 682290, 17263489, 188423892, 991790057, 7231603790, 75314706735, 62651040995719, 296757769625554, 4295141978111813, 14929328605861651, 516659008545595106 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Jon E. Schoenfield, Table of n, a(n) for n = 1..50

Jon E. Schoenfield, Magma code

Robert Tanniru, PARI Code

EXAMPLE

Fifth root of 33459 = 8.033459...

MATHEMATICA

f[n_] := Block[{l = Floor[ Log[10, n] + 1], rd = RealDigits[n^(1/5), 10, 24], id = IntegerDigits[n]}, rdd = Drop[ rd[[1]], rd[[2]]]; While[ rdd[[1]] == 0, rdd = Drop[ rdd, 1]]; Take[ rdd, l] == id]; Do[ If[ StringPosition[ ToString[ N[ n^(1/5), 24]], ToString[ n]] != {}, If[ f[n], Print[ n]]], {n, 2, 170000000}] (* Robert G. Wilson v, Jul 30 2004 *)

PROG

(PARI)

/* Uses PARI functions provided in link

* Note: does not predict 639 due to simplification error and

* 877-884 due to checking only first solutions to the Grafting Equation.

* Sample run uses a = [0, 16], b=10, p=5, direct=True */

GetAllGIs(0, 16, 10, 5, 1) \\ Robert Tanniru, Nov 20 2013

CROSSREFS

Cf. A074841, A232086, A232110.

Sequence in context: A154088 A321639 A185483 * A177684 A177214 A252124

Adjacent sequences:  A074759 A074760 A074761 * A074763 A074764 A074765

KEYWORD

nonn,base

AUTHOR

Paul Lusch, Sep 06 2002

EXTENSIONS

Edited and extended by Robert G. Wilson v, Jul 31 2004

a(22)-a(25) by Robert Tanniru, Nov 20 2013

More terms from Jon E. Schoenfield, Aug 17 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 | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 29 17:41 EDT 2022. Contains 354913 sequences. (Running on oeis4.)