inst/examples/tour2x1d.R

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='2x1D 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(-7054.19,-3410.25,-6542.78,-8986.77,-1188.78,-7779.04,-4150.59,-7825.74,-8747.28,-6462.84,-5164.33,-6251.89,-4174.33,-5996.44,-5665.75,-7522.8,-11422.7,-4606,-4318.53,-4674.96,-7866.97,5425.47,-487.501,-802.429,1696.25,-683.192,3791.78,-3165.9,-3312.58,1605.54,4101.22,328.06,3952.02,4093.23,1758.5,-668.422,1219.15,2235.39,2648.81,-1054.6,-536.205,2315.91,1600.54,-5547.74,-10121.5,98.4309,-8188.41,-7454.86,-8381.6,-3349.03,-5940.7,-4781.67,-2050.79,-2768.37,-7640.78,-4158.81,-7398.59,-4025.38,-1779.87,-402.202,-165.498,-1488.4,904.303,-5029.64,-6410.59,-2027.54,-6927.71,-1324.46,-750.573,-6815.23,-602.886,-3413.99,-3026.81,-3089.07),
y = c(1349.91,-175.895,2543.36,-1871.47,-1336.96,-3560.57,430.542,547.806,-2086.57,-2641.19,-103.966,-2086.57,3475.68,939.145,-365.089,-65.108,-1062.89,-756.428,4251.89,573.711,-182.372,-6364.01,-6494.92,-6631.61,-10720.6,-8320.71,-8907.72,-10361.6,-9135.77,-10740,-9833.57,-10981,-8946.58,-9416.32,-7518.6,-6546.73,-7648.82,-8757.38,-9214.17,-7107.83,-11130.6,-7101.36,-9553.01,2842.65,6331.63,5144.66,11659.4,2334.05,6748.88,7544.51,8235.83,5412.26,3697.26,5601.45,7329.41,4714.46,3116.73,2992.99,6331.63,1375.82,3846.9,8548.76,2516.76,7550.98,1910.33,-26.2506,2627.55,2523.24,3475.68,1688.75,6442.42,4133.93,4349.03,1271.51),
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(xF = c(-0.195,0.572,-0.630,-0.435,0.221),xlabels = c('head','aede1','aede2','aede3','species'),xranges = list(c(43.000, 58.000),c(116.000, 157.000),c(8.000, 16.000),c(55.000, 123.000),c(1.000, 3.000)),
yF = c(0.986,-0.165),ylabels = c('tars1','tars2'),yranges = list(c(122.000, 242.000),c(107.000, 146.000))))),
showMissing=1,showPoints=1,showDirectedEdges=0,showUndirectedEdges=0,showArrowheads=0)

Try the DescribeDisplay package in your browser

Any scripts or data that you put into this service are public.

DescribeDisplay documentation built on Aug. 25, 2023, 9:07 a.m.