inst/examples/tour2d.R

In DescribeDisplay: An Interface to the 'DescribeDisplay' 'GGobi' Plugin

display <- list(version='1.0.0',colormap = list(name='Set1 9',
ncolors=9,
type=3,
system='rgb',
backgroundColor = c(0.200,0.200,0.200),
hiddenColor = c(0.500,0.500,0.500),
accentColor = c(1.000,1.000,1.000),
foregroundColors = list(c(0.596,0.306,0.639),c(0.969,0.506,0.749),c(0.894,0.102,0.110),c(0.216,0.494,0.722),c(0.302,0.686,0.290),c(1.000,0.498,0.000),c(0.651,0.337,0.157),c(0.600,0.600,0.600),c(1.000,1.000,0.200))),
title='',type='scatterplot',nplots=1,
plots = list(list(type='scatterplot',projection='2D Tour',scale=c(0.700, 0.700),
tformLims=c(xmin=0.000, xmax=0.000, ymin=0.000, ymax=0.000),
planarLims=c(xmin=-23552.000, xmax=23552.000, ymin=-23543.000, ymax=23405.000),
points = list(index = c(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73),
x = c(-8308.64,-6066.27,-6780.36,-2624.35,-6673.19,-201.815,-6960.66,-6915.26,-7403.69,-243.501,-3946.48,-5792.39,-9695.72,-9529.21,-6251.06,-1715.76,-2149.94,-11518.5,-10640.4,-8016.14,-9475.2,-4883.62,-2380.66,-2867.2,5995.17,-599.526,2804.81,1500.12,2889.17,196.861,2241.5,396.132,1431.65,-1707.03,444.706,-7635.02,-167.707,-81.3746,4841.47,-318.98,-385.789,-220.763,-358.366,4137.38,-1218.07,3266.13,-6451.93,9106.7,-568.255,2221.5,-2545.47,151.581,6033.42,2206.45,1249.47,5735.01,1769.6,4843.05,3692.14,5248.96,685.05,-1980.87,6413.67,-1512.44,2618.29,7577.32,8507.87,11142,-988.443,4490.89,3496.68,150.714,1210.87,1740.57),
y = c(2560.26,219.932,1813.37,7292.24,826.006,8742.81,-1320.3,4017.87,3348.86,8239.58,-694.062,3831.31,695.398,1412.1,2274.92,3955.5,9180.75,7.98447,-2369.29,1768.39,-563.365,-15065.1,-1055.14,-2077.26,1647.7,-2640.17,-2932.66,555.172,1357.19,-3680.69,-3909.65,-3330.28,-7324.3,-6582.54,-5124.35,-7386.83,-6515.49,-5177.29,-1403.06,-2174.92,-6562.01,-5865.64,-5127.49,11393.7,14581.3,8206.31,8973.61,18740.2,11721.7,9413.55,9754.33,8200.55,8691.12,6486.33,11974.1,9173.47,12329.3,10794.3,8203.25,7239.74,8493.64,3324.88,5349.58,9812.62,13849.5,8119.43,13792.1,8368.6,808.166,12923.8,6262.75,7511.88,8460.4,7342.91),
color = c(2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,2,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0),
glyphtype = c(5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5,5),
glyphsize = c(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1),
hidden = c(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)
),
params = list(F = c(-0.570,0.080,-0.188,-0.428,-0.012,-0.671,0.097,-0.199,-0.323,-0.477,0.737,0.275),labels = c('tars1','tars2','head','aede1','aede2','aede3'),ranges = list(c(122.000, 242.000),c(107.000, 146.000),c(43.000, 58.000),c(116.000, 157.000),c(8.000, 16.000),c(55.000, 123.000))))),
showMissing=1,showPoints=1,showDirectedEdges=0,showUndirectedEdges=0,showArrowheads=0)