OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
Ed Pegg Jr., 'Binary' Puzzle
Eric M. Schmidt, Sage code to compute this sequence (use b=7)
Chai Wah Wu, Pigeonholes and repunits, Amer. Math. Monthly, 121 (2014), 529-533.
MATHEMATICA
With[{cl=Rest[{FromDigits[#, 7], FromDigits[#]}&/@Tuples[{0, 1}, 7]]}, Table[SelectFirst[cl, Mod[ #[[1]], n]==0&], {n, 50}]][[;; , 1]] (* Harvey P. Dale, Feb 01 2024 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Eric M. Schmidt, Jul 09 2014
EXTENSIONS
Data corrected, Offset corrected, Mathematica program corrected and replaced, and b-file replaced by Harvey P. Dale, Feb 01 2024
STATUS
approved