How to use R to generate output like a pivot table

Question

I am trying to automate a report that i usually do in Excel using Pivot tables where i drop school into rows and Date Registered into Columns and Values. I also want a row w