The OEIS is supported by the many generous donors to the OEIS Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A254409 a(n) is the least x such that tau(x) divides (x-1)^n but not (x-1)^(n-1), for n >= 2. 1
 15, 135, 1155, 10395, 135135, 2297295, 57432375, 1003917915 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,1 COMMENTS So far, all terms appear to be multiples of 15. It appears that tau(a(n)) is equal to 2^n. For instance, for n=3, a(3)=135 and 135 has 2^3=8 divisors. The quotients tau(a(n))/(a(n)-1)^n are: 7^2, 67^3, 577^4, 5197^5, 67567^6, 1148647^7, 28716187^8, 501958957^9, ... - Michel Marcus, Feb 13 2015 Assuming that tau(a(n)) is 2^n (which would appear to follow from the minimality of a(n) and the fact that tau(a(n)) must be divisible by an n-th power), a(n)-1 would have to contain a solitary factor of 2, and so a(n) would be the least number congruent to 3 modulo 4 such that tau(a(n)) = 2^n. The next few terms would appear to be a(9)*25, a(9)*25*29, a(9)*25*29*37, a(9)*25*29*31*43, and a(9)*25*29*31*37*43. - Charlie Neder, Aug 19 2018 LINKS EXAMPLE tau(15) = 4; (15 - 1)^2 = 196 and 196 / 4 = 49. tau(135) = 8; (135 - 1)^3 = 2406104 and 2406104 / 8 = 300763. tau(1155) = 16; (1155 - 1)^4 = 1773467504656 and 1773467504656 / 16 = 110841719041. MAPLE with(numtheory):P:=proc(q) local a, j, k, n; for k from 2 to q do for n from 1 to q do if not isprime(n) then if type((n-1)^k/tau(n), integer) then if not type((n-1)^(k-1)/tau(n), integer) then print(n); break; fi; fi; fi; od; od; end: P(10^9); PROG (PARI) for(n=2, 10, forcomposite(x=1, , if(Mod((x-1)^n, numdiv(x))==0 && Mod((x-1)^(n-1), numdiv(x))!=0, print1(x, ", "); break({1})))) \\ Felix Fröhlich, Feb 12 2015 (PARI) isok(k, n) = {my(m = Mod(k-1, numdiv(k))); (m^(n-1) != 0) && (m^n == 0); } a(n) = {my(k=2); while(!isok(k, n), k++); k}; \\ Michel Marcus, Aug 20 2018 CROSSREFS Cf. A000005 (tau(n)), A234936, A254352. Sequence in context: A036217 A022643 A125378 * A155648 A126536 A299033 Adjacent sequences: A254406 A254407 A254408 * A254410 A254411 A254412 KEYWORD nonn,more AUTHOR Paolo P. Lava, Jan 30 2015 EXTENSIONS a(8)-a(9) from Felix Fröhlich, Feb 12 2015 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.

Last modified April 1 13:29 EDT 2023. Contains 361695 sequences. (Running on oeis4.)