similar to: function inside ifelse

I have a vector like this: h <- c(4, 6, NA, 12) and I create the secound logical vector like this: g <- c(TRUE, TRUE, FALSE, TRUE) And my problem is that I would like to get a new "m" vector as a rasult "h" and "g"( as dot-matrix printer) but with missed "NA" value, for example: m = (4,6,12) Do you have any idea? -- View this message in

I'm looking for library which let mi convert dates for example like this: 00-06-05 00:00 00-08-06 00:00 00-08-16 00:00 00-05-23 00:00 00-01-14 00:00 00-10-28 00:00 and as a result I want to get a 3 levels -- View this message in context: http://www.nabble.com/library-which-convert-dates-tp23295853p23295853.html Sent from the R help mailing list archive at Nabble.com.

Do you know any good editor R? -- View this message in context: http://www.nabble.com/Editor-R-tp23822342p23822342.html Sent from the R help mailing list archive at Nabble.com.

I think it's easy problem but I can't find solution. I have a vector: vec <- c (23.4, 3.0, 14.7, 7.7) and I would like to add all values which are inside my vector to each other. as a result a want to get one value like sum all values from my vector- sth=(23.4 + 3.0 + 14.7 + 7.7) PS. I usually don't know how long is my vector in my function -- View this message in

I have a database like this: "kol1";"kol2";"kol3" ... "2";"5";"9" "9";"6";"6" "4";"6";"5"... I looking for a kod in R which let mi aviod in column unnecessary value, for example number "9". So, if I have: Kol1 2 9 4 4... after loop in R I would like to get my

Hello! I wont to use a function is.na() I have two vectors: > a=c(1,NA,3,3,3) > b=c(0,0,0,0,0) and when I use is.na function it's ok: > is.na(a) [1] FALSE TRUE FALSE FALSE FALSE but I would create sth like this: for i in 1:length(a){ if (wsp[i] == is.na(a)) {b=43} } or like this if(is.na(a)) b=3 else a [1] 1 NA 3 3 3 but I always get an error: the condition has

Dear readers, S-Plus have a rts function (Regular Time Series), which is used like so: fveks<-read.csv('http://louise.hoffman.googlepages.com/veks.csv',header=TRUE,sep=',') attach(fveks) acf(ts.intersect(rts(HC.f),rts(Ta.f),rts(GR.f),rts(W.f))) Warning the csv file is 750kB. Can the same be done in R? Lots of love =) Louise

Hi, I need math function which is used in: isoMDS, Sammon and metaMDS method. Anybody know where I may find it? Any manual or webside? I would be very happy Thanks a lot ! -- View this message in context: http://n4.nabble.com/math-function-MDS-method-tp1008294p1008294.html Sent from the R help mailing list archive at Nabble.com.

I have database write as .csv file. When I want to get sth from my database I get NULL, but I know that there is sth! For example: > data$ID NULL > data$kod NULL but command like below is always recognize by R > data[2,3] [1] '082' In my opinion this problem is also connect with my attempt to create a tree. I always get errors. > t.tree0=rpart(ID~.,t.train) Error in

When I want to install "dprep" and I always get information: > install.packages("dprep") Warning in install.packages("dprep") : argument 'lib' is missing: using 'C:\Users\Documents/R/win-library/2.8' --- Please select a CRAN mirror for use in this session --- Warning message: package ?dprep? is not available I have tried a lot of mirror...

Hello! I have a function: zywnoscCalosc<- function( jedzenie, n1, n2, n3, n4, d1, d2, d3, d4 ) { ndf <- data.frame(nn1=n1,nn2=n2,nn3=n3,nn4=n4) ddf <- data.frame(dd1=d1,dd2=d2,dd3=d3,dd4=d4) for (i in 1:length(n1)){ wekt_n = ndf[i,] wekt_n_ok = wekt_n[!is.na(wekt_n)] dl_n = length(wekt_n_ok) wynik = (1*wekt_n_ok)/(1*dl_n) } } and I get an error like this: Error in 1 * wekt_n_ok :

Hi, I have a vector a=c(NA, 3, 4, 4, NA, NA, 3) and I would like to use is.na(a) function to get a vector like this: wy=(1,2,2,2,1,1,2) - you know, this vector create 1 or 2 depends on value in vector "a" This is my short code but something is wrong and I don't know what... for (i in 1:7){ a=c( NA, 3, 4, 4, NA, NA, 3) fun1=function(x){ x=1 print(x) } fun2=function(x){

Hello, I want call my function (use my database) and write every result in matrix "wynik" but I always get an error: Error in wynik[, i] <- dodawanie(wzorzec, wzorzec1) : number of items to replace is not a multiple of replacement length I'll be very happy if sb help me dodawanie<- function ( wzorzec, wzorzec1){ wynik1<-wzorzec + wzorzec1 wynik2<-wzorzec *

Dear all, I have installed Samba (3.6.6) on Debian wheezy and configured it to authenticate against LDAP (encrypted passwords, no lanman). I want simple shares with user security. I have configured PAM/NSS from the same LDAP and it works fine. WinXP works fine, smbclient works fine, but Windows 7 only works for SOME passwords. Some work, some do not. Samba is configured with restricted LDAP

Hi I have installed rpart in my Linux (PLD) but I don't know how I may find help conect this package? Here is my instalaction: > install.packages("rpart",dependencies=TRUE) --- Please select a CRAN mirror for use in this session --- trying URL 'http://r.meteo.uni.wroc.pl/src/contrib/rpart_3.1-46.tar.gz' Content type 'application/x-gzip' length 136572 bytes (133

Do you heve any idea why I get after this instruction everywhere false? > seq (0, 1, by=0.1) == 0.3 [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE But after different step it's ok: > seq(0, 1, by=0.1) == 0.4 [1] FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE FALSE -- View this message in context:

Hi I'm a problem with installing "rJava" in Linux I have got in my system : java-sun, java-sun-tools, java-sun-jre but if I wont install rJava I got a problem like this: > install.packages("rJava", dependencies = TRUE) --- Please select a CRAN mirror for use in this session --- trying URL 'http://cran.mirroring.de/src/contrib/rJava_0.8-2.tar.gz' Content type

Full_Name: David Pleydell Version: 2.2.1 OS: Debian Etch Submission from: (NULL) (193.55.70.206) There appears to be a conflict between the chol functions from the Matrix and the SparseM packages. chol() can only be applied to a matrix of class dspMatrix if SparseM is not in the path. with gratitude David > library(Matrix) > sm <- as(as(Matrix(diag(5) + 1), "dsyMatrix"),

Hello, I want to know what do you think about my function. I know that it isn't briliant :/ but what do you think? What I should do that my function will be better? (now is very slow and not ideal, sometimes I also get a mistake!) ########## My function ############################################# dzieci<-transform(dzieci, zywnosc=0) zywnoscCalosc<- function( jedzenie, sklep, n1, n2,

I have data that looks like below and I would like to re-order the values within the "date" column. I would like to have each year organized like so: Sep-71 Oct-71 Nov-71 Dec-71 Jan-71 Feb-71 Mar-71 Apr-71 May-71 Jun-71 Jul-71 Aug-71 Sep-72 Oct-72 etc... Is there any way I can order the column in my own fashion and just move Sep-Dec to the beginning of each year? I am planning on doing