search for: eye

...to extend mosaicplot to work with loglin and logln (MASS) objects. I'm using R 1.4.0 on Win 98. I've been trying to figure out the formula interface, and think there's a bug, but not sure how to find it, yet alone fix it. It seems to only work with independence models: > data(HairEyeColor) > mosaicplot(~ Hair + Eye + Sex, data=HairEyeColor) > mosaicplot(~ Hair * Eye + Sex, data=HairEyeColor) Error in aperm(a, perm, resize) : `perm' is of wrong length here's a traceback: > debug(mosaicplot) > mosaicplot(~Hair + Eye + Sex + Hair:Eye, data=HairEyeColor) debug...

Hi, Can someone set me straight as to how to write formulas in R to indicate: complete independence [A][B][C] joint independence [AB][C] conditional independence [AC][BC] nway interaction [AB][AC][BC] ? For example, if I have 4 factors: hair colour, eye colour, age, sex does > mosaicplot( frequency ~ hair + eye + age + sex) mean that the model fitted is of complete independence of all factors [hair][eye][age][sex]? So does > mosaicplot(frequency ~ hair + eye) mean that the model is of conditional independence [hairAgeSex][eyeAgeSex]...

Hi, I asked this on mixed model mailing list, but that list is not very active, so I'd like to try the general R mailing list. Sorry if anyone receives the double post. Hi, I have a dataset of animals receiving some eye treatments. There are 8 treatments, each animal's right and left eye was measured with some scores (ranging from 0 to 7) 4 times after treatment. So there are nesting groups eyes within animal. Dataset attached > dat<-read.table("dat.txt",sep='\t',header=T,row.names...

Dear R Users, I have a question based on my research. I am analyzing reader-based diagnostic data set. My study involves diabetic patients who were evaluated for treatable diabetic retinopathy based on the presence or absence of two pathologies in their eyes. Pathologies were identified using the clinical examination (Gold standard method). In addition it can be identified by taking digital images of patients? eyes and this method is cost effective. Finally two readers go over the images independently and patients are diagnosed as either positive or...

Dear R-helpers, Suppose I have dataset like this below: data(HairEyeColor) dfHEC <- as.data.frame(as.table(HairEyeColor)) my.dfHEC <- data.frame(Hair=rep(dfHEC$Hair,dfHEC$Freq), Eye=rep(dfHEC$Eye,dfHEC$Freq), Sex=rep(dfHEC$Sex,dfHEC$Freq)) my.dfHEC my.dfHEC$Hair my.dfHEC$Eye my.dfHEC$Sex and I know all levels for...

I have a dataframe. Let's suppose that i have two columns. The first one contains height, the second one contains eye color that can be Green, Blue or Brown. I want to calculate the aritmetic mean of the height only for those people who have Blue eyes. How can I do it? Thank you for your availability. -- View this message in context: http://r.789695.n4.nabble.com/Mean-Help-tp4648000.html Sent from the R help m...

...ed changing the environment of the formula to be gnm's namespace, but so far I failed. Here's a reproducer using only gnm: > dat <- structure(c(326, 688, 343, 98, 38, 116, 84, 48, 241, 584, 909, + 403, 110, 188, 412, 681, 3, 4, 26, 85), .Dim = 4:5, .Dimnames = structure(list( + Eye = c("Blue", "Light", "Medium", "Dark"), Hair = c("Fair", + "Red", "Medium", "Dark", "Black")), .Names = c("Eye", "Hair" + )), class="table") > > f <- Freq ~ Eye + H...

Hi the manpage for persp() has a wonderful section where a the trans3d () function is used with points() and lines() to add red dots and a green sinusoid to the Mexican hat surface. Does anyone have a way to tell what distance a point is from the eye/ camera? Take the following line: lines (trans3d(x, y=10, z= 6 + sin(x), pm = res), col = 3) Is there a function like trans3d() that returns a vector of distances from the x,y,z point to the camera? I want this so I can plot clouds of points with the further ones in smaller plotsizes, and...

...In a related vein, there are all manner of operations that are readily coded in Gauss or in MATA that fail, often mysteriously, in R. Are there some guidelines available? And here is a specific problem: I would like to carry out logical comparisons between a (vector?) of length EYE and each row of a JAY by EYE object, obtaining a conforming JAY by EYE result of comparisons such as Obj[Jay,Eye] == Vec[Eye] Any thoughts on how to effect this would be welcome. Among many failed efforts, as.matrix(7 element Vec) == { an 8 row, 7 column data.frame} y...

https://bugs.freedesktop.org/show_bug.cgi?id=51962 Bug #: 51962 Summary: Raz's eyes flicker in Psychonauts on nv50 Classification: Unclassified Product: Mesa Version: git Platform: Other OS/Version: All Status: NEW Severity: normal Priority: medium Component: Drivers/DRI/nouveau AssignedT...

The data is in the attachment. What I wanna get is: , , Sex = Male Eye Hair Brown Blue Hazel Green Black 32 11 10 3 Brown 53 50 25 15 Red 10 10 7 7 Blond 3 30 5 8 , , Sex = Female Eye Hair Brown Blue Hazel Green Black 36 9 5 2 Brown 66 34 29 14 Red 16 7...

Are there any plans to integrate Virtual Earth''s Bird''s Eye view to mapstraction? I tried an "integration hack" but then found out that there are too many issues involved (check whether birds eye is available for the current map area, disabling zoom controls,...). Has anyone else tried it? Franz

Hi, I tried to encode a WAV file to FLAC. But then I get a strange message: 99% complete. You can see the details below: 12 - In My Eyes (Radio Edit).wav: 99% complete, ratio=0,67412 - In My Eyes (Radi o Edit).wav: WARNING: skipping unknown sub-chunk 'LIST' 12 - In My Eyes (Radio Edit).wav: Verify OK, wrote 25090527 bytes, ratio=0,670 I have encoded the file using 'flac -V --best' using the flac command line tool....

...f I get the analysis right for one of them, I've got them all. For simplicity, let us call any measurement we may be interested as "response". The study design is an unbalanced latin square, with 5 periods, 5 treatments and 6 subjects. Each subject has two measurements: left and right eyes. The model is as follows, with ":" denoting interaction... Fixed Effects = (Subject + Period + Dose):Eye Random Effects = Subject:Period + Subject:Period:Eye My main question is how to make this happen in R. I know that "aov" is not suitable. If you need any more information,...

I've got a 20 slide Powerpoint set up against the expected day someone says "Mitch, could you talk for a short while to the residents on how to use statistics?" It looks good at this end, but I'd love to get at least one more pair of eyes on it. Any volunteers? -- Due to the recession, requests for instant gratification will be deferred until arrears in scheduled gratification have been satisfied.

...n: - perception of photo manipulation - more tangible representation of goods (ebay) - ability to recognize more things in a stereo photo than would be possible in 2D. - ability to stop time and observe imperceivable things like water suspended in air - ability to see mountains that appear to our eyes as flat in 3D as if looking at a model in clay. - perception of reflections: glass, water, smoke, anisotropical effects like glitter, brushed metal, suede. - the perception of increased resolution due to the added resolution of the combined imagery. Wine could bring this to anyone regardless of...

Has anyone already worked out the files involved in changing from the rather pedestrian screensaver to some more pleasing eye candy like Fedora Core 5 uses? thnx/ldv

...the whole word "package" I'll get an error in 1.4.0. For example, data(cats,package=MASS) works fine but data(cats,pac=MASS) doesn't. 2. drop1 doesn't seem to be as smart as before. In the sequence below, drop1 didn't produce what I expected it to produce. data(HairEyeColor); lab<-dimnames(HairEyeColor) HairEye<-cbind(expand.grid(Hair=lab$Hair,Eye=lab$Eye, Sex=lab$Sex),Fr=as.vector(HairEyeColor)) HairEye.fit<-glm(Fr~.^2,poisson,HairEye) drop1(HairEye.fit) The following sequence however works. HairEye.fit<-glm(Fr~(Hair+Eye+Sex...

...lse { require(plyr) result <- aaply(f, stratum, fun2way) ## order of dimensions screwed up! } result } For example, by hand (or with a loop) I can calculate the pieces and combine them as I want using abind(): > # apply separately to strata > t1<-fun2way(HairEyeColor[,,1]) > t2<-fun2way(HairEyeColor[,,2]) > > library(abind) > abind(t1, t2, along=3) , , 1 Brown Blue Hazel Black 32 11 10 Brown 53 50 25 Red 10 10 7 , , 2 Brown Blue Hazel Black 36 9 5 Brown 66 34 29 Red 16...

https://bugs.freedesktop.org/show_bug.cgi?id=54970 Bug #: 54970 Summary: EOG Eye of gnome shows black stripe in pictures with nouveau driver Classification: Unclassified Product: xorg Version: 7.6 (2010.12) Platform: x86 (IA32) OS/Version: Linux (All) Status: NEW Severity: normal Pri...