The On-Line Encyclopedia of Integer Sequences (OEIS)

Revision History for A060283 (Bold, blue-underlined text is an addition; faded, red-underlined text is a ~~deletion~~.)
Showing entries 1-10 | older changes

A060283

Periodic part of decimal expansion of reciprocal of n-th prime (leading 0's moved to end).
(history; published version)

#32 by Harvey P. Dale at Sat Jul 10 19:25:46 EDT 2021

STATUS

editing

approved

#31 by Harvey P. Dale at Sat Jul 10 19:25:43 EDT 2021

MATHEMATICA

Table[FromDigits[FindTransientRepeat[RealDigits[1/p, 10, 100][[1]], 2][[2]]], {p, Prime[Range[20]]}] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 10 2021 *)

STATUS

approved

editing

#30 by Bruno Berselli at Tue Dec 29 03:03:05 EST 2015

STATUS

reviewed

approved

#29 by Joerg Arndt at Tue Dec 29 02:37:48 EST 2015

STATUS

proposed

reviewed

#28 by M. F. Hasler at Mon Dec 28 15:44:52 EST 2015

STATUS

editing

proposed

#27 by M. F. Hasler at Mon Dec 28 15:44:20 EST 2015

FORMULA

A060283 = A036275 o A000040, i.e., a(n) = A036275(A000040(n)). - M. F. Hasler, Dec 28 2015

STATUS

approved

editing

#26 by N. J. A. Sloane at Sat Mar 08 22:55:01 EST 2014

STATUS

reviewed

approved

#25 by Michel Marcus at Sat Mar 08 12:56:29 EST 2014

STATUS

proposed

reviewed

#24 by Michel Marcus at Thu Mar 06 05:54:50 EST 2014

STATUS

editing

proposed

#23 by Michel Marcus at Thu Mar 06 05:54:22 EST 2014

PROG

(PARI) a(n)=t=iferr(znorder(Mod(10, n)), E, 0); d=(10^t-1)/n; s=t-#Str(d); if(s, d*10^s, d)

STATUS

proposed

editing

Discussion

Thu Mar 06

05:54

Michel Marcus: programming language must be said