The On-Line Encyclopedia of Integer Sequences (OEIS)

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

A119714

a(n) is the least k such that the remainder when 8^k is divided by k is n.
(history; published version)

#17 by Max Alekseyev at Sat Jul 24 09:52:00 EDT 2021

STATUS

editing

approved

#16 by Max Alekseyev at Sat Jul 24 09:51:45 EDT 2021

COMMENTS

a(49) <= 122302226302391. - Max Alekseyev, Feb 04 2007

a(49) <= 1885511821439. - Joe K. Crump (joecr(AT)carolina.rr.com), Feb 10 2007

a(49) = 1885511821439. - Hagen von Eitzen, Jul 24 2009

EXTENSIONS

a(49) from Hagen von Eitzen, Jul 24 2009

STATUS

approved

editing

#15 by N. J. A. Sloane at Tue Jul 20 03:35:09 EDT 2021

STATUS

proposed

approved

#14 by Michel Marcus at Mon Jul 19 23:27:52 EDT 2021

STATUS

editing

proposed

#13 by Michel Marcus at Mon Jul 19 23:27:12 EDT 2021

MATHEMATICA

t = Table[0, {10000}]; k = 1; lst = {}; While[k < 4300000000, a = PowerMod[8, k, k]; If[ a<10001 && t[[a]]==0, t[[a]]=k; Print[{a, k}]]; k++ ]; t (* Mathematica coding extended to reflect the new search limits as posted in the a-file by _Robert G. Wilson v_, Jul 17 2009 *)

EXTENSIONS

Mathematica coding extended to reflect the new search limits as posted in the a-file by Robert G. Wilson v, Jul 17 2009

STATUS

proposed

editing

Discussion

Mon Jul 19

23:27

Michel Marcus: not sure Mma needs such a long comment ???

#12 by Jon E. Schoenfield at Mon Jul 19 19:47:40 EDT 2021

STATUS

editing

proposed

#11 by Jon E. Schoenfield at Mon Jul 19 19:46:27 EDT 2021

NAME

a(n) = is the least k such that the remainder when 8^k is divided by k is n.

COMMENTS

a(49) <= 122302226302391. - Max Alekseyev, Feb 04 2007

a(49) <= 1885511821439. - Joe K. Crump (joecr(AT)carolina.rr.com), Feb 10 2007

a(49) = 1885511821439. - Hagen von Eitzen, Jul 24 2009

a(61) = 1802190094793 = 11 * 59 * 17839 * 155663. - Hagen von Eitzen, Jul 28 2009

EXTENSIONS

Mathematica coding extended to reflect the new search limits as posted in the a(49) <= 122302226302391 from _Max Alekseyev_, Feb 04 2007-file by _Robert G. Wilson v_, Jul 17 2009

a(49) <= 1885511821439 from Joe K. Crump (joecr(AT)carolina.rr.com), Feb 10 2007

I extended the Mathematica coding to reflect the new search limits as posted in the b text file Robert G. Wilson v, Jul 17 2009

Value of a(49) as conjectured by J. K. Crump verified by Hagen von Eitzen, Jul 24 2009

a(61) = 1802190094793 = 11 * 59 * 17839 * 155663. [From Hagen von Eitzen, Jul 28 2009]

STATUS

approved

editing

Discussion

Mon Jul 19

19:46

Jon E. Schoenfield: Move of Extensions contents to Comments okay?

19:47

Jon E. Schoenfield: Should the Extensions entry be changed to comment after the Mmca code, or left in Extensions?

#10 by Charles R Greathouse IV at Wed Oct 02 15:12:51 EDT 2013

AUTHOR

_Ryan Propper (rpropper(AT)stanford.edu), _, Jun 12 2006

Discussion

Wed Oct 02

15:12

OEIS Server: https://oeis.org/edit/global/1961

#9 by Russ Cox at Sat Mar 31 14:12:21 EDT 2012

EXTENSIONS

Value of a(49) as conjectured by J. K. Crump verified by _Hagen von Eitzen (math(AT)von-eitzen.de), _, Jul 24 2009

a(61) = 1802190094793 = 11 * 59 * 17839 * 155663. [From _Hagen von Eitzen (math(AT)von-eitzen.de), _, Jul 28 2009]

Discussion

Sat Mar 31

14:12

OEIS Server: https://oeis.org/edit/global/932

#8 by Russ Cox at Fri Mar 30 17:31:18 EDT 2012

EXTENSIONS

I extended the Mathematica coding to reflect the new search limits as posted in the b text file _Robert G. Wilson v (rgwv(AT)rgwv.com), _, Jul 17 2009

Discussion

Fri Mar 30

17:31

OEIS Server: https://oeis.org/edit/global/156