# NOT RUN {
# Take subset of data
df1 <- mtcars[1:10, c("mpg", "cyl") ]
# Print current state
print(df1)
# Assign widths
widths(df1) <- list(mpg = 12, cyl = 10)
# Display formatted data
format(df1)
# View assigned widths
widths(df1)
# }
Run the code above in your browser using DataLab