Learn R Programming

sos4R (version 0.4.2)

TM_Operators: Classes and Construction Methods for Temporal Operator Classes

Description

Classes for temporal operators from OpenGIS(R) Filter Encoding used in filters in GetObservation requests.

Usage

TM_After(propertyName = sosDefaultTempOpPropertyName, time)
TM_Before(propertyName = sosDefaultTempOpPropertyName, time)
TM_During(propertyName = sosDefaultTempOpPropertyName, time)
TM_Equals(propertyName = sosDefaultTempOpPropertyName, time)

Arguments

propertyName

The name of the property that is used to wrap the time.

time

A time instant or period to be used as the temporal operand.

Value

An object of the respective class, so TM_After, TM_Before, TM_During or TM_Equals

Objects from the Class

Objects can be created by calls of the form new("TM_After", ...).

Slots

time:

Object of class "GmlTimeInstant"

propertyName:

Object of class "character"

Extends

Class "'>OgcBinaryTemporalOp", directly. Class "'>OgcBinaryTemporalOpOrNULL", by class "OgcBinaryTemporalOp", distance 2.

Methods

encodeXML

signature(obj = "TM_After", sos = "SOS"): ...

show

signature(object = "TM_After"): ...

encodeXML

signature(obj = "TM_Before", sos = "SOS"): ...

show

signature(object = "TM_Before"): ...

encodeXML

signature(obj = "TM_During", sos = "SOS"): ...

show

signature(object = "TM_During"): ...

encodeXML

signature(obj = "TM_Equals", sos = "SOS"): ...

show

signature(object = "TM_Equals"): ...

References

Vretanos, Panagiotis A. (Ed.), OpenGIS(R) Filter Encoding Implementation Specification, OGC 04-095, Version: 1.1.0

See the schema file: http://schemas.opengis.net/sos/1.0.0/ogc4sos.xsd.

See Also

SosGetObservation

Examples

Run this code
# NOT RUN {
showClass("TM_After")
showClass("TM_Before")
showClass("TM_During")
showClass("TM_Equals")

# }
# NOT RUN {
# create times to use for operators
t1 <- sosCreateTimeInstant(sos = weathersos, time = Sys.time())
p1 <- sosCreateTimePeriod(sos = weathersos, begin = as.POSIXct("2010-03-01 12:15"),
                          end = as.POSIXct("2010-03-02 12:15"))

# create temporal operator
afterNow <- TM_After(time = t1)
print(afterNow)
encodeXML(t1, sos)

during <- TM_During(time = p1)
print(during)
# }
# NOT RUN {
# }

Run the code above in your browser using DataLab