search for: lena

Hi, my name is Ellen. I want to ask you about R Code. I got a code for extracting a pixel value, but I can't compile it..  It is said "Error in is.data.frame(x) : object 'lena' not found" Here is the original full code: library(pixmap) lena <- read.pnm("oldlennablur.pgm") write.table(lena@grey,"mylenna", quote=FALSE, row.names = FALSE, col.names= FALSE) plot(pixmapGrey(as.matrix(read.table("mylenn")))) do you know why i got th...

...PORT-format. I assume that the file should have and .xpt extension. But when I try to open the file in R I get only the message "compressed" written all over. So, probably I should un-compress the file in the R-program, the question is how? Very greatful for quick help! Best regards/ Lena Lindahl ============================ Swedish Institute for Social Research Stockholm University S-106 91 Stockholm Sweden Telephone: +46 8-16 34 59 Fax: +46 8 15 46 70 E-mail: Lena.Lindahl at sofi.su.se http://www.sofi.su.se -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-....

Dear All, Sorry to bother I want to write a function in R using if Say I have a dataset x, if x[i]<0, then x[i]=x[i], if x[i]>0, then x[i]=0 for example, x=-3:3, then using the function, x becomes [-3,-2,-1,0,0,0,0] I write the codes as follows, gjr=function(x) {lena=length(x) for(i in 1:lenx) if (x[i]<0) return (x[i]) if (x[i]>0) return (0) x} but then, doing gjr(x? it only comes out with one number Does anyone have any suggestions? I appreciate a lot! Sincerely, Zoe -- View this message in context: http://r.789695.n4.nabble.com/if-function-proble...

.... FeketeJAN MEAN SUM_ AMAZON 144.4997874 68348.4 NILE 5.4701955 1394.9 CONGO 71.3670036 21196.0 MISSISSIPPI 18.9273250 6511.0 AMUR 1.8426874 466.2 PARANA 58.3835497 13486.6 YENISEI 1.4668313 592.6 OB 1.4239179 559.6 LENA 0.9342164 387.7 NIGER 4.7245709 826.8 ZAMBEZI 76.6893794 8665.9 YANGTZE 10.6759257 1729.5 I want to do a line plot of the value of Amazon 'Sum' (in this case, 68348.4) for each of the 12 data frames. I've tried doing this as follows: plot(FeketeJAN[1,...

Hi all, i'm new R user and i need some help: i have two vectors (A and B) and i need create another vector (C) from the subtraction of A's values with the B's values. How can i estimate the probability of C's values if i have differents values combinations of A and B that can result in the same value? like 90 -20 = 70 and 91 - 21 = 70. example: B = {18 18 18 19

...m regressing Time and Weight, and then predicting Weight at different Time. The format of the Time data is day/month/year. How can I get R to use time series data such as this? Keith -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox at noaa.gov marlinkcox at gmail.com U.S. (907) 789-6603

...rt wohl auf aov- Datentypen. F??hre ich die Anova dann mit dem Befehl aov durch und dann den Tukey Test, bekomme ich als Antwort, dass keine Faktoren im gefitteten Model vorhanden sind. Gibt es eine M??glichkeit den Tukey Test an ein GLM anzuschlie?en, wenn ja, wie? Vielen Dank Lena Neu: WEB.DE De-Mail - Einfach wie E-Mail, sicher wie ein Brief! Jetzt De-Mail-Adresse reservieren: https://produkte.web.de/go/demail02

Hi I want to du a sensitivity analysis using Latin Hypercubes. But my parameters have to fulfill two conditions: 1) ranging from 0 to 1 2) have to sum up to 1 So far I am using the lhs package and am doing the following: library(lhs) ws <- improvedLHS(1000, 7) wsSums <- rowSums(ws) wss <- ws / wsSums but I think I can't do that, as after the normalization > min(wss) [1]

...c4 3.986347 3.40 5 c c5 4.099442 3.58 6 c c6 4.150522 3.64 7 h h4 5.187792 6.32 8 h h5 6.713422 6.44 9 h h6 5.168555 5.62 Keith -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 [[alternative HTML version deleted]]

...the first and second derivatives. I can calculate the derivatives by hand but would like to get R to do this for me. by hand: H'(t) = 3*t^2 - 12*t + 5 H''(t) = 6*t-12 Keith -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 [[alternative HTML version deleted]]

...",rot=16), ylab = list("Length error (%)",rot=118), scales = list(arrows = FALSE), screen = list(z = 20, x = -57, y = 5)) Thanks ahead of time. -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 [[alternative HTML version deleted]]

...]) num.rows <- length(X[,1]) Z <- matrix(nrow=num.rows, ncol=num.x.col*num.y.col) for( i in 1:num.rows) { Z[i,] <- as.vector(X[i,] + ((Y[i,])^2 %*% t(X[i,])^-1 )) } -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 [[alte...

...his: <<echo=TRUE, fig=TRUE, label=Fig1>>= There was no error message. Does anybody have an idea? Any changes in the Sweave-package? Or a missing driver or something like that? I recently switched to another OS (Fedora RedHat) - might that be the reason? Grateful for any suggestions, Lena --

...CONGO 682.8007 722.63971 205523 214624 MISSISSIPPI 363.0758 142.59883 124535 49054 AMUR 143.5857 89.30434 36040 22594 PARANA 702.3793 388.03030 162952 89635 YENISEI 208.1396 174.52722 83464 70509 OB 197.0399 162.82697 79013 63991 LENA 118.1100 77.49638 48307 32161 NIGER 374.8258 212.25714 66719 37145 ZAMBEZI 500.0000 485.87610 57000 54904 YANGTZE 358.4172 256.80246 58422 41602 For each of the rivers (which are the row names of this matrix), I wish to plot a bar for Simulated Me...

...under the curve red, but rather under the llm line. x=seq(0,5,len=100) y=-(x-5)^2 llm<-lm(y~x) plot(x,y) polygon(c(x,x[length(x)]), c(y, y[1]), col='red') abline(llm) keith -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 [[alternative HTML version deleted]]

...1, : subscript out of bounds* Which I understand to mean that the bounds of the indicated vector/matrix have been violated. I am however at a loss as to how to resolve this. Any advice would be appreciated Cheers! JR -- Jonathan Richar Doctoral candidate UAF SFOS Fisheries Division 17101 Pt. Lena Loop Rd. University of Alaska Fairbanks Juneau, AK 99801 Phone: (907) 796-5459 [[alternative HTML version deleted]]

...d I get the following Error message: Error in weights == WEIGHT : comparison (1) is possible only for atomic and list types It works perfectly if I don't use the ", weights==WEIGHT" bit Could you please let me know what I am doing wrong? Thank you in advance, Lena [[alternative HTML version deleted]]

Upon fresh installation of R-patched and rimage on openSUSE 11.3 box, simple fftw on renown lena image cause memory free failure. Quick: Go to the end of this mail and read the error message from R Thoruogh: Find detailed step-by-step how sopprt library fftw2 was installed and how rimage was installed. Regards Mads Jeppe VERSIONS ======== openSUSE -------- # cat /etc/SuSE-release op...

...uot;M","M","M","M","F","F","F","F")) data<-cbind(x,y) t.test(x,by=list(y)) Thank you ahead of time. keith -- M. Keith Cox, Ph.D. Alaska NOAA Fisheries, National Marine Fisheries Service Auke Bay Laboratories 17109 Pt. Lena Loop Rd. Juneau, AK 99801 Keith.Cox@noaa.gov marlinkcox@gmail.com U.S. (907) 789-6603 [[alternative HTML version deleted]]

...rt legend(leg_loc[i,1],leg_loc[i,2], legend= paste( "Mean=",round(m,3),'\n', "SD=",round(std,3),'\n', "Median =",round(median,3),'\n', "IQR=", round(iqr,3)),bty="n") } Do you know why it is happening? Thank you in advance, Lena Elena Wilson DBM Consultants Pty Ltd 5-7 Guest Street, Hawthorn, Victoria 3122, Australia T: (61 3) 9819 1555 www.dbmconsultants.com Please consider the environment before printing this email. NOTICE - The information contained in this email may be confidential and/or privileged. You should only...