| AtomEntry | R Documentation |
This class models an atom Entry
R6Class object.
AtomEntry
Object of R6Class for modelling an Atom Entry
atom4R::atom4RLogger -> atom4R::AtomAbstractObject -> AtomEntry
ididentifier
updatedUpdate date/time
publishedPublication date/time
titleTitle
summarySummary
rightsRights
sourceSource
authorAuthor(s)
contributorContributor(s)
categoryCategory
contentContent
atom4R::atom4RLogger$ERROR()atom4R::atom4RLogger$INFO()atom4R::atom4RLogger$WARN()atom4R::atom4RLogger$logger()atom4R::AtomAbstractObject$addListElement()atom4R::AtomAbstractObject$contains()atom4R::AtomAbstractObject$createElement()atom4R::AtomAbstractObject$decode()atom4R::AtomAbstractObject$delListElement()atom4R::AtomAbstractObject$encode()atom4R::AtomAbstractObject$getClass()atom4R::AtomAbstractObject$getClassName()atom4R::AtomAbstractObject$getNamespace()atom4R::AtomAbstractObject$getNamespaceDefinition()atom4R::AtomAbstractObject$getRootElement()atom4R::AtomAbstractObject$getXmlElement()atom4R::AtomAbstractObject$isDocument()atom4R::AtomAbstractObject$isFieldInheritedFrom()atom4R::AtomAbstractObject$print()atom4R::AtomAbstractObject$save()atom4R::AtomAbstractObject$setIsDocument()atom4R::AtomAbstractObject$validate()new()Initializes an AtomEntry
AtomEntry$new(xml = NULL)
xmlobject of class XMLInternalNode-class from XML
setId()Set ID
AtomEntry$setId(id)
idid
setUpdated()Set updated date
AtomEntry$setUpdated(updated)
updatedobject of class Date or POSIXt
setPublished()Set published date
AtomEntry$setPublished(published)
publishedobject of class Date or POSIXt
setTitle()Set title
AtomEntry$setTitle(title, type = "text")
titletitle
typetype. Default is "text"
setSummary()Set summary
AtomEntry$setSummary(summary, type = "text")
summarysummary
typetype. Default is "text"
setRights()Set rights
AtomEntry$setRights(rights, type = "text")
rightsrights
typetype. Default is "text"
setSource()Set source
AtomEntry$setSource(source, type = "text")
sourcesource
typetype. Default is "text"
addAuthor()Adds author
AtomEntry$addAuthor(author)
authorobject of class AtomAuthor
TRUE if added, FALSE otherwise
delAuthor()Deletes author
AtomEntry$delAuthor(author)
authorobject of class AtomAuthor
TRUE if deleted, FALSE otherwise
addContributor()Adds contributor
AtomEntry$addContributor(contributor)
contributorobject of class AtomContributor
TRUE if added, FALSE otherwise
delContributor()Deletes contributor
AtomEntry$delContributor(contributor)
contributorobject of class AtomContributor
TRUE if deleted, FALSE otherwise
addCategory()Adds category
AtomEntry$addCategory(value, term, scheme = NULL, label = NULL)
valuevalue
termterm
schemescheme
labellabel
TRUE if added, FALSE otherwise
delCategory()Deletes category
AtomEntry$delCategory(value, term, scheme = NULL, label = NULL)
valuevalue
termterm
schemescheme
labellabel
TRUE if deleted, FALSE otherwise
addLink()Adds link
AtomEntry$addLink(link, rel = "alternate", type = "text/html")
linklink
relrelation. Default is "alternate"
typetype. Default is "text/html"
TRUE if added, FALSE otherwise
delLink()Deletes link
AtomEntry$delLink(link, rel = "alternate", type = "text/html")
linklink
relrelation. Default is "alternate"
typetype. Default is "text/html"
TRUE if deleted, FALSE otherwise
setContent()Set content
AtomEntry$setContent(content)
contentcontent
clone()The objects of this class are cloneable with this method.
AtomEntry$clone(deep = FALSE)
deepWhether to make a deep clone.
Emmanuel Blondel <emmanuel.blondel1@gmail.com>
## Not run:
#encoding
atom <- AtomEntry$new()
atom$setId("my-atom-entry")
atom$setTitle("My Atom feed entry")
atom$setSummary("My Atom feed entry very comprehensive abstract")
author1 <- AtomAuthor$new(
name = "John Doe",
uri = "http://www.atomxml.com/johndoe",
email = "johndoe@atom4R.com"
)
atom$addAuthor(author1)
author2 <- AtomAuthor$new(
name = "John Doe's sister",
uri = "http://www.atomxml.com/johndoesister",
email = "johndoesister@atom4R.com"
)
atom$addAuthor(author2)
contrib1 <- AtomContributor$new(
name = "Contrib1",
uri = "http://www.atomxml.com/contrib1",
email = "contrib1@atom4R.com"
)
atom$addContributor(contrib1)
contrib2 <- AtomContributor$new(
name = "Contrib2",
uri = "http://www.atomxml.com/contrib2",
email = "contrib2@atom4R.com"
)
atom$addContributor(contrib2)
atom$addCategory("draft", "dataset")
atom$addCategory("world", "spatial")
atom$addCategory("fisheries", "domain")
xml <- atom$encode()
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.