How do I convert the composition of rows and columns in R?

How do I convert the composition of rows and columns to make it like the picture below in R?

(CODE)

sample %>% group_by(cedingcompany, report_date) %>%

summarise(number1 = sum(statementdate_null), number2 = sum(billingid_null)) %>%

[ CODE - Help ]