Last data update: 2014.03.03

R: Select one readout from the twice read data and store...
selectPlateR Documentation

Select one readout from the twice read data and store selected values. In those cases where an experiment is read twice, only one readout from each pair is selected. The selection is based on presence of minimum number of "selection key" or read with highest mean is picked in case of tie.

Description

Select one readout from the twice read data and store selected values. In those cases where an experiment is read twice, only one readout from each pair is selected. The selection is based on presence of minimum number of "selection key" or read with highest mean is picked in case of tie.

Usage

selectPlate(rawdata, processedbarcode, numberofrowsperplate, selectionkey,
  doubleplateexperiment)

Arguments

rawdata

An object (dataframe) of rawdata.

processedbarcode

A vector containing all barcodes of data. In this case it is the output of function "extractKey".

numberofrowsperplate

This argument is not needed when you call function "readFluostarPlates". The number of rows depends upon the geometry of the plates. These are 16 in case of 384 well plates.

selectionkey

key Value, that is used to select one of double read outs.

doubleplateexperiment

This parameter value can either be TRUE or FALSE. It is TRUE when an experiment is read twice.

Value

A hash table of selected readouts. Note: Hash tables are used to store the FMCA data because it consists of a key (barcode) and a corresponding data. If COMBIA is used for large amount of FMCA data then the data in the hash table will be more transparent, logical and easy to access than matrices.

Author(s)

Muhammad Kashif

Examples

f <- system.file("/raw/optima.log", package="COMBIA")
fileDF <- readFile(filename = f, separator = ",", noofrows_skip=0,
                   platetype="384")
Generatedbarcode <-  extractKey(keyposition = 2,
    rawdata = fileDF, numberofrowsperplate = 17, doubleplateexperiment=TRUE)
hashedplates <-  selectPlate(rawdata=fileDF,
    processedbarcode = Generatedbarcode, numberofrowsperplate=17,
    selectionkey="65000", doubleplateexperiment = FALSE )

Results


R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(COMBIA)
Loading required package: hash
hash-2.2.6 provided by Decision Patterns

Loading required package: gdata
gdata: read.xls support for 'XLS' (Excel 97-2004) files ENABLED.

gdata: read.xls support for 'XLSX' (Excel 2007+) files ENABLED.

Attaching package: 'gdata'

The following object is masked from 'package:stats':

    nobs

The following object is masked from 'package:utils':

    object.size

The following object is masked from 'package:base':

    startsWith

Loading required package: lattice
Loading required package: latticeExtra
Loading required package: RColorBrewer
Loading required package: oro.nifti
oro.nifti 0.5.2
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/COMBIA/selectPlate.Rd_%03d_medium.png", width=480, height=480)
> ### Name: selectPlate
> ### Title: Select one readout from the twice read data and store selected
> ###   values. In those cases where an experiment is read twice, only one
> ###   readout from each pair is selected. The selection is based on
> ###   presence of minimum number of "selection key" or read with highest
> ###   mean is picked in case of tie.
> ### Aliases: selectPlate
> 
> ### ** Examples
> 
> f <- system.file("/raw/optima.log", package="COMBIA")
> fileDF <- readFile(filename = f, separator = ",", noofrows_skip=0,
+                    platetype="384")
> Generatedbarcode <-  extractKey(keyposition = 2,
+     rawdata = fileDF, numberofrowsperplate = 17, doubleplateexperiment=TRUE)
> hashedplates <-  selectPlate(rawdata=fileDF,
+     processedbarcode = Generatedbarcode, numberofrowsperplate=17,
+     selectionkey="65000", doubleplateexperiment = FALSE )
> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>