1,2

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

G.f.: x^2/(x - 1) + ((1 + x)*(log(1 - x) + psi(1, x)))/log(x) where psi(1,x) is the logarithmic derivative of the x-gamma function at z=1. Olivier Gérard, Jun 24 2012

(Haskell)

a092338 n = length $ filter (<= 1) $ map (mod n) [1..n]

-- Reinhard Zumkeller, Jul 04 2012

Sequence in context: A070546 A034586 A268383 * A199769 A030601 A049839

Adjacent sequences: A092335 A092336 A092337 * A092339 A092340 A092341

nonn

Reinhard Zumkeller, Mar 18 2004

Wrong comment removed by Reinhard Zumkeller, Jul 04 2012

approved