Displaying 9 results from an estimated 9 matches for "diasandre".
2011 Feb 01
3
sum the values in a vector as a complete number
Hi
I am trying to create a function that is able to calculate this sum:
a<-c(2,3,5)
b<-(8,7)
with "a" meaning 235 and "b" 87. So the result of this sum would be 235 + 87
= 322.
I've searched a function like strsplit but that worked for integers and in
reverse - not spliting but combining.
Can you give me a hand on this please?
thanks
AD
--
View this message in
2011 Jan 06
4
Creating a Matrix from a vector with some conditions
Hi
Suppose we have an object with strings:
A<-c("a","b","c","d")
Now I do:
B<-matrix(A,4,4, byrow=F)
and I get
a a a a
b b b b
c c c c
d d d d
But what I really want is:
a b c d
b c d a
c d a b
d a b c
How can I do this?
thank you
A. Dias
--
View this message in context:
2011 Jan 04
5
Help with "For" instruction
Hi,
I am having a problem in doing something similar to this example:
Suppose I have this vector a, and from it I wish to create 5 other vector
each one with less one value than what object a has
So I have "a"
a<-c(1,2,3,4,5)
and I want
a1 that shoud have (2,3,4,5)
a2 that should have (1,3,4,5)
a3 that should have (1,2,4,5)
a4 that should have (1,2,3,5)
a5 that should have
2011 Jan 06
2
Help with IF operator
Hi,
I am with a problem on how to do a comparison of values. My script is as
follows:
repeat{
cat("How many teams to use? (to end write 0) ")
nro<-scan(n=1)
if(nro==0)break
cat("write the", nro, "teams names \n")
teams<-readLines(n=nro)
if (teams[1]==teams[2)next
else print(teams)
}
On this example I only compare teams 1 name with teams 2 name, and if they
2011 Jan 01
3
How to make this script ask again
Hi,
as an example I have made this script to give the user the answer if a
number is odd or even:
{
cat("Please, enter a number (Zero ends)")
n<-scan(n=1)
if(n==0)break
i<-("The number is odd")
p<-("The number is even")
if (n%%2==0)
p else i
}
If you run this script it will only work once, I mean, after it gives you
the answer is won't ask for
2011 Jan 18
4
Relative frequency on a character vector
Hi,
I have this character vector:
A<-c("Tell me how many different letter this vector has?")
Is there a way with R that it can let me know how many different letters I
have on this vector?
If I use nchar(A) que gives me the number 50. With this function he is
counting all the letters present and also spaces between the words. Can we
also not count the spaces between words?
Then
2010 Dec 31
1
Silhouette function problem
Hi,
I am using code below to get a plot that will show me on the X axis the
number of clusters and on the Y axis the cluster average widths. However I
am getting this error:
Error in summary(silhouette(cutree(d, x), dist(iris[, -5])))$si.summary :
$ operator is invalid for atomic vectors
the code I am using is:
avgs<-sapply(1:20,function(x)
summary(silhouette(cutree(d,x),
2011 Feb 02
2
matrix and a function - apply function
Hi
I have this function and this matrix:
function(x,y) x+y/x
m<-matrix(c(1,2,4,2,10,8),3,2)
> m
[,1] [,2]
[1,] 1 2
[2,] 2 10
[3,] 4 8
each row represent a point (x,y) in a chart and I want via my fucntion to
calculate the image in order to get this results:
for point (1,2) I would get 1+2/1 = 3
for point (2,10) I would get 2+10/2 = 7
for point (4,8) I would get
2011 Jan 05
1
List to a summary table
Hi
Suppose you have the code below. The result I get from the cat function is
from the avgs object. Now, I have 30 diferent objects like this and I wish
to make a summary table, something like:
Avgs1 Avgs2
Avgs3
i= 2 average= 0.515983i i= 2 average= 0.746983 i= 2
average= 0.2665983
i= 3 average=