powered by
Modification of the render_proj() function of tourr so that the half_range is calculated with max(sqrt(rowSums(data^2))) or can be provided as argument.
render_proj_inter( data, prj, half_range = NULL, axis_labels = NULL, obs_labels = NULL, limits = 1, position = "center" )
list containing projected data, circle and segments for axes
matrix, or data frame containing numeric columns, should be standardized to have mean 0, sd 1
projection matrix
for scaling in the display, by default calculated from the data
of the axes to be displayed
labels of the observations to be available for interactive mouseover
value setting the lower and upper limits of projected data, default 1
position of the axes: center (default), bottomleft or off
library(tourr) data("flea", package = "tourr") flea_std <- apply(flea[,1:6], 2, function(x) (x-mean(x))/sd(x)) prj <- tourr::basis_random(ncol(flea[,1:6]), 2) p <- render_proj_inter(flea_std, prj)
Run the code above in your browser using DataLab