Plot a survey plan.

Plot a survey plan.

PlotSurveyPlan(SurveyPlan, StratumPolygon)

Arguments

SurveyPlan

The SurveyPlan process data.

StratumPolygon

The StratumPolygon process data.

Value

An object of StoX data type WriteSurveyPlanData.

Examples

stratumFile <- system.file(
  "testresources", 
  "strata_sandeel_2020_firstCoverage.wkt", package = "RstoxBase"
 )
stratumPolygon<- DefineStratumPolygon(
  DefinitionMethod = "ResourceFile", 
  FileName = stratumFile
)

# Harbitz zigzag survey design along each stratum:
surveyPlanZZ_Along <- DefineSurveyPlan(
  DefinitionMethod = "ZigZagRectangularEnclosure", 
  StratumPolygon = stratumPolygon, 
  SurveyTime = 200, 
  SurveySpeed = 10, 
  Seed = 1, 
  Bearing = "Along"
)

WriteSurveyPlan(surveyPlanZZ_Along)
#> Simple feature collection with 353 features and 3 fields
#> Geometry type: POINT
#> Dimension:     XY
#> Bounding box:  xmin: 2.491242 ymin: 56.5783 xmax: 6.632381 ymax: 60.66388
#> CRS:           NA
#> First 10 features:
#>                     geometry    track_fid track_seg_id track_seg_point_id
#> 1  POINT (2.770825 58.16913) AlbjoernLing  Transect_01          Segment_1
#> 2   POINT (2.550207 58.0863) AlbjoernLing  Transect_01          Segment_1
#> 3  POINT (2.540432 58.06167) AlbjoernLing  Transect_02          Segment_1
#> 4   POINT (2.82823 58.11042) AlbjoernLing  Transect_02          Segment_1
#> 5  POINT (2.829138 58.10948) AlbjoernLing  Transect_03          Segment_1
#> 6  POINT (2.512165 57.99025) AlbjoernLing  Transect_03          Segment_1
#> 7  POINT (2.510766 57.98671) AlbjoernLing  Transect_04          Segment_1
#> 8  POINT (2.886115 58.05037) AlbjoernLing  Transect_04          Segment_1
#> 9  POINT (2.886817 58.04964) AlbjoernLing  Transect_05          Segment_1
#> 10  POINT (2.55821 57.92602) AlbjoernLing  Transect_05          Segment_1