Table[Mod[Floor[N[(SpheroidalQS[2,0,10,x]+2/250)*170367],13],2],{x,-(226771/229000),-0.88,1/229}]