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!)
A080371 a(n) is the smallest x such that the quotient d(x+1)/d(x) equals n, where d = A000005. 7

%I #35 Jan 27 2021 08:26:40

%S 2,1,11,23,47,59,191,167,179,239,5119,359,20479,2111,719,839,983039,

%T 1259,786431,3023,2879,15359,62914559,3359,22031,266239,6299,6719,

%U 13690208255,5039,22548578303,7559,156671,6881279,25919,10079,1168231104511,5505023,479231,21839

%N a(n) is the smallest x such that the quotient d(x+1)/d(x) equals n, where d = A000005.

%C a(37) > 10^12. - _Donovan Johnson_, Sep 02 2013

%C Conjecture: a(p) = 2^(p-1) * k - 1 for some k > 0 and prime p. - _David A. Corneth_, Jan 26 2021

%H David A. Corneth, <a href="/A080371/b080371.txt">Table of n, a(n) for n = 1..196</a>

%H Donovan Johnson, <a href="/A080371/a080371.txt">All 435 terms <= 10^12</a>

%F a(n) = Min_{x : d[x+1]/d[x] = n}.

%F a(n) = A086551(n) - 1. - _Hugo Pfoertner_, Jan 26 2021

%e n = 49: a(49) = 233279 = m, d(m+1) = 98, d(m) = 2, quotient = 49.

%t t = Table[ 0, {50}]; Do[ s = DivisorSigma[0, n+1] / DivisorSigma[0, n]; If[ s < 51 && t[[s]] == 0, t[[s]] = n], {n, 1, 10^8}]; t

%o (PARI) {a(n) = my(k=1); while(numdiv(k+1)!=n*numdiv(k), k++); k} \\ _Seiichi Manyama_, Jan 17 2021

%Y Cf. A000005, A080372.

%K nonn

%O 1,1

%A _Labos Elemer_, Feb 24 2003

%E More terms from _Robert G. Wilson v_, Feb 27 2003

%E a(29) and a(31) from _Donovan Johnson_, Dec 26 2012

%E More terms from _David A. Corneth_, Jan 27 2021

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 March 28 12:26 EDT 2024. Contains 371254 sequences. (Running on oeis4.)