(MAGMAMagma) f:=func<n|&+[d[2]: d in Factorization(n)] eq 2>; [k:k in [1..2100000]|forall{m:m in [0..9]|f(k+6^m)}]; // Marius A. Burtea, Dec 20 2019
(MAGMAMagma) f:=func<n|&+[d[2]: d in Factorization(n)] eq 2>; [k:k in [1..2100000]|forall{m:m in [0..9]|f(k+6^m)}]; // Marius A. Burtea, Dec 20 2019
editing
approved
Charles R Greathouse IV, <a href="/A330508/b330508.txt">Table of n, a(n) for n = 1..10000</a>
approved
editing
proposed
approved
editing
proposed
a(2620) = 530079693 is the first multiple of 3 in this sequence; there are no multiples of 2. - Charles R Greathouse IV, Dec 20 2019
Subsequence of A076274.
v=Listis(n); forprime=for(pt=2, 1e6, 0, 9, if(is!issemi(2*p-1n+6^t), listputreturn(v, 2*p-0))); 1))); Vec(v) \\ Charles R Greathouse IV, Dec 20 2019
Subsequence of A076274.
(PARI) issemi(n)=bigomega(n)==2
v=List(); forprime(p=2, 1e6, if(is(2*p-1), listput(v, 2*p-1))); Vec(v) \\ Charles R Greathouse IV, Dec 20 2019
Subsequence of A076274.
proposed
editing
editing
proposed