id:A082119 - OEIS Search Results

Search: id:A082119

Displaying 1-1 of 1 results found.

page 1

Smallest positive difference between d and n/d for any divisor d of n.

+0
2

1, 2, 3, 4, 1, 6, 2, 8, 3, 10, 1, 12, 5, 2, 6, 16, 3, 18, 1, 4, 9, 22, 2, 24, 11, 6, 3, 28, 1, 30, 4, 8, 15, 2, 5, 36, 17, 10, 3, 40, 1, 42, 7, 4, 21, 46, 2, 48, 5, 14, 9, 52, 3, 6, 1, 16, 27, 58, 4, 60, 29, 2, 12, 8, 5, 66, 13, 20, 3, 70, 1, 72, 35, 10, 15, 4, 7, 78, 2, 24, 39, 82, 5 (list; graph; listen)

	OFFSET	`2,2`
	COMMENT	`a(n)=A056737(n) for nonsquare n. a(p)=p-1 for prime p.`
	PROGRAM	`(PARI) for(n=3, 100, v=divisors(n):r=sqrt(n):t=0:for(k=1, length(v), if(v[k]>=r, t=k:break)):if(v[t]^2==n, u=t, u=t-1):if(v[t]-v[u]<1, u=u-1:t=t+1):print1(v[t]-v[u]", "))`
	CROSSREFS	`Cf. A082120, A056737.` `Sequence in context: A069817 A071439 A100941 this_sequence A129708 A071518 A065338` `Adjacent sequences: A082116 A082117 A082118 this_sequence A082120 A082121 A082122`
	KEYWORD	`nonn,easy`
	AUTHOR	`Ralf Stephan (ralf(AT)ark.in-berlin.de), Apr 04 2003`

page 1

Search completed in 0.002 seconds

Last modified July 6 17:22 EDT 2008. Contains 140988 sequences.

AT&T Labs Research