The [[<-
method works for all '>oce objects.
The purpose, as with the related extraction method, [[
,
is to insulate users from the internal details of '>oce
objects, by looking for items within the various storage
slots of the object. Items not actually stored can also be
replaced, including units and data-quality
flags.
# S4 method for ctd
[[(x, i, j, ...) <- value
character value naming the item to replace.
optional additional information on the i
item.
optional additional information (ignored).
The value to be placed into x
, somewhere.
As with [[
method, the procedure works in steps.
First, the metadata
slot of x
is checked to
see whether it contains something named with i
.
If so, then the named item is replaced with value
.
Otherwise, if the string value of i
ends in Unit
, then the
characters preceding that are taken as the name of a variable, and
the metadata
slot of x
is updated to store that unit, e.g.
x[["temperatureUnits"]] <- list(unit=expression(degree*F),scale="")
Similarly, if i
ends in Flag
, then quality-control
flags are set up as defined by result
, e.g.
o[["temperatureFlags"]] <- c(2,4,2,2)
Otherwise, pmatch()
is used for a partial-string match with
the names of the items that are in the data
slot of x
.
The first item found (if any) is then updated to hold the value result
.
If none of these conditions is met, a warning is issued.
Other functions that replace parts of oce objects:
[[<-,adp-method
,
[[<-,amsr-method
,
[[<-,argo-method
,
[[<-,bremen-method
,
[[<-,cm-method
,
[[<-,coastline-method
,
[[<-,echosounder-method
,
[[<-,g1sst-method
,
[[<-,gps-method
,
[[<-,ladp-method
,
[[<-,landsat-method
,
[[<-,lisst-method
,
[[<-,lobo-method
,
[[<-,met-method
,
[[<-,oce-method
,
[[<-,odf-method
,
[[<-,rsk-method
,
[[<-,sealevel-method
,
[[<-,section-method
,
[[<-,tidem-method
,
[[<-,topo-method
,
[[<-,windrose-method
,
[[<-,xbt-method
Other things related to ctd data:
CTD_BCD2014666_008_1_DN.ODF.gz
,
[[,ctd-method
,
as.ctd()
,
cnvName2oceName()
,
ctd-class
,
ctd.cnv
,
ctdDecimate()
,
ctdFindProfiles()
,
ctdRaw
,
ctdRepair()
,
ctdTrim()
,
ctd_aml.csv
,
ctd
,
d200321-001.ctd
,
d201211_0011.cnv
,
handleFlags,ctd-method
,
initialize,ctd-method
,
initializeFlagScheme,ctd-method
,
oceNames2whpNames()
,
oceUnits2whpUnits()
,
plot,ctd-method
,
plotProfile()
,
plotScan()
,
plotTS()
,
read.ctd.itp()
,
read.ctd.odf()
,
read.ctd.odv()
,
read.ctd.sbe()
,
read.ctd.woce.other()
,
read.ctd.woce()
,
read.ctd()
,
setFlags,ctd-method
,
subset,ctd-method
,
summary,ctd-method
,
woceNames2oceNames()
,
woceUnit2oceUnit()
,
write.ctd()
# NOT RUN {
data(ctd)
summary(ctd)
# Move the CTD profile a nautical mile north.
ctd[["latitude"]] <- 1/60 + ctd[["latitude"]] # acts in metadata
# Increase the salinity by 0.01.
ctd[["salinity"]] <- 0.01 + ctd[["salinity"]] # acts in data
summary(ctd)
# }
Run the code above in your browser using DataLab