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.

A318716 Heinz numbers of strict integer partitions with relatively prime parts in which no two parts are relatively prime.

This page as a plain text file.
%I A318716 #6 Sep 02 2018 17:07:54
%S A318716 2,17719,40807,43381,50431,74269,83143,101543,105703,116143,121307,
%T A318716 123469,139919,140699,142883,171613,181831,185803,191479,203557,
%U A318716 205813,211381,213239,215267,219271,246703,249587,249899,279371,286897,289007,296993,300847,303949
%N A318716 Heinz numbers of strict integer partitions with relatively prime parts in which no two parts are relatively prime.
%C A318716 The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).
%e A318716 The sequence of strict integer partitions with Heinz numbers in the sequence begins: (1), (15,10,6), (21,14,6), (20,15,6), (15,12,10), (45,10,6), (18,15,10).
%t A318716 Select[Range[100000],With[{m=PrimePi/@FactorInteger[#][[All,1]]},And[SquareFreeQ[#],GCD@@m==1,And@@(GCD[##]>1&)@@@Select[Tuples[m,2],Less@@#&]]]&]
%Y A318716 Cf. A078374, A289509, A302569, A302696, A302796, A302797, A303140, A303280, A303282, A303283, A305713, A318715, A318718, A318719.
%K A318716 nonn
%O A318716 1,1
%A A318716 _Gus Wiseman_, Sep 02 2018