|
| |
|
|
A109848
|
|
Highest common factor of n and its 9's complement.
|
|
1
| |
|
|
1, 1, 3, 1, 1, 3, 1, 1, 9, 1, 11, 3, 1, 1, 3, 1, 1, 9, 1, 1, 3, 11, 1, 3, 1, 1, 9, 1, 1, 3, 1, 1, 33, 1, 1, 9, 1, 1, 3, 1, 1, 3, 1, 11, 9, 1, 1, 3, 1, 1, 3, 1, 1, 9, 11, 1, 3, 1, 1, 3, 1, 1, 9, 1, 1, 33, 1, 1, 3, 1, 1, 9, 1, 1, 3, 1, 11, 3, 1, 1, 9, 1, 1, 3, 1, 1, 3, 11, 1, 9, 1, 1, 3, 1, 1, 3, 1, 1, 99, 1, 1, 3
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
EXAMPLE
| a(55)=11 because 9-complement of 55 is 99-55=44 and the greatest common divisor of 44 and 55 is 11.
|
|
|
MAPLE
| digs := proc(inp::integer) local resul, shiftinp : resul := 1 : shiftinp := iquo(inp, 10) : while shiftinp > 0 do resul := resul+1 : shiftinp := iquo(shiftinp, 10) : od : RETURN(resul) : end: nin := proc(inp::integer) RETURN(10^digs(inp)-1-inp) : end : for n from 1 to 80 do comp := nin(n) ; #print(n, comp, gcd(n, comp)) ; printf("%d, ", gcd(n, comp)) ; od : - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Mar 27 2006
|
|
|
CROSSREFS
| Cf. A109847, A084021.
Sequence in context: A038500 A091840 A083985 * A104146 A193179 A133705
Adjacent sequences: A109845 A109846 A109847 * A109849 A109850 A109851
|
|
|
KEYWORD
| base,easy,nonn
|
|
|
AUTHOR
| Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Jul 06 2005
|
|
|
EXTENSIONS
| Corrected and extended by R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Mar 27 2006
More terms from Joshua Zucker (joshua.zucker(AT)stanfordalumni.org), May 03 2006
|
| |
|
|
