# [R], <s>35</s> 34 bytes

<!-- language-all: lang-r -->

 (u=(n=scan())-n%%2-1)-n+(15+u^2)/8

[Try it online!][TIO-jhv89mwb]

[R]: https://www.r-project.org/
[TIO-jhv89mwb]: https://tio.run/##K/r/X6PUViPPtjg5MU9DU1M3T1XVSNcQSGtrGJpql8YZaepb/Dc0@Q8A "R – Try It Online"

First output option.Same formula as many other answers (I'd like to point to the first answer providing the formula, I can't figure which it is).

Second and third output options below:
### [R], 43 bytes

<!-- language-all: lang-r -->

 function(m,n=1:m,u=n%%2+1)((n-u)^2-1)/8+2-u

[Try it online!][TIO-jhuq6vlf]

[R]: https://www.r-project.org/
[TIO-jhuq6vlf]: https://tio.run/##K/qfZvs/rTQvuSQzP08jVyfP1tAqV6fUNk9V1UjbUFNDI0@3VDPOSNdQU99C20i39H@ahpGh5n8A "R – Try It Online"

### [R], 51 bytes

<!-- language-all: lang-r -->

 while(T){cat(((T-(u=T%%2+1))^2-1)/8+2-u," ");T=T+1}

[Try it online!][TIO-jhuq2czi]

[R]: https://www.r-project.org/
[TIO-jhuq2czi]: https://tio.run/##K/r/vzwjMydVI0SzOjmxRENDI0RXo9Q2RFXVSNtQUzPOSNdQU99C20i3VEdJQUnTOsQ2RNuw9r@R4X8A "R – Try It Online"