Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A056013
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A056013 Numbers n such that n | Sigma(n) - d(n) + Phi(n). +0
1
1, 2, 27, 65120, 3332064 (list; graph; listen)
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 this_sequence A007257 A045487 A022376

Adjacent sequences: A056010 A056011 A056012 this_sequence A056014 A056015 A056016

KEYWORD

nonn

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Jul 24 2000

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified December 16 17:18 EST 2009. Contains 170825 sequences.


AT&T Labs Research