cat("[3",(4:98)[3-(2:9)^2],"99]",sep=", ")