This function generates a polar plot of the antenna pattern loops from a SeaSonde RAPM object.
Examples
# Plot loops from a test SeaSondeRAPM object
apm_file <- system.file("css_data/MeasPattern.txt", package = "SeaSondeR")
obj <- seasonder_readSeaSondeRAPMFile(apm_file)
#> seasonder_createSeaSondeRAPM: APM object created successfully.
plot <- seasonder_plotAPMLoops(obj)