r - Create variable/column equal to another column/factor frequency -

-

the short

i have 

x <- data.frame(animal = c("ant", "cat", "dog", "ant", "dog", "ant", "ant"))

and want create add column freq x such that

> x   animal freq 1    ant    4 2    cat    1 3    dog    2 4    ant    4 5    dog    2 6    ant    4 7    ant    4

the long

i have 

> x <- data.frame(animal = c("ant", "cat", "dog", "ant", "dog", "ant", "ant")) > x   animal 1    ant 2    cat 3    dog 4    ant 5    dog 6    ant 7    ant

i know that

> table(x) x ant cat dog    4   1   2

or

> count(x)   animal freq 1    ant    4 2    cat    1 3    dog    2

and 

> subset(count(x), animal == "ant")$freq [1] 4

and that

> subset(count(x), animal == x[1,1])$freq [1] 4 > subset(count(x), animal == x[2,1])$freq [1] 1

but i'm struggling put add column freq x such that

> x   animal freq 1    ant    4 2    cat    1 3    dog    2 4    ant    4 5    dog    2 6    ant    4 7    ant    4

i suspect recommendation use apply in way can't function work properly. can following work

> fn.freq <- function(freqtable, variable){ +   return(subset(freqtable, animal == variable)$freq) + } > fn.freq(count(x),x[1,1]) [1]

but still has animal hard coded function when want dynamic/a function variable attempts @ fail miserably.

any appreciated.

you can use ave:

x <- transform(x, freq = ave(as.integer(animal), animal, fun = length))  #   animal freq # 1    ant    4 # 2    cat    1 # 3    dog    2 # 4    ant    4 # 5    dog    2 # 6    ant    4 # 7    ant    4

Comments

Post a Comment

Popular posts from this blog

yii2 - Yii 2 Running a Cron in the basic template -

-
i have seen instructions on running cron in advanced template, cant figure out how on basic template. have following controller in basic controllers folder. <?php namespace app\controllers; use yii\console\controller; /** * cron controller */ class croncontroller extends controller { public function actionindex() { echo "cron service runnning"; } public function actionmail($to) { echo "sending mail " . $to; } } i have navigated root of application , tried these comands yii cron php yii cron im getting unknown comand "cron" i know old question failed find actual answer this. if @ code yii exec file you'll notice requires /common/config/aliases.php file console/config/main.php. can naturally change these or copy on these advanced template. hope solves problem wanting same thing.
Read more

asp.net - 'System.Web.HttpContext' does not contain a definition for 'GetOwinContext' Mystery -

-
i realize question might seem trivial some, it's these types of things find myself fighting quite bit , want make sense of despite seeming losing battle in .net (for me anyway). so, if following: using system.web; ... applicationuser user = system.web.httpcontext.getowincontext().getusermanager<applicationusermanager>().findbyid(system.web.httpcontext.user.identity.getuserid()); that produces error in title , red getowincontext() , error cannot resolve symbol 'getowincontext()' however, if following (remove system.web in front of httpcontext ), works expected (or @ least no errors): using system.web; ... applicationuser user = httpcontext.getowincontext().getusermanager<applicationusermanager>().findbyid(system.web.httpcontext.user.identity.getuserid()); however, if (same line that's working using system.web commented out): //using system.web; ... applicationuser user = httpcontext.getowincontext().getusermana...
Read more

mercurial graft feature, can it copy? -

-
there new feature in mercurial 3, called 'graft' (graft local). job of moving change-set different branch. is there way "copy" change-set branch? i interested in in moving stuff qa branch production branch, still need code reside in qa. want copy. found , have tried few things, maybe it'll become clear more tinkering , reading... does have better way of 'cherry picking' change-sets move cross branch (or trunk)??? graft copies changesets, doesn't move them. hg graft (emphasis mine): this command uses mercurial's merge logic copy individual changes other branches without merging branches in history graph. known 'backporting' or 'cherry-picking' . default, graft copy user, date, , description source changesets.
Read more