A056013 - OEIS

This site is supported by donations to The OEIS Foundation.

A056013

Numbers n such that n | Sigma(n) - d(n) + Phi(n).

1, 2, 27, 65120, 3332064 (list; graph; refs; listen; history; internal format)

	OFFSET	`1,2`
	MATHEMATICA	`Do[If[Mod[DivisorSigma[1, n]-DivisorSigma[0, n]+EulerPhi[n], n]==0, Print[n]], {n, 1, 10^7}]`
	CROSSREFS	`Sequence in context: A015217 A113094 A076113 * A007257 A045487 A022376` `Adjacent sequences: A056010 A056011 A056012 * A056014 A056015 A056016`
	KEYWORD	`nonn`
	AUTHOR	`Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 24 2000`

Content is available under The OEIS End-User License Agreement .

Last modified February 14 18:05 EST 2012. Contains 205664 sequences.