similar to: Line feed for a long character string

Dear all, I just want to determine if the characters in a character string are the same or not. For example, temp <- c("aa", "aA", "ab") How do I determine the first one have the two same ?a?, and the second and third have the different characters? Thanks in advance. Lisa -- View this message in context:

Dear all, I have a dataset that looks like this: x <- read.table(textConnection("col1 col2 3 1 2 2 4 7 8 6 5 10"), header=TRUE) I want to rewrite it as below: var1 var2 var3 var4 var5 var6 var7 var8 var9 var10 1 0 1 0 0 0 0 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 1 0 0

Dear all, I have a question about how to set arguments in my own function. For example, I have a function that looks like this: my.f <- function(a = x1, b = x2) { x1 = equation 1 x2 = equation 2 x3 = equation 3 y = a + b } x1, x2, and x3 are temporary variables (intermediate results) calculated from other variables within the funciton. I want to use two of these three

Dear all, I am trying to write a script to pause the execution of a function and provide some additional commands to the function and then continue execution of the function. For example, when my function detects a wrong number in a dataset, the function pauses automatically and returns information on the screen: ?There is a wrong number in the dataset. Would you like to correct it? ? If I

Hello, All, I have a dataset that looks like this: x <- matrix(c( 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 2, 1, 1, 2, 1, 1, 3, 1, 1, 3, 1, 1, 3, 1), ncol = 5, byrow = T, dimnames = list(1:10, c("gender", "race", "disease"))) I want to write a function to produce several matrices including only ?TRUE? and ?FALSE? for the different levels of the

Dear all, I have a dataset that looks like this: inividual var1 var2 ? 1 1 1 ? 2 1 2 ? 3 2 1 ? 4 2 2 ? ? ? ? ? I will random sample 2 individuals from this dataset based on a set of random numbers, e.g., rn1 <- c(0, 0, 1, 1), rn2 <- c(0, 0, 2, 0), rn3 <- c(1, 0, 0, 1), rn4 <-

Dear all, I have two sets of numbers that look like a <- c(1, 2, 3, 3, 4, 4, 5, 6, 1, 2, 2, 3, 1, 2, 1, 2, 3, 3, 4, 5, 1, 2, 3, 4) b <- c(1, 5, 8, 9, 14, 20, 3, 10, 12, 6, 16, 7, 11, 13, 17, 18, 2, 4, 15, 19) I just want to use ?b? to encode ?a? so that ?a? looks like a1<- c(1, 5, 8, 8, 9, 9, 14, 20, 3, 10, 10, 12, 6, 16, 7, 11, 13, 13, 17, 18, 2, 4, 15, 19) Does anyone have a

Dear all, I have a question about deleting components of a list. For example, I have a list that looks like this: [[1]] var1 var2 var3 1 3 4 2 2 1 [[2]] var1 var2 var3 2 5 1 2 1 7 [[3]] var1 var2 var3 1 6 7 3 8 4 How to delete, say, the first columns of the list or the second rows? Thank in advance. Lisa -- View

Dear all, I have a question about how to suppress intermediate results in a function on console. For example, I will use summary() in my own function that looks like: myfunction <- function(?) { ? Summary(x) ? } Then myfunction() will print ?x? on console that is intermediate result and doesn?t need showing. Does someone have any idea or any suggestion? Thank you in advance. Lisa

Hello, All, I want to write a function to do some works based on the arguments. For example, bind some variables (arguments) as this: myfunction <- function(arg1, arg2, arg3, ?) { x <- cbind(arg1, arg2, arg3, ?) } myfunction(arg1, arg2, arg3, ?) The function can automatically determine the number of arguments and bind them, which means if I assign 2 arguments, the function can bind

Hi, everybody, I just want to pass arguments to a function as below: range <- c(0.1, 0.5) runif(1, range) But it doesn?t work. Does anyone have any suggestions to offer? Thanks. Lisa -- View this message in context: http://r.789695.n4.nabble.com/Arguments-of-a-function-tp3387643p3387643.html Sent from the R help mailing list archive at Nabble.com.

Hello, R users, I have a dataset that looks like this: id var1 var2 1 1 3 2 3 1 3 2 1 4 1 2 5 2 3 I want to split one column to two columns with 1 = 1 and 1, 2 = 1 and 2, 3 = 2 and 2: id var1.1 var1.2 var2.1 var2.2 1 1 1 2 2 2 2 2 1 1 3 1 2

Hi, everybody, I have a problem and need your help. There are two columns that look like this: [1,] "t" "f" [2,] "f" "t" [3,] "t" "f" [4,] "t" "t" [5,] "f" "f" I just want to generate the third column based on these two columns. First, I randomly choose one of the two columns,

When R prints warnings, they often go "out of the line", it would be better if they where wrapped with writeLines(strwrap ... I tried to do that , changing the function warnings, but it has only effect when called explicitely, not when R prints the warnings unasked. Anyhow, here is the changed warnings: warnings <- function (...) { if (!(n <- length(last.warning)))

Hi All, I'm wondering how I can print one large/long character on several lines so that the output will not overflow a page. Setting fill be TRUE or even numbers does not help. An example is below: ipuFile <- file("input.txt", "w") cat("This is a very long character and I want to print it on several lines. This is a very long character and I want to

I have a number of strings in a vector, and want the output to be seperated by commas. > t [1] "35004" "35005" "35006" "35007" "35010" "35014" "35016" So I want want it to look like: "35004", 35005", "35006", "35007",... Can anyone help? I initially thought strsplit would be the

hi, what I want to do is assigning following code to any object. k<-paste("thank") writeLines(strwrap(k, width = 80,indent = 7,exdent = 6)) To assign the "writeLines" code, I try this a<-writeLines(strwrap(k, width = 80,indent = 7,exdent = 6)) or assign(a,writeLines(strwrap(k, width = 80,indent = 7,exdent = 6))) but it doesn't work. is there any way to solve

I am using barplot, and barplot2 in the gregmisc bundle, in the following way: barplot2(sort(xtabs(expend / 1000 ~ theme)), col = c(mdg7, mdg8, mdg3, mdg1), horiz = T, las = 1, xlab = "$ '000", plot.grid = T) The problem is that the values of 'theme', which is a factor, are in some cases rather long, so that I would like to wrap/split them at a space once they

Hi everyone. I have a long label that I would like to split. I found that I could use "strwrap" for simple text. However, this is not working with this label: str = expression(paste("< 20 ?m phytoplankton ","(cells ? ",mL^-1,")")) plot(...., ylab = strwrap(str,20),...) I suspect this is because I'm using "expression" for form my label.

Hi all, I've got some image plots on which I'd like to include some gene information (in the margins using mtext). Unfortunately, the description is rather long and will need to be wrapped to fit on several lines. From what I know about mtext, it's really only meant for single-line labels, not paragraphs. Here's some sample code of the idea I'm trying to accomplish: