Table[Round[ChebyshevT[791,n/633]/2+1/2],{n,622,639}]