A256431 Numbers A055744(n) such that for any k < n, A055744(k) and A055744(n) do not have all their prime factors in common.
1, 4, 18, 50, 294, 450, 578, 1014, 1210, 2166, 5202, 7350, 8214, 10890, 14450, 16810, 25350, 28830, 31974, 35322, 49686, 54150, 56454, 58190, 71286, 77658, 84966, 102010, 106134, 111630, 130050, 132098, 151290, 159414, 177870, 205350, 219102, 223494, 293046, 349690, 366054, 402486, 486798, 523710, 536298, 613470
Offset: 1
Keywords
Examples
a(3) = 18 is in A055744 and it is the smallest number in A055744 having prime factors 2 and 3. a(6) = 450 is in A055744 and it is divisible by a(3) = 18 and by a(4) = 50 but it is the smallest element in A055744 having prime factors 2, 3 and 5.
Links
- David A. Corneth, Table of n, a(n) for n = 1..2553 (all < 10^11)
Programs
-
PARI
isA055744(n)=my(f=factor(n)); f[,1]==factor(eulerphi(f))[,1] is(n)=my(f=factor(n),r=factorback(f[,1])); for(i=1,#f~,f[i,2]--); sumdiv(f,d,isA055744(d*r))==1 \\ Charles R Greathouse IV, May 26 2015
Comments