cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A324584 Numbers n that share a prime factor with A276086(n).

This page as a plain text file.
%I A324584 #6 Mar 10 2019 19:32:05
%S A324584 3,9,10,15,20,21,25,27,33,35,39,40,42,45,49,50,51,55,56,57,63,69,70,
%T A324584 75,77,80,81,84,85,87,91,93,98,99,100,105,110,111,112,115,117,119,123,
%U A324584 126,129,130,133,135,140,141,145,147,153,154,159,160,161,165,168,170,171,175,177,182,183,189,190,195,196,200,201,203,205
%N A324584 Numbers n that share a prime factor with A276086(n).
%C A324584 Numbers n for which A324198(n) <> 1.
%H A324584 Antti Karttunen, <a href="/A324584/b324584.txt">Table of n, a(n) for n = 1..10000</a>
%H A324584 <a href="/index/Pri#primorialbase">Index entries for sequences related to primorial base</a>
%H A324584 <a href="/index/Pri#primorial_numbers">Index entries for sequences related to primorial numbers</a>
%o A324584 (PARI)
%o A324584 A276086(n) = { my(i=0,m=1,pr=1,nextpr); while((n>0),i=i+1; nextpr = prime(i)*pr; if((n%nextpr),m*=(prime(i)^((n%nextpr)/pr));n-=(n%nextpr));pr=nextpr); m; };
%o A324584 A324198(n) = gcd(n,A276086(n));
%o A324584 for(n=1, oo, if(1!=A324198(n), print1(n, ", ")));
%Y A324584 Cf. A276086, A324198.
%Y A324584 Cf. A324583 (complement).
%K A324584 nonn
%O A324584 1,1
%A A324584 _Antti Karttunen_, Mar 10 2019