Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A109848
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A109848 Highest common factor of n and its 9's complement. +0
2
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; listen)
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 this_sequence A104146 A133705 A046111

Adjacent sequences: A109845 A109846 A109847 this_sequence 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

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 24 14:25 EST 2009. Contains 167438 sequences.


AT&T Labs Research