id:A067741 - OEIS Search Results

Search: id:A067741

Displaying 1-1 of 1 results found.

page 1

Integers y such that for some integer x we have uphi(x)=uphi(y)=x-y, where uphi(n)=A047994(n) is the unitary totient function: If n = Product p_i^e_i, uphi(n) = Product (p_i^e_i - 1).

+0
5

1, 36, 294, 504, 1830, 2142, 3042, 4746, 7380, 7782, 8100, 15642, 22734, 38610, 47736, 77166, 103320, 107114, 112110, 134070, 153270, 189434, 189954, 234024, 239850, 243438, 275834, 287790, 296646, 305910, 314262, 345042, 361350, 410424 (list; graph; listen)

	OFFSET	`0,2`
	MATHEMATICA	`uphi[n_] := Times@@(Power@@#-1&/@FactorInteger[n]); For[y=1, True, y++, If[uphi[x=y+(u=uphi[y])]==u, Print[{y, x}]]]`
	CROSSREFS	`Cf. A047994, A067739.` `Sequence in context: A014136 A091081 A017462 this_sequence A073972 A092643 A045786` `Adjacent sequences: A067738 A067739 A067740 this_sequence A067742 A067743 A067744`
	KEYWORD	`nonn`
	AUTHOR	`Yasutoshi Kohmoto (zbi74583(AT)boat.zero.ad.jp)`
	EXTENSIONS	`Edited by Dean Hickerson (dean.hickerson(AT)yahoo.com), Mar 07 2002`

page 1

Search completed in 0.002 seconds

Last modified November 25 08:46 EST 2009. Contains 167481 sequences.

AT&T Labs Research