for(n in 9:762){v=2:n
if(length(v[!n%%v&n%%v^3])==7)write(n,'')}