login
Two times the median of the set of distinct prime factors of n; a(1) = 2.
13

%I #6 Feb 15 2023 21:48:18

%S 2,4,6,4,10,5,14,4,6,7,22,5,26,9,8,4,34,5,38,7,10,13,46,5,10,15,6,9,

%T 58,6,62,4,14,19,12,5,74,21,16,7,82,6,86,13,8,25,94,5,14,7,20,15,106,

%U 5,16,9,22,31,118,6,122,33,10,4,18,6,134,19,26,10,142,5

%N Two times the median of the set of distinct prime factors of n; a(1) = 2.

%C The median of a multiset is either the middle part (for odd length), or the average of the two middle parts (for even length). Since the denominator is always 1 or 2, the median can be represented as an integer by multiplying by 2.

%e The prime factors of 336 are {2,2,2,2,3,7}, with distinct parts {2,3,7}, with median 3, so a(336) = 6.

%t Table[2*Median[First/@FactorInteger[n]],{n,100}]

%Y The union is 2 followed by A014091, complement of A014092.

%Y Distinct prime factors are listed by A027748.

%Y The version for divisors is A063655.

%Y Positions of odd terms are A100367.

%Y For mean instead of two times median we have A323171/A323172.

%Y The version for prime indices is A360005.

%Y The version for distinct prime indices is A360457.

%Y The version for prime factors is A360459.

%Y The version for prime multiplicities is A360460.

%Y Positions of even terms are A360552.

%Y The version for 0-prepended differences is A360555.

%Y A112798 lists prime indices, length A001222, sum A056239.

%Y A304038 lists distinct prime indices.

%Y A359893 and A359901 count partitions by median, odd-length A359902.

%Y Cf. A000975, A026424, A078174, A316413, A325347, A359907, A360006, A360248, A360453, A360550, A360551.

%K nonn

%O 1,1

%A _Gus Wiseman_, Feb 14 2023