Enable update option for swipable and animate parameters in updateF7Tabs

 Then, we could easily enable or disable features based on the device using a combination of 

```
updateF7Tabs(session, "tab", animated = F, swipeable  = T )
ifelse(input$deviceInfo$desktop, T, F)
```