Displaying 10 results from an estimated 10 matches for "sim4".
Did you mean:
sim
2007 Jul 14
3
How to read many files at one time?
I want to load many files in the R. The names of the files are "Sim1.txt", "
Sim2.txt", "Sim3.txt", "Sim4.txt", "Sim5.txt" and so on.
Can I read them at one time? What should I do? I can give the same names in
R.
Thanks.
For example:
> tst=paste("Sim",1:20,".txt",sep="") # the file names
> tst
[1] "Sim1.txt" "Sim2.txt" "Sim...
2012 Mar 16
2
Elegant Code
...eta1 <- rgamma(50,0.5,(1/b1))
sim1 <- rpois(50,theta1)
b2 <- rigamma(50,1,1)
theta2 <- rgamma(50,0.5,(1/b2))
sim2 <- rpois(50,theta2)
b3 <- rigamma(50,1,1)
theta3 <- rgamma(50,0.5,(1/b3))
sim3 <- rpois(50,theta3)
b4 <- rigamma(50,1,1)
theta4 <- rgamma(50,0.5,(1/b4))
sim4 <- rpois(50,theta4)
b5 <- rigamma(50,1,1)
theta5 <- rgamma(50,0.5,(1/b5))
sim5 <- rpois(50,theta5)
par(mfrow=c(1,5))
boxplot(sim1)
boxplot(sim2)
boxplot(sim3)
boxplot(sim4)
boxplot(sim5);
Thanks,
Raphael
2007 May 12
1
mtrace() fails
...Loading required package: mvbutils
Loading required package: utils
MVBUTILS: no "tasks" vector found in ROOT
Loading required package: tcltk
Loading Tcl/Tk interface ... done
[Previously saved workspace restored]
> source("marbles.r")
> mtrace(sim4)
> sim4(100)
Error in all.levs[[j]] : subscript out of bounds
Here's my setting:
> sessionInfo()
R version 2.5.0 (2007-04-23)
i686-redhat-linux-gnu
locale:
LC_CTYPE=en_US.UTF-8;LC_NUMERIC=C;LC_TIME=en_US.UTF-8;LC_COLLATE=en_US.UTF-8;LC_MONETARY=en_US.UTF-8;LC_ME...
2015 Feb 27
2
situation with ivr and four-channel gateway
2015-02-27 10:25 GMT-06:00 A J Stiles <asterisk_list at earthshod.co.uk>:
> O.K. So what does your existing Dial() statement in extensions.conf look
> like?
>
apology, put the gateway was sangoma but is a openvox ,
all my outgoing calls out for this context:
[my-mobile-out]
exten => _NXXXXXXX,n,Dial(SIP/1003/${EXTEN},55,rT)
exten =>
2015 Mar 02
0
situation with ivr and four-channel gateway
...ot something that is within your control; they have
already been routed onto a line by your telco. So you will need to speak to
someone at your telco about doing this.
As a temporary measure, you could try setting up divert-on-busy so SIM1
diverts to SIM2, SIM2 diverts to SIM3, SIM3 diverts to SIM4 and SIM4 diverts
to SIM1. You can do this with specially-crafted Dial() statements, or by
temporarily inserting the SIMs in an old mobile phone. See your telco's
website for details of setting up call diversion.
--
AJS
Note: Originating address only accepts e-mail from list! If reply...
2005 Mar 31
2
how to simulate a time series
...as.data.frame(sim)
colnames(allsim) <- paste("sim",1:5,sep="")
all <- cbind(rdtb,allsim)
#--------------------------------
I don't understand why the simulation runs generate virtually identical
values:
> all[100:105,]
rdtb sim1 sim2 sim3 sim4 sim5
100 2.3863636 1.065661 1.065661 1.065661 1.065661 1.065661
101 1.9318182 2.606093 2.606093 2.606093 2.606093 2.606093
102 2.2954545 3.854074 3.854074 3.854074 3.854074 3.854074
103 2.5882353 4.880240 4.880240 4.880240 4.880240 4.880240
104 2.0227273 4.917622 4.917622 4.917622 4.917622...
2009 Mar 17
0
(no subject)
...20)
set.seed(1)
iso <- predict(g.dummy, newdata = xy, nsim = 10)
gridded(iso) = ~x+y
# spplot(iso,main="isotropic") # not essential for this question
# I could make a dataframe like:
diso<-data.frame(iso)
diso[1:4,]
# which results in:
# x y sim1 sim2 sim3 sim4 sim5 sim6
sim7 sim8 sim9 sim10
# 1 1 1 0.4093776 1.0752794 -1.5654566 0.6183240 -2.196812 0.4545051
-0.06372423 -2.1544707 -1.131036 -0.4008869
# 2 2 1 0.8133436 0.9041941 -0.9712924 0.4319641 -2.432893 1.0770354
0.21302299 -1.6938882 -2.065350 -0.5331123
# 3 3 1 0.8238881...
2012 Jan 24
2
Null models of species co-occurrence
I am currently testing species co-occurrence patterns using null models and
the oecosimu() function within the vegan() package. My issue is that none of
the methods appear to be the ones that I want. The methods listed are r0,
r1, r2, r2dtable, swap, tswap. However, I want to know how to go about
implementing fixed row algorithms, as suggested in Gotelli 2000 in Ecology.
Also, the null models
2014 Jan 28
3
[LLVMdev] MergeFunctions: reduce complexity to O(log(N))
Hi Stepan,
Sorry for the delay. It's great that you are working on MergeFunctions
as well and I agree, we should definitely try to combine our efforts to
improve MergeFunctions.
Just to give you some context, the pass (with the similar function
merging patch) is already being used in a production setting. From my
point of view, it would be better if we focus on improving its
capability
2014 Jan 30
3
[LLVMdev] MergeFunctions: reduce complexity to O(log(N))
...0 77386 0 0.01 77356 0 0.01 76416
showbord.ll 1 61149 0 0.01 61123 0 0.02 61123
showinst.ll 2 10883 0 0.01 10857 0 0.01 10857
ShrinkDecoder.ll 8 60165 0 0.02 60131 0 0.02 60131
shr.ll 17 14329 0 0.01 14306 0 0.01 14429
sieve.ll 2 7338 0 0.01 7319 0 0.01 7319
sig.ll 3 54374 0 0.01 54357 0 0.01 54357
sim4b1.ll 41 612189 0 0.06 612170 0 0.06 612170
sim4.init.ll 14 155560 0 0.02 155541 0 0.02 155541
sim_debug.ll 1 10622 0 0.01 10592 0 0.01 10592
sim.ll 16 297969 0 0.03 297956 0 0.03 297956
simple.ll 3 13217 0 0.01 13201 0 0.01 13201
simple_rethrow.ll 4 7766 0 0.01 7747 0 0.01 7747
simple_throw.ll 3 47...