Create a grid of 10x10m within polygon 100x100m shapefile and rotate the grid matching the orientation of 100x100m ploygon

Question

I am loading shapefile with multiple square polygon feature of size 100x100 m in R using st_read. I am able to create a grid of 10x10 m using st_make_grid, but how can I rotate each grid to match the orientation of polygon feature. Any suggestions on how to determine the orientation of every polygon and use that angle to rotate the grid associated with that polygon.