Idenitifies chewing cycles and phases

Share:

Description

The primary function in this library automates the process of dividing chewing sequences into cycles and cycles into phases.

Details

Package: cyphid
Type: Package
Version: 1.1
Date: 2013-04-04
License: GPL-2
LazyLoad: yes

The primary function in this package is get.all.breaks (See example below).

Author(s)

Maintainer: Elizabeth Crane <bcrane@umich.edu>

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
# Run primary function for dividing sequences into cycles and cycles into phases
JawBreaks40 <- get.all.breaks(jaw, window=40)

# Check window based on cycle durations.
cycledurs <- get.cycle.durations(JawBreaks40$cyclemat)
win <- get.window(cycledurs)
win

# Rerun with modified window
JawBreaks27 <- get.all.breaks(jaw, window=27)

# Plot the output
plot(jaw[,1])
abline(v=JawBreaks27$openbreaks[,1])