ViSiElse (version 1.0.1)

plot-ViSigrid-method: Method plot-ViSigrid

Description

Method plot for ViSigrid object. This method provides a graphic of raw data during experimental observations of the realization of a procedure like a medical algorithm. It graphically presents an overview of individuals and group actions usually acquired from timestamps during video recorded sessions.

Usage

"plot"(x, scal.unit.tps = 10, unit.tps = "s", main = " ", ncharlabel = 30, size.main = 12, Fontsize.title = 11, Fontsize.label.Action = 11, Fontsize.label.Time = 11, Fontsize.label.color = 9, col.main = "black", col.grid = "grey", colgreenzone = "green", colblackzone = "black", alphainf = 0.8, alphasup = 0.6, alphaZones = 0.2, vp0h = 0.6, vp0w = 0.6, linA = 0.7, rcircle = 15, lwdline = 2, lwd.grid = 1, lty.grid = 1)

Arguments

x

A ViSigrid object built using the buildViSiGrid function.

scal.unit.tps

Unity of time for the grey grid legend.

unit.tps

Unit of time (s,min,..).

main

Title.

ncharlabel

Maximum number of plotted characters for labels of actions.

size.main

Title size.

Fontsize.title

Fontsize of the title.

Fontsize.label.Action

Fontsize of labels of plotted actions.

Fontsize.label.Time

Fontsize of the time axe.

Fontsize.label.color

Fontsize of legends.

col.main

Title color.

col.grid

Color of the legend box.

colgreenzone

Color of the green zones.

colblackzone

Color of black zones.

alphainf

Alpha of informers circles.

alphasup

Alpha of supplementary times.

alphaZones

Alpha of green and black zones.

vp0h

Height of the main plot window,

vp0w

Width of the main plot window,

linA

Height of the plotting area in each actions lines, < 1.

rcircle

circle radius of informers circles.

lwdline

line width of lines linking the 3 informers circles.

lwd.grid

Lines width of the legend box.

lty.grid

Lines type of the legend box.

See Also

ViSigrid, ViSibook, buildViSiGrid, changeShoworder-ViSibook-method.

Examples

intubation
## Construction of the ViSiBook for the data intubation
vars <- c("time_in_intub","time_insert_probe","time_out_intub","delay_intub_prob") 
label <- c( "the blade is in the mouth", "Insertion of the tube into the mouth",
           "The blade is out of the mouth","Blade in the month - Tube is inserted")
typeA <- c( "p","p","p","l")
showorder <- c( 1,2,4,3)
deb   <- c( NA, NA,NA,"time_in_intub")
fin <- c( NA,NA,NA,"time_insert_probe")
bookdataframe <- data.frame(vars,label,typeA,showorder,deb,fin)
bookintubation <- ConvertoViSibook(bookdataframe)
plot(bookintubation)
##
x <- buildViSiGrid( X = intubation, book = bookintubation,pixel = 5 )
plot( x )