# r function

1. ### How to compute the residual standard deviation from glmer() function in R?

I want to extract standard deviation of residual from glmer() function in R . So I wrote : lmer_obj = glmer(Y ~ X1 + X2 + (1|Subj), data = D, family = binomial) sigma(lmer_obj) I noticed that the last command sigma(lmer_obj) returns always "1" irrespective of data ...
2. ### R Function Writing Help

Help write a function that can do this: Marginal distribution: return a table of number of trues and falses in sequence x.