OFFSET
1,1
COMMENTS
Composite terms of A051948.
REFERENCES
J. Roberts, Lure of the Integers, Math. Assoc. America, 1992, p. 147.
M. V. Subbarao, On two congruences for primality. Pacific J. Math. 52 (1974), 261-268.
MATHEMATICA
Select[Range[4, 100], ! PrimeQ[#] && Mod[#*DivisorSigma[1, # ] - 2 , EulerPhi[#]] == 0 &] (* Jean-François Alcover, Sep 16 2013 *)
CROSSREFS
KEYWORD
nonn,fini,full,bref
AUTHOR
EXTENSIONS
Definition corrected by Tanya Khovanova, Nov 05 2007
STATUS
approved