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.

A316494 Matula-Goebel numbers of locally disjoint rooted identity trees, meaning no branch overlaps any other branch of the same root.

This page as a plain text file.
%I A316494 #8 Jul 05 2018 02:30:51
%S A316494 1,2,3,5,6,10,11,13,15,22,26,29,30,31,33,41,47,55,58,62,66,79,82,93,
%T A316494 94,101,109,110,113,123,127,137,141,143,145,155,158,165,179,186,202,
%U A316494 205,211,218,226,246,254,257,271,274,282,286,290,293,310,317,327,330
%N A316494 Matula-Goebel numbers of locally disjoint rooted identity trees, meaning no branch overlaps any other branch of the same root.
%C A316494 A prime index of n is a number m such that prime(m) divides n. A number is in the sequence iff either it is equal to 1, it is a prime number whose prime index already belongs to the sequence, or its prime indices are pairwise coprime, distinct, and already belong to the sequence.
%e A316494 The sequence of all locally disjoint rooted identity trees preceded by their Matula-Goebel numbers begins:
%e A316494    1: o
%e A316494    2: (o)
%e A316494    3: ((o))
%e A316494    5: (((o)))
%e A316494    6: (o(o))
%e A316494   10: (o((o)))
%e A316494   11: ((((o))))
%e A316494   13: ((o(o)))
%e A316494   15: ((o)((o)))
%e A316494   22: (o(((o))))
%e A316494   26: (o(o(o)))
%e A316494   29: ((o((o))))
%e A316494   30: (o(o)((o)))
%e A316494   31: (((((o)))))
%t A316494 primeMS[n_]:=If[n===1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
%t A316494 Select[Range[1000],Or[#==1,And[SquareFreeQ[#],Or[PrimeQ[#],CoprimeQ@@primeMS[#]],And@@#0/@primeMS[#]]]&]
%Y A316494 Cf. A000081, A004111, A007097, A276625, A277098, A302696, A303362, A304713, A316467, A316471, A316474, A316495.
%K A316494 nonn
%O A316494 1,2
%A A316494 _Gus Wiseman_, Jul 04 2018