x = data.frame('bag_LABEL' = factor(c(1, 1, 0)),
'bag_name' = c(rep('bag_1', 2), 'bag_2'),
'X1' = c(-0.4, 0.5, 2),
'instance_label' = c(0, 1, 0))
df <- as_mi_df(x)
Run the code above in your browser using DataLab