Displaying 8 results from an estimated 8 matches for "range2".
Did you mean:
range
2012 Jun 20
2
passing function parameters into a 'with' statement to dynamically pick out columns
...nerate plots and would like to be able pass in column names as a parameter. Here's a boiled down version of what I have right now:
pmts <- data.frame(date=c(1,2,3), all=c(5,6,7),maj=c(4,5,6),ind=c(3,4,5))
perc.mktshare <- function(df){
range1 <- floor(min(with(df, 100*ind/all)))
range2 <- ceiling(max(with(df, 100*ind/all)))
with(df,plot(date,100*ind/all,ylim=c(range1,range2),ylab="% Marketshare"))
}
perc.mktshare(pmts)
What I'd like to do is something like this:
perc.mktshare <- function(df, scaling.column){
range1 <- floor(min(with(df, 100*scalin...
2006 Nov 23
0
W3C Range specification conceptually flawed?
...t;
<body>
<div id="myText">FooBarBaz</div>
<script type="text/javascript">
myText = document.getElementById(''myText'').firstChild;
var range1 = document.createRange();
range1.setStart(myText, 3);
range1.setEnd(myText, 6);
var range2 = document.createRange();
range2.setStart(myText, 6);
range2.setEnd(myText, 9);
// as you can see in Firebug console we selected ''bar'' and ''baz''
console.log(''range1: '' + range1.toString() + '' range2:'' +
range2.toStrin...
2006 Oct 20
0
R sequence function (was: Re: [R] Recursive decreasing sequences)
...y to slow. I'm looking for a
> > vectorized method. Any help will be welcomed.
>
> How about this:
>
> Range <- c(2:6)
>
> > unlist(sapply(seq(along = Range), function(x) Range[x]:max(Range)))
> [1] 2 3 4 5 6 3 4 5 6 4 5 6 5 6 6
>
>
> Then:
>
> Range2 <- 2:6500
>
> > str(Range2)
> int [1:6499] 2 3 4 5 6 7 8 9 10 11 ...
>
>
> system.time(res <- unlist(sapply(seq(along = Range2),
> function(x) Range2[x]:max(Range2))))
> [1] 0.492 0.136 0.647 0.000 0.000
>
>
> > str(res)...
2006 Oct 20
2
Recursive decreasing sequences
Hello fellow R's,
I'm sure there must be an easy way to do this. But after digging in the
documentation and thinking about it for a while I couldn't figure it
out. I need to get a decreasing recursive vector in. I mean something
like this: if starting at 2, and ending at 6, the vector should be
2 3 4 5 6 3 4 5 6 4 5 6 5 6 6
An easy way would be to do this
x <-
2011 Oct 21
1
replicating SAS's "proc rank" procedure
Hi try this function ive written
it should be self explantory but let me know if you have any problems.
I've only been using R for a few eeeks so apologies if its not the most
efficient!
rankit2<-function(rankvar,cuts,data,factor) {
ranker<-rankvar
ranker<-0
range<-c(1:cuts)
range2<-range/cuts
range3<-quantile(factor,range2)
over<-length(factor)
for (i in 1:over){
for (j in 1:cuts) {
if (data[[i,1]]<=range3[[j]])
{data[[i,3]]<-j
##test<-j
##print(j)
}
if (data[[i,3]]>0) break
}
}
out2<-data
return(out2)
}
cars$rank<-0
try2<-rankit2(rank,...
2010 Jun 03
3
Multiple Serial Port Passthrough in HVM domU
...ing 4 upgraded processors, I don''t have a way of making these systems support VTd. However, I''m hoping there''s still a way for the serial port passthrough to work. I know there are two methods for serial port passthrough:
serial = /dev/ttyS0
and
irq=4
ioports=[range1,range2,etc]
Two questions: first, with the first method above, is there any way to pass through more than one serial port? Second, with the second method, is there any way to pass through serial port cards that don''t have traditional I/O ranges, but, instead, only seem to support MMIO? If I loo...
2016 Jan 16
2
Does Xapian support query string like "(age: 1..25) OR (age: 35..50)"? or "(age: 1..25) - (age: 35..50)"?
Hi, All
Does Xapian support query string like "(age: 1..25) OR (age: 35..50)"? or "(age: 1..25) - (age: 35..50)"?
I?want?to?get?the?results?with?age?range?from?1?to?25, 35?to?50.
I?tested,?"(age: 1..25) OR (age: 35..50)"? or "(age: 1..25) - (age: 35..50)" doesn't work.
Thanks
Best wish-Rafael Gu
2007 Mar 12
2
e2fsck hanging
I'm trying to run e2fsck on a ~6TB filesystem which is about 90%
full. We're doing backup to disk to this filesystem, and have a
number of hard links (link counts up to 90).
strace shows:
write(1, "Pass 2: Checking ", 17) = 17
write(1, "directory", 9) = 9
write(1, " structure\n", 11) = 11
mmap(NULL, 91574272,