id:A087233 - OEIS Search Results

Search: id:A087233

Displaying 1-1 of 1 results found.

page 1

a(n)=floor[sigma[A002110(n)]/A002110(n)]; integer quotient of divisor-sum of primorial numbers and primorials.

+0
1

1, 2, 2, 2, 2, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6 (list; graph; listen)

	OFFSET	`1,2`
	MATHEMATICA	`q[x_] := Apply[Times, Table[Prime[w], {w, 1, x}]]; q[0]=1; Table[Floor[DivisorSigma[1, a=q[u]]/q[u]//N], {u, 1, 300}]`
	CROSSREFS	`Cf. A000203, A002110.` `Sequence in context: A111656 A165118 A025423 this_sequence A104147 A052146 A097882` `Adjacent sequences: A087230 A087231 A087232 this_sequence A087234 A087235 A087236`
	KEYWORD	`nonn`
	AUTHOR	`Labos E. (labos(AT)ana.sote.hu), Sep 01 2003`

page 1

Search completed in 0.002 seconds

Last modified December 10 12:37 EST 2009. Contains 170569 sequences.

AT&T Labs Research