login
A111229
Where n appears in A111267.
4
1, 3, 10, 5, 2, 57, 8, 11, 20, 9, 17, 97, 49, 13, 103, 27, 4, 113, 23, 25, 40, 53, 41, 99, 51, 61, 26, 33, 7, 105, 39, 83, 76, 37, 180, 119, 29, 45, 166, 31, 6, 305, 50, 87, 242, 163, 79, 169, 139, 89, 179, 117, 121, 187, 91, 115, 70, 149, 30, 195, 151, 73, 270, 171, 131, 175
OFFSET
1,2
LINKS
MAPLE
INVERSE := proc(a) local b, c, i, n, hit, ulim; if whattype(a) <> list then RETURN([]); fi: c:=sort(a); b:=[]; ulim:=min(1000, c[nops(c)]); for n from c[1] to ulim do hit:=0; for i from 1 to nops(a) do if a[i]=n then b:=[op(b), i]; hit:=1; break; fi; od; if hit = 0 then RETURN(b); fi; od; end:
CROSSREFS
Cf. A111267.
Sequence in context: A003620 A235923 A192028 * A100984 A045985 A247034
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 03 2005
STATUS
approved