Using R: How to repeat a function I made thousands of times keeping a count of which number it ends on for each repeat -


here's code made far:

z = vector() for(i in 1:20){   alkie = function(t=20, lambda=2.5, k=2, mu=3) {     t = 0     n = 0     = 1     a.t = rexp(1, lambda)     d.t = inf     while(t[i] < t) {       t[i+1] = min(a.t, d.t)       n[i+1] = n[i] + ifelse(a.t < d.t, 1, -1)       if(a.t < d.t) {         a.t = a.t + rexp(1,lambda)         if(n[i+1] == 1) d.t = t[i+1] + rgamma(1, k, mu)         if(n[i+1] == 6) d.t = t[i+1] + rgamma(1, 0, mu)       }       else         d.t = ifelse(n[i+1] == 0, inf, t[i+1] + rgamma(1, k, mu))       = + 1     }     cbind(t=t, n=n)   }  x = alkie(t=20, lambda=2.5, k=2, mu=3) n = nrow(x) plot(c(x[1,1], rep(x[-1,1], each=2), x[n,1]), rep(x[,2], each=2), type="l",  xlab="t(mins)", ylab="n(t)", col="blue")

how store counts?


Comments

Post a Comment

Popular posts from this blog

javascript - Bootstrap Popover: iOS Safari strange behaviour -

i looking through twitter bootstrap documentation, , i'm interested in implementing dismissible popover when button clicked. here example bootstrap's docs: http://getbootstrap.com/javascript/#dismiss-on-next-click when press "dismissible popover" button os x safari browser works fine. when access same link above ios safari, button not work. is, popover not dismissed on click. why button not working ios safari? the example linked using data-trigger="focus" attribute. try changing data-trigger="click" . <a tabindex="0" class="btn btn-lg btn-danger" role="button" data-toggle="popover" data-trigger="click" title="dismissible popover" data-content="and here's amazing content. it's engaging. right?">dismissible popover</a>
Read more

Website Login Issue developed in magento -

i have website developed using magento . able login. right now, login failed. infact operations interacts user table failing. need know issue. how figure out? first clear try clear log file second make sure have not upgraded magento and 3rd make sure db accessible in magento -harry p
Read more

Can the constants be defined inside a model file of a framework in PHP? -

i'm using phpfox framework. i've define 2 constants used 2 functions present within model class file. can define constants @ beginning of model class file or cause issue or against coding standards? please me in regard. following 1 method model class file. i want write following code : <?php /** * [phpfox_header] */ /*header('content-type: text/event-stream'); header('cache-control: no-cache');*/ defined('phpfox') or exit('no dice!'); /** * * * @copyright [phpfox_copyright] * @author raymond benc * @package phpfox_service * @version $id: service.class.php 67 2009-01-20 11:32:45z raymond_benc $ */ class notification_service_process extends phpfox_service { /** * class constructor */ public function __construct() { $this->_stable = phpfox::gett('notification'); } public function add($stype, $iitemid, $iowneruserid, $isenderuserid = null) ...
Read more