%I #47 Jan 29 2024 20:03:05
%S 7,14,105,1001,10003,100002,1000006,10000004,100000005,1000000001,
%T 10000000003,100000000002,1000000000006,10000000000004,
%U 100000000000005,1000000000000001,10000000000000003,100000000000000002,1000000000000000006,10000000000000000004,100000000000000000005
%N Smallest positive n-digit number divisible by 7.
%C The only semiprime terms are a(2) = 14 and a(n) such that (10^(n-1) + 3)/7 is a prime. - _Jon E. Schoenfield_, Jan 27 2024
%H <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (11,-10,-1,11,-10).
%F a(n) = (floor(10^(n-1)/7) + 1)*7.
%F a(n) = 10^(n-1) + A033940(n+2). - _Amiram Eldar_, Jan 27 2024
%F G.f.: 7*x*(1 - 9*x + 3*x^2 - x^3 - 3*x^4)/((1 - x)*(1 + x)*(1 - 10*x)*(1 - x + x^2)). - _Stefano Spezia_, Jan 28 2024
%e a(3) = 105 = 7*15.
%t a[n_] := 10^(n - 1) + {6, 4, 5, 1, 3, 2}[[Mod[n, 6, 1]]]; Array[a, 30]
%t (* or *)
%t LinearRecurrence[{11, -10, -1, 11, -10}, {7, 14, 105, 1001, 10003, 100002}, 30] (* _Amiram Eldar_, Jan 27 2024 *)
%Y Cf. A033940, A241217, A369613.
%K nonn,easy,base
%O 1,1
%A _J. Lowell_, Jan 25 2024
|