ISOImageryImageDescription: ISOImageryImageDescription

ISOImageryImageDescriptionR Documentation

ISOImageryImageDescription

Description

ISOImageryImageDescription

ISOImageryImageDescription

Format

R6Class object.

Value

Object of R6Class for modelling an ISO imagery image description

Super classes

geometa::geometaLogger -> geometa::ISOAbstractObject -> geometa::ISOContentInformation -> geometa::ISOCoverageDescription -> geometa::ISOImageDescription -> ISOImageryImageDescription

Public fields

rangeElementDescription

rangeElementDescription [0..*] : ISOImageryRangeElementDescription

Methods

Public methods

Inherited methods

Method new()

Initializes object

Usage
ISOImageryImageDescription$new(xml = NULL)
Arguments
xml

object of class XMLInternalNode-class


Method addRangeElementDescription()

Adds range element description

Usage
ISOImageryImageDescription$addRangeElementDescription(description)
Arguments
description

object of class ISOImageryRangeElementDescription

Returns

TRUE if added, FALSE otherwise


Method delRangeElementDescription()

Deletes range element description

Usage
ISOImageryImageDescription$delRangeElementDescription(description)
Arguments
description

object of class ISOImageryRangeElementDescription

Returns

TRUE if deleted, FALSE otherwise


Method clone()

The objects of this class are cloneable with this method.

Usage
ISOImageryImageDescription$clone(deep = FALSE)
Arguments
deep

Whether to make a deep clone.

Author(s)

Emmanuel Blondel <emmanuel.blondel1@gmail.com>

References

ISO 19115-2:2009 - Geographic information – Metadata Part 2: Extensions for imagery and gridded data

Examples

   #create image description
   md <- ISOImageryImageDescription$new()
   md$setAttributeDescription("test")
   md$setContentType("modelResult")
   
   #adding 3 arbitrary dimensions
   for(i in 1:3){
      band <- ISOBand$new()
      mn <- ISOMemberName$new(aName = sprintf("name %s",i), attributeType = sprintf("type %s",i))
      band$setSequenceIdentifier(mn)
      band$setDescriptor("descriptor")
      band$setMaxValue(10)
      band$setMinValue(1)
      gml <- GMLBaseUnit$new(id = sprintf("ID%s",i))
      gml$setDescriptionReference("someref")
      gml$setIdentifier("identifier", "codespace")
      gml$addName("name1", "codespace")
      gml$addName("name2", "codespace")
      gml$setQuantityTypeReference("someref")
      gml$setCatalogSymbol("symbol")
      gml$setUnitsSystem("somelink")
      band$setUnits(gml)
      band$setPeakResponse(9)
      band$setBitsPerValue(5)
      band$setToneGradation(100)
      band$setScaleFactor(1)
      band$setOffset(4)
      md$addDimension(band)
   }
   
   md$setIlluminationElevationAngle(15)
   md$setIlluminationAzimuthAngle(10)
   md$setImagingCondition("rain")
   md$setImageQualityCode("bad")
   md$setCloudCoverPercentage(90)
   md$setProcessingLevelCode("high")
   md$setCompressionGenerationQuantity(1L)
   md$setTriangulationIndicator(FALSE)
   md$setRadiometricCalibrationDataAvailability(FALSE)
   md$setCameraCalibrationInformationAvailability(FALSE)
   md$setFilmDistortionInformationAvailability(FALSE)
   md$setLensDistortionInformationAvailability(FALSE)
   
   des <- ISOImageryRangeElementDescription$new()
   des$setName("name")
   des$setDefinition("description")
   des$addRangeElement("record1")
   des$addRangeElement("record2")
   md$addRangeElementDescription(des)
   xml <- md$encode()


geometa documentation built on May 29, 2024, 10:31 a.m.