How to adapt output with multiple columns for better presentation?
You can use kable() (see manual to create tables that are directly in markdown format. 

Your code would become:

```{r,results='asis'}
 knitr::kable(opneg1)
```


See also this great manual on rmarkdown.