id:A071625 - OEIS Search Results

Search: id:A071625

Displaying 1-1 of 1 results found.

page 1

Number of distinct exponents when n is factorized as a product of primes.

+0
5

0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 2, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 2, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 2, 1, 2, 2, 1, 1, 1, 1, 2, 1 (list; graph; listen)

	OFFSET	`1,12`
	EXAMPLE	`n=5040=2.2.2.2.3.3.5.7, three different exponents arise:4,2 and 1; a(5040)=3`
	MATHEMATICA	`ffi[x_] := Flatten[FactorInteger[x]] lf[x_] := Length[FactorInteger[x]] ep[x_] := Table[Part[ffi[x], 2*w], {w, 1, lf[x]}] Table[Length[Union[ep[w]]], {w, 1, 256}]`
	CROSSREFS	`Cf. A051903, A051904.` `Sequence in context: A058060 A088323 A003652 this_sequence A049100 A030612 A120698` `Adjacent sequences: A071622 A071623 A071624 this_sequence A071626 A071627 A071628`
	KEYWORD	`nonn`
	AUTHOR	`Labos E. (labos(AT)ana.sote.hu), May 29 2002`

page 1

Search completed in 0.002 seconds

Last modified November 24 23:16 EST 2009. Contains 167481 sequences.

AT&T Labs Research