| Title: | Mass Cytometry S4 Class Structure Pipeline for Images | 
| Version: | 0.99.0 | 
| Maintainer: | Anthony Colombo <anthonycolombo60@gmail.com> | 
| Description: | Containerizes cytometry data and allows for S4 class structure to extend slots related to cell morphology, spatial coordinates, phenotype network information, and unique cellular labeling. | 
| Depends: | R (≥ 4.0), SingleCellExperiment, methods | 
| Imports: | SummarizedExperiment, S4Vectors, spatstat.geom, stats | 
| Suggests: | knitr, rmarkdown | 
| License: | MIT + file LICENSE | 
| biocViews: | Software, WorkflowStep, MultipleComparison | 
| Encoding: | UTF-8 | 
| RoxygenNote: | 7.1.1 | 
| VignetteBuilder: | knitr | 
| NeedsCompilation: | no | 
| Packaged: | 2021-08-18 17:33:19 UTC; UOSC | 
| Author: | Anthony Colombo [aut, cre] | 
| Repository: | CRAN | 
| Date/Publication: | 2021-08-19 09:20:02 UTC | 
the rows are the panel names, the columns are the single cells,the column are the single cells to match the SCE designs (scRNA)
Description
the rows are the panel names, the columns are the single cells,the column are the single cells to match the SCE designs (scRNA)
Usage
.checkSpatialDimension(object)
Arguments
object | 
 imcExperiment object, class imcExperiment container  | 
Value
imcExperiment container that has proper dimensions
map to point pattern from imcExperiment class.
Description
map to point pattern from imcExperiment class.
Usage
.imcExperimentToPPP(caseExperiment = NULL, phenotypeToUse = 1)
Arguments
caseExperiment | 
 the subset IMC experiment to cast into a point pattern  | 
phenotypeToUse | 
 the cluster id to annotate the pattern  | 
Value
imcExperiment container converted to a point pattern set
finds the intensities getter.
Description
finds the intensities getter.
sets cell Intensity slot to a new matrix. rows protein, columns are cells.
Usage
cellIntensity(object, ...)
## S4 method for signature 'imcExperiment'
cellIntensity(object)
cellIntensity(object) <- value
## S4 replacement method for signature 'imcExperiment,matrix'
cellIntensity(object) <- value
Arguments
object | 
 IMC container  | 
... | 
 additional arguments  | 
value | 
 matrix rows protein, columns are cells  | 
Value
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
Examples
data(imcdata)
dim(cellIntensity(imcdata))
data(imcdata);dim(cellIntensity(imcdata))
head(t(cellIntensity(imcdata)))
data(imcdata)
x<-asinh(counts(imcdata))
cellIntensity(imcdata)<-x
data
Description
Data set containing 1,000 cells and 73 features which include panel antibody, neighborhood computations, and phenograph clustering.
Usage
data(data)
Format
A data frame of 1,000 cells and histoCAT features
- ImageId
 feature from histoCAT
- CellId
 feature from histoCAT
- marker1
 feature from histoCAT
- marker2
 feature from histoCAT
- marker3
 feature from histoCAT
- marker4
 feature from histoCAT
- marker5
 feature from histoCAT
- marker6
 feature from histoCAT
- marker7
 feature from histoCAT
- marker8
 feature from histoCAT
- marker9
 feature from histoCAT
- marker10
 feature from histoCAT
- marker11
 feature from histoCAT
- marker12
 feature from histoCAT
- marker13
 feature from histoCAT
- marker14
 feature from histoCAT
- marker15
 feature from histoCAT
- marker16
 feature from histoCAT
- marker17
 feature from histoCAT
- marker18
 feature from histoCAT
- marker19
 feature from histoCAT
- marker20
 feature from histoCAT
- marker21
 feature from histoCAT
- marker22
 feature from histoCAT
- marker23
 feature from histoCAT
- marker24
 feature from histoCAT
- marker25
 feature from histoCAT
- marker26
 feature from histoCAT
- marker27
 feature from histoCAT
- marker28
 feature from histoCAT
- marker29
 feature from histoCAT
- marker30
 feature from histoCAT
- marker31
 feature from histoCAT
- marker32
 feature from histoCAT
- marker33
 feature from histoCAT
- marker34
 feature from histoCAT
- Area
 feature from histoCAT
- Eccentricity
 feature from histoCAT
- Solidity
 feature from histoCAT
- Extent
 feature from histoCAT
- EulerNumber
 feature from histoCAT
- Perimeter
 feature from histoCAT
- MajorAxisLength
 feature from histoCAT
- MinorAxisLength
 feature from histoCAT
- Orientation
 feature from histoCAT
- X_position
 feature from histoCAT
- Y_position
 feature from histoCAT
- Percent_Touching
 feature from histoCAT
- Number_Neighbors
 feature from histoCAT
- neighbour_4_CellId1
 feature from histoCAT
- neighbour_4_CellId2
 feature from histoCAT
- neighbour_4_CellId3
 feature from histoCAT
- neighbour_4_CellId4
 feature from histoCAT
- neighbour_4_CellId5
 feature from histoCAT
- neighbour_4_CellId6
 feature from histoCAT
- neighbour_4_CellId7
 feature from histoCAT
- neighbour_4_CellId8
 feature from histoCAT
- neighbour_4_CellId9
 feature from histoCAT
- neighbour_4_CellId10
 feature from histoCAT
- Phenograph7851534969
 feature from histoCAT
- tSNE4148542692_1
 feature from histoCAT
- tSNE4148542692_2
 feature from histoCAT
finds the spatial coords, getter.
Description
finds the spatial coords, getter.
Usage
getCoordinates(object)
## S4 method for signature 'imcExperiment'
getCoordinates(object)
## S4 replacement method for signature 'imcExperiment,matrix'
getCoordinates(object) <- value
Arguments
object | 
 is IMC container  | 
value | 
 matrix rows cells, columns are x,y  | 
Value
imcExperiment container
imcExperiment container
imcExperiment container
Examples
data(imcdata)
getCoordinates(imcdata)
data(imcdata)
getCoordinates(imcdata)
data(imcdata)
x<-getCoordinates(imcdata)
getCoordinates(imcdata)<-as.matrix(x)
Sets the coordinate positions of each cell (matrix), columns are X,Y positions.
Description
Sets the coordinate positions of each cell (matrix), columns are X,Y positions.
Usage
getCoordinates(object) <- value
Arguments
object | 
 is IMC container  | 
value | 
 matrix rows cells, columns are x,y  | 
Value
imcExperiment container
Examples
data(imcdata)
x<-getCoordinates(imcdata)
getCoordinates(imcdata)<-as.matrix(x)
re-assigns the distance matrix (rows are cells)
Description
re-assigns the distance matrix (rows are cells)
Usage
getDistance(object) <- value
Arguments
object | 
 is IMC container  | 
value | 
 matrix rows cells, columns are distance measurements  | 
Value
imcExperiment container
Examples
data(imcdata)
newD<-matrix(1,nrow=ncol(imcdata),ncol=1)
getDistance(imcdata)<-newD
re-assigns morphological features can be stored (matrix) rows are cells and columns are Area, etc.
Description
re-assigns morphological features can be stored (matrix) rows are cells and columns are Area, etc.
Usage
getMorphology(object) <- value
Arguments
object | 
 is IMC container  | 
value | 
 matrix rows cells, columns are Area, Eccentricity, etc.  | 
Value
imcExperiment container
Examples
data(imcdata)
x<-matrix(1,nrow=ncol(imcdata),ncol=4)
getMorphology(imcdata)<-x
finds the neighborhood information.
Description
finds the neighborhood information.
slow assignment for the histoCAT neighborhood data (matrix) columns are the neighbors
Usage
getNeighborhood(object, ...)
## S4 method for signature 'imcExperiment'
getNeighborhood(object)
getNeighborhood(object) <- value
## S4 replacement method for signature 'imcExperiment,matrix'
getNeighborhood(object) <- value
Arguments
object | 
 is IMC container  | 
... | 
 additional arguments  | 
value | 
 matrix rows cells, columns are neighborhood histoCAT output  | 
Value
imcExperiment container
imcExperiment container data(imcdata) getNeighborhood(imcdata)
imcExperiment container
imcExperiment container
Examples
data(imcdata)
getNeighborhood(imcdata)
data(imcdata)
x<-matrix(1,nrow=ncol(imcdata),ncol=2)
getNeighborhood(imcdata)<-x
data(imcdata)
x<-matrix(1,nrow=ncol(imcdata),ncol=2)
getNeighborhood(imcdata)<-x
re-assigns the network assignment (matrix)
Description
re-assigns the network assignment (matrix)
Usage
getNetwork(object) <- value
Arguments
object | 
 is IMC container  | 
value | 
 data.frame rows cells, columns are phenograph network ID  | 
Value
imcExperiment container
Examples
data(imcdata)
x<-data.frame(ID=seq_len(ncol(imcdata)))
getNetwork(imcdata)<-x
Initializes a imcExperiment and performs some rudimentary checks. Many of the arguments CAN be NULL; determination of which is required is done at run-time. A imcExperiment must contain at least the expressions and spatial/coordinate assays.
Description
Initializes a imcExperiment and performs some rudimentary checks. Many of the arguments CAN be NULL; determination of which is required is done at run-time. A imcExperiment must contain at least the expressions and spatial/coordinate assays.
Usage
imcExperiment(
  coordinates = matrix(1, 3, 3),
  cellIntensity = matrix(1, 3, 3),
  neighborHood = matrix(1, 3, 3),
  network = data.frame(matrix(1, 3, 3)),
  distance = matrix(1, 3, 3),
  morphology = matrix(1, 3, 3),
  uniqueLabel = rep("A", 3),
  panel = as.character(seq_len(3)),
  ROIID = data.frame(ROIID = rep("A", 3)),
  ...
)
Arguments
coordinates | 
 matrix of spatial coordinates (x,y)  | 
cellIntensity | 
 matrix of counts  | 
neighborHood | 
 neighborhood results  | 
network | 
 network assignments for each cell  | 
distance | 
 distances for each cell, can be square  | 
morphology | 
 morphology features for each cell, can be square  | 
uniqueLabel | 
 character class each cell is assigned a uniqueLabel  | 
panel | 
 antibody panel rownames set to rowData  | 
ROIID | 
 character for ROI  | 
... | 
 additional arguments  | 
Value
imcExperiment container
Examples
x<-imcExperiment(cellIntensity=matrix(1,nrow=10,ncol=10),
coordinates=matrix(1,nrow=10,ncol=2),
neighborHood=matrix(1,nrow=10,ncol=10),
network=data.frame(matrix(1,nrow=10,ncol=10)),
distance=matrix(1,nrow=10,ncol=10),
morphology=matrix(1,nrow=10,ncol=10),
uniqueLabel=paste0("A",seq_len(10)),
panel=letters[1:10],
ROIID=data.frame(ROIID=rep("A",10)))
a summarized experiment of IMC runs, dimensions of the spatial and intensity data are regulated.#'
Description
a summarized experiment of IMC runs, dimensions of the spatial and intensity data are regulated.#'
finds the network information.
assigns cell cluster assignment to the container. rows are cells and column is the cluster ID
finds the distance information.
distance matrix can be stored in the distance slot for pairwise distance
finds the morphology information.
morphological features can be stored (matrix) rows are cells and columns are Area, etc.
finds the label information.
unique cell labels can be assigned (vector)
Usage
getNetwork(object)
## S4 method for signature 'imcExperiment'
getNetwork(object)
## S4 replacement method for signature 'imcExperiment,data.frame'
getNetwork(object) <- value
getDistance(object)
## S4 method for signature 'imcExperiment'
getDistance(object)
## S4 replacement method for signature 'imcExperiment,matrix'
getDistance(object) <- value
getMorphology(object)
## S4 method for signature 'imcExperiment'
getMorphology(object)
## S4 replacement method for signature 'imcExperiment,matrix'
getMorphology(object) <- value
getLabel(object)
## S4 method for signature 'imcExperiment'
getLabel(object)
Arguments
object | 
 imcExperiment  | 
value | 
 matrix rows cells, columns are Area, etc.  | 
Value
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
imcExperiment container
Slots
coordinatesmatrix class containing x,y coordinates
cellIntensitymatrix class containing intensity
neighborHoodmatrix class containing x,y neighbor
networkdata frame class containing network
distancematrix class containing x,y distances
morphologymatrix class containing morphology
uniqueLabellabels
Examples
x<-imcExperiment(cellIntensity=matrix(1,nrow=10,ncol=10),
coordinates=matrix(1,nrow=10,ncol=2),
neighborHood=matrix(1,nrow=10,ncol=10),
network=data.frame(matrix(1,nrow=10,ncol=10)),
distance=matrix(1,nrow=10,ncol=10),
morphology=matrix(1,nrow=10,ncol=10),
uniqueLabel=paste0("A",seq_len(10)),
panel=letters[1:10],
ROIID=data.frame(ROIID=rep("A",10)))
data(imcdata)
getNetwork(imcdata)
data(imcdata)
getNetwork(imcdata)
data(imcdata)
x<-data.frame(ID=seq_len(ncol(imcdata)))
getNetwork(imcdata)<-x
data(imcdata)
getDistance(imcdata)
data(imcdata)
getDistance(imcdata)
data(imcdata)
newD<-matrix(1,nrow=ncol(imcdata),ncol=1)
getDistance(imcdata)<-newD
data(imcdata)
getMorphology(imcdata)
data(imcdata)
getMorphology(imcdata)
data(imcdata)
x<-matrix(1,nrow=ncol(imcdata),ncol=4)
getMorphology(imcdata)<-x
data(imcdata)
getLabel(imcdata)
data(imcdata)
getLabel(imcdata)
map to point pattern from imcExperiment class.
Description
map to point pattern from imcExperiment class.
Usage
imcExperimentToHyperFrame(imcExperiment = NULL, phenotypeToUse = 1)
Arguments
imcExperiment | 
 imcExperiment class  | 
phenotypeToUse | 
 the network slot can often have many columns, this is the ID for the column number to use in the network slot.  | 
Value
a hyperframe of point patterns
Examples
data(imcdata)
H<-imcExperimentToHyperFrame(imcExperiment=imcdata,phenotypeToUse = 1)
imcdata
Description
histoCAT output containerized as IMC container. IMC S4 data set containing 2,452 cells and 44 antibody features which include panel antibody.
Usage
data(imcdata)
Format
A data frame of 2,452 cells and histoCAT features which are containerized into the imcExperiment
given a matrix of intensity counts, perform min/max norm.
Description
given a matrix of intensity counts, perform min/max norm.
Usage
percentilenormalize(data = NULL, percentile = NULL)
Arguments
data | 
 matrix of numeric data only  | 
percentile | 
 numeric value 0.99 default.  | 
Value
normalized data, each column on [0,1] scale.
Examples
 data(data)
 dim(data)
 expr<-data[,3:36]
 normExp<-percentilenormalize(data=expr,percentile=0.99)
 normExp<-as.matrix(normExp)
subsets the imcExperiment to a case along with all slots for a selected multiple ROIs.
Description
subsets the imcExperiment to a case along with all slots for a selected multiple ROIs.
method to subset the slots, requires colData with column "ROIID"
Usage
selectCases(object, value, ...)
## S4 method for signature 'imcExperiment'
selectCases(object, value)
Arguments
object | 
 IMC container  | 
value | 
 this is ROIID vector  | 
... | 
 additional parameters  | 
Value
imcExperiment container of selected cases
imcExperiment container of selected cases
Examples
data(imcdata)
myCases<-selectCases(imcdata,c("30-BM16-202_7Pre_s1_p1_r4_a4_ac","B17_350_14post_s1_p1_r5_a5_ac"))
myCases
table(colData(myCases)$ROIID)
data(imcdata)
myCases<-selectCases(imcdata,c("30-BM16-202_7Pre_s1_p1_r4_a4_ac","B17_350_14post_s1_p1_r5_a5_ac"))
myCases
table(colData(myCases)$ROIID)
subsets the imcExperiment to a case along with all slots for a single ROI, using for distance analysis
Description
subsets the imcExperiment to a case along with all slots for a single ROI, using for distance analysis
method to subset the slots, requires colData with column "ROIID"
Usage
subsetCase(object, value, ...)
## S4 method for signature 'imcExperiment'
subsetCase(object, value)
Arguments
object | 
 IMC container  | 
value | 
 this is ROIID a single character ID  | 
... | 
 additional parameters  | 
Value
returns IMC object of a single case
roi imcExperiment
Examples
data(imcdata)
myCase<-subsetCase(imcdata,"30-BM16-202_7Pre_s1_p1_r4_a4_ac")
myCase
data(imcdata)
myCase<-subsetCase(imcdata,"30-BM16-202_7Pre_s1_p1_r4_a4_ac")
myCase