Create windrose_lib.R