A162199 Odd cyclops numbers.
101, 103, 105, 107, 109, 201, 203, 205, 207, 209, 301, 303, 305, 307, 309, 401, 403, 405, 407, 409, 501, 503, 505, 507, 509, 601, 603, 605, 607, 609, 701, 703, 705, 707, 709, 801, 803, 805, 807, 809, 901, 903, 905, 907, 909, 11011, 11013, 11015, 11017
Offset: 1
Programs
-
Maple
isA134808 := proc(n) local dgs,ndgs,d ; dgs := convert(n,base,10) ; ndgs := nops(dgs) ; if ndgs mod 2 = 0 then false; else for d from 1 to ndgs do if d = (ndgs+1)/2 and op(d,dgs) <> 0 then RETURN(false); elif d <> (ndgs+1)/2 and op(d,dgs) = 0 then RETURN(false); fi; od: true; fi; end: for n from 1 to 11100 by 2 do if isA134808(n) then printf("%d,",n) ; fi; od: # R. J. Mathar, Jul 13 2009
Extensions
More terms from R. J. Mathar, Jul 13 2009