Displaying 1-3 of 3 results found.
page
1
6, 30, 32, 36, 60, 210, 212, 213, 214, 216, 240, 420, 2310, 2312, 2313, 2314, 2315, 2316, 2317, 2318, 2319, 2320, 2322, 2324, 2328, 2340, 2342, 2343, 2344, 2346, 2348, 2349, 2352, 2370, 2372, 2376, 2400, 2520, 2522, 2523, 2524, 2526, 2528, 2550, 2552, 2730, 4620, 4622, 4623, 4624, 4626, 4628, 4632, 4650, 4652, 4656
COMMENTS
Conjecture: Apart from the initial 6, the rest of terms are the numbers k for which A003415(k) > A276086(k), thus giving the positions of zeros in A351232. In other words, it seems that only k=6 satisfies A003415(k) = A276086(k). See also comments in A351088.
PROG
(PARI)
A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
CROSSREFS
Cf. A003415, A024451, A048103, A060735, A235991, A276085, A276086, A327862, A351088, A351089, A351232, A369656, A369663, A369664, A371104.
6, 7, 8, 12, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 42, 43, 60, 61, 62, 63, 64, 65, 66, 67, 68, 72, 90, 91, 92, 93, 96, 120, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231, 232, 234, 235, 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255
PROG
(PARI)
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
Numbers k such that ( A276086(k)/s)^s >= k^(s-1) and A276086(k) <= A003415(k), where A003415 is the arithmetic derivative, A276086 is the primorial base exp-function, and s = bigomega(k).
+10
3
6, 213, 214, 2315, 2317, 2319, 2342, 2343, 2348, 2349, 2372, 2523, 2524, 2526, 2552, 4622, 4623, 4628, 4652, 6932, 6936, 6960, 30041, 30043, 30046, 30052, 30054, 30062, 30074, 30075, 30076, 30093, 30094, 30098, 30100, 30102, 30150, 30242, 30245, 30249, 30254, 30256, 30258, 30273, 30274, 30282, 32343, 32345, 32347
PROG
(PARI)
A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
A276086(n) = { my(m=1, p=2); while(n, m *= (p^(n%p)); n = n\p; p = nextprime(1+p)); (m); };
isA370128(n) = { my(x= A276086(n), s=bigomega(n)); ((x<= A003415(n)) && ((x/s)^s >= n^(s-1))); };
Search completed in 0.006 seconds
|