ISOServiceIdentification
ISOServiceIdentification
ISOServiceIdentification class
R6Class
object.
Object of R6Class
for modelling an ISO ServiceIdentification
#encoding md <- ISOServiceIdentification$new() md$setAbstract("abstract") md$setPurpose("purpose") #adding a point of contact rp <- ISOResponsibleParty$new() rp$setIndividualName("someone") rp$setOrganisationName("somewhere") rp$setPositionName("someposition") rp$setRole("pointOfContact") contact <- ISOContact$new() phone <- ISOTelephone$new() phone$setVoice("myphonenumber") phone$setFacsimile("myfacsimile") contact$setPhone(phone) address <- ISOAddress$new() address$setDeliveryPoint("theaddress") address$setCity("thecity") address$setPostalCode("111") address$setCountry("France") address$setEmail("someone@theorg.org") contact$setAddress(address) res <- ISOOnlineResource$new() res$setLinkage("http://www.somewhereovertheweb.org") res$setName("somename") contact$setOnlineResource(res) rp$setContactInfo(contact) md$addPointOfContact(rp) #citation ct <- ISOCitation$new() ct$setTitle("sometitle") d <- ISODate$new() d$setDate(ISOdate(2015, 1, 1, 1)) d$setDateType("publication") ct$addDate(d) ct$setEdition("1.0") ct$setEditionDate(ISOdate(2015,1,1)) ct$addIdentifier(ISOMetaIdentifier$new(code = "identifier")) ct$addPresentationForm("mapDigital") ct$addCitedResponsibleParty(rp) md$setCitation(ct) #graphic overview go <- ISOBrowseGraphic$new( fileName = "http://wwww.somefile.org/png", fileDescription = "Map Overview", fileType = "image/png" ) md$addGraphicOverview(go) #maintenance information mi <- ISOMaintenanceInformation$new() mi$setMaintenanceFrequency("daily") md$addResourceMaintenance(mi) #adding legal constraints lc <- ISOLegalConstraints$new() lc$addUseLimitation("limitation1") lc$addUseLimitation("limitation2") lc$addUseLimitation("limitation3") lc$addAccessConstraint("copyright") lc$addAccessConstraint("license") lc$addUseConstraint("copyright") lc$addUseConstraint("license") md$addResourceConstraints(lc) xml <- md$encode()
ISO 19115:2003 - Geographic information -- Metadata
Emmanuel Blondel emmanuel.blondel1@gmail.com
geometa::geometaLogger
-> geometa::ISOAbstractObject
-> geometa::ISOIdentification
-> ISOServiceIdentification
new()
Initializes object
ISOServiceIdentification$new(xml = NULL)
xml
: object of class XMLInternalNode-class
clone()
The objects of this class are cloneable with this method.
ISOServiceIdentification$clone(deep = FALSE)
deep
: Whether to make a deep clone.