feat(gridView): implement feature (#24)

[swsoyee]

A dirty solution, but it works.

library(r3dmol)

m1 <- r3dmol() %>%
  m_add_model(data = pdb_6zsl, format = "pdb") %>%
  m_zoom_to()

m2 <- m1 %>%
  m_set_style(style = m_style_cartoon(color = "spectrum"))

m3 <- m1 %>%
  m_set_style(style = m_style_stick())

m4 <- m1 %>%
  m_set_style(style = m_style_sphere())

m_grid(
  viewer = list(m1, m2, m3, m4),
  configs = list(rows = 2, cols = 2, control_all = TRUE),
  viewer_config = list(backgroundColor = "black")
)

[swsoyee]

As I mention in 0a4e61c, some packages (dependencies) version are not available now, so the check will failed for several days. If checking locally, everything should be fine.

[swsoyee]

Looks good, wait for the checks to be completed and then merge it to master.

[BradyAJohnston]

Looks good! Merged 🎉🎉