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.

A354446 11-gonal numbers which are products of three distinct primes.

This page as a plain text file.
%I A354446 #46 Mar 10 2025 14:49:46
%S A354446 30,506,606,715,1558,1730,3945,5083,6365,8558,9361,11986,12455,14935,
%T A354446 15458,17081,19371,19966,21183,25726,29971,32215,32981,37766,45551,
%U A354446 46461,51146,54065,57065,58083,62245,68758,74433,75595,76766,80333,86458,88971,90241
%N A354446 11-gonal numbers which are products of three distinct primes.
%C A354446 A squarefree subsequence of 11-gonal numbers.
%e A354446      30 =   3*(9*3   - 7)/2 =  2 *  3 *   5;
%e A354446     506 =  11*(9*11  - 7)/2 =  2 * 11 *  23;
%e A354446    3945 =  30*(9*30  - 7)/2 =  3 *  5 * 263;
%e A354446   80333 = 134*(9*134 - 7)/2 = 11 * 67 * 109.
%p A354446 q:= n-> is(map(x-> x[2], ifactors(n)[2])=[1$3]):
%p A354446 select(q, [n*(9*n-7)/2$n=1..200])[];  # _Alois P. Heinz_, Jun 15 2022
%t A354446 Select[Table[n*(9*n-7)/2, {n, 1, 150}], FactorInteger[#][[;; , 2]]=={1, 1, 1} &] (* _Amiram Eldar_, Jun 01 2022 *)
%Y A354446 Intersection of A051682 and A007304.
%K A354446 nonn
%O A354446 1,1
%A A354446 _Massimo Kofler_, Jun 01 2022