# NOT RUN {
ht <- hux(Jam = c('Blackberry', 'Strawberry'), Price = c(1.90, 1.80), add_colnames = TRUE)
ht2 <- hux('Gooseberry', 2.10)
add_rows(ht, ht2)
add_rows(ht, ht2, after = 1)
mx <- matrix(c('Sugar', '50%', '60%', 'Weight (g)', 300, 250), 3, 2)
add_columns(ht, mx, after = 'Jam')
ht <- hux(a = 1:3, b = 1:3)
ht2 <- hux(d = letters[1:3])
add_columns(ht, ht2, after = "a")
# }
Run the code above in your browser using DataLab