| ISOImageryImageDescription {geometa} | R 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
rangeElementDescriptionrangeElementDescription [0..*] : ISOImageryRangeElementDescription
Methods
Public methods
Inherited methods
geometa::geometaLogger$ERROR()geometa::geometaLogger$INFO()geometa::geometaLogger$WARN()geometa::ISOAbstractObject$addFieldAttrs()geometa::ISOAbstractObject$addListElement()geometa::ISOAbstractObject$contains()geometa::ISOAbstractObject$createLocalisedProperty()geometa::ISOAbstractObject$decode()geometa::ISOAbstractObject$delListElement()geometa::ISOAbstractObject$encode()geometa::ISOAbstractObject$getClass()geometa::ISOAbstractObject$getClassName()geometa::ISOAbstractObject$getNamespaceDefinition()geometa::ISOAbstractObject$isDocument()geometa::ISOAbstractObject$isFieldInheritedFrom()geometa::ISOAbstractObject$print()geometa::ISOAbstractObject$save()geometa::ISOAbstractObject$setAttr()geometa::ISOAbstractObject$setCodeList()geometa::ISOAbstractObject$setCodeListValue()geometa::ISOAbstractObject$setCodeSpace()geometa::ISOAbstractObject$setHref()geometa::ISOAbstractObject$setId()geometa::ISOAbstractObject$setIsNull()geometa::ISOAbstractObject$setValue()geometa::ISOAbstractObject$validate()geometa::ISOAbstractObject$wrapBaseElement()geometa::ISOCoverageDescription$addDimension()geometa::ISOCoverageDescription$delDimension()geometa::ISOCoverageDescription$setAttributeDescription()geometa::ISOCoverageDescription$setContentType()geometa::ISOImageDescription$setCameraCalibrationInformationAvailability()geometa::ISOImageDescription$setCloudCoverPercentage()geometa::ISOImageDescription$setCompressionGenerationQuantity()geometa::ISOImageDescription$setFilmDistortionInformationAvailability()geometa::ISOImageDescription$setIlluminationAzimuthAngle()geometa::ISOImageDescription$setIlluminationElevationAngle()geometa::ISOImageDescription$setImageQualityCode()geometa::ISOImageDescription$setImagingCondition()geometa::ISOImageDescription$setLensDistortionInformationAvailability()geometa::ISOImageDescription$setProcessingLevelCode()geometa::ISOImageDescription$setRadiometricCalibrationDataAvailability()geometa::ISOImageDescription$setTriangulationIndicator()
Method new()
Initializes object
Usage
ISOImageryImageDescription$new(xml = NULL)
Arguments
xmlobject of class XMLInternalNode-class
Method addRangeElementDescription()
Adds range element description
Usage
ISOImageryImageDescription$addRangeElementDescription(description)
Arguments
descriptionobject of class ISOImageryRangeElementDescription
Returns
TRUE if added, FALSE otherwise
Method delRangeElementDescription()
Deletes range element description
Usage
ISOImageryImageDescription$delRangeElementDescription(description)
Arguments
descriptionobject 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
deepWhether 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()