# scat3d: 3D plotting of motion data In reissphil/cvv: Cosine of velocity vectors

## Description

Inputs a dyadic motion data produced by `make.fd`, and creates a 3D plot of the data for one member of the dyad.

## Usage

 ```1 2 3``` ```scat3d(obj, person, npoints = 1001, deriv = 0, tmin = NULL, tmax = NULL, cex = 0.5, col = rainbow(npoints, end = 5/6), plotter = "rgl", common.width = FALSE, ...) ```

## Arguments

 `obj` A dyadic motion object outputted by `make.fd` `person` Which person's data should be plotted: 0 or 1 `npoints` Number of (equally spaced) points to include in the plot `deriv` Derivative to plot (e.g., 1 for velocity, 2 for acceleration); the default, 0, plots the positions `tmin, tmax` Lower and upper ends of the time range `cex` Magnification factor for the points `col` Color; the default gives a rainbow plot `plotter` Character vector describing the plotting function to use: either "`plot3d`" or "`scatterplot3d`" `common.width` Logical: Should the plotting interval along each of the 3 dimensions be of equal width? `...` Arguments passed to the plotting function.

## Value

A list with components

 `tseq` Sequence of times `xfd,yfd,zfd` Functional data objects (see `fd`) for the x, y, and z-coordinates

## Examples

 ```1 2 3 4 5 6 7 8``` ```# 3D plots as in Fig. 6 of Reiss, Gvirts et al. data(sync.fd) rnge <- c(61,62.2) par(mfrow=1:2) pers0 <- scat3d(sync.fd, person=0, tmin=rnge[1], tmax=rnge[2], plotter="scatterplot3d", main="Leader", xlab='x', ylab='y', zlab='z') pers1 <- scat3d(sync.fd, person=1, tmin=rnge[1], tmax=rnge[2], plotter="scatterplot3d", main="Follower", xlab='x', ylab='y', zlab='z') ```

reissphil/cvv documentation built on May 21, 2019, 10:08 a.m.