r - plot lmer result in faceted ggplot -


i'm analysing repeated measures drug trials data , i'm not sure how plot lmer results when using faceted ggplots. have made initial plot of individual slopes master dataset, i'm doing lmer analyses separately sex.

using publicly available data, has 2 treatment groups compared 4 have, replicable example below. uses reshape2, lme4, , ggplot2 packages.

catanx <- read.fwf(file=("http://www.stat.ufl.edu/~winner/data/cats_anxiety1.dat"),                widths=c(-6,2,-5,3,-5,3,-7,1,-7,1,-7,1,-7,1,-7,1,-6,2,-6,2,-6,2,-6,2,-6,2)) colnames(catanx) <- c('id','weight','age_months','gender','environment','origin','treatment','result','emotime1','emotime2',                   'emotime3','emotime4','emotime5') library("reshape2") catanxrm <- melt(catanx, id.vars=c("id", "gender", "treatment"), measure.vars=c("emotime1", "emotime2", "emotime3",                                                                             "emotime4", "emotime5")) catanxrm$sex <- with(catanxrm, ifelse(gender==1, "neut female", ifelse(gender==2, "neut male", "whole female"))) catanxrm$time <- with(catanxrm, ifelse(variable=="emotime1", 1, ifelse(variable=="emotime2", 2, ifelse(variable=="emotime3", 3,                                   ifelse(variable=="emotime4", 4,5))))) catanxrm.male <- subset(catanxrm, gender=="2") library("lme4") male.lmer <- lmer(value ~ treatment * time + (time + 1|id), data=catanxrm.male) library("ggplot2") anxscores<-ggplot(catanxrm, aes(time, value, colour=sex))+ geom_line(aes(group = id))+ labs(x="time anxiety measured", y="anxiety score", title="effect of zylkene on anxiety")+  facet_grid(. ~ treatment) anxscores

information dataset is here.

how plot correct summary line lmer in both facets, differ on basis of treatment?

in real life example, i'll analysing females there 2 sets of lines plot per facet.

create data frame (e.g. lines.df) intercept (e.g. int) , slope (slo) variables each line of df corresponds 1 facet, plot on top:

+ geom_abline(aes(intercept = int, slope = slo), data = lines.df)

Comments

Post a Comment

Popular posts from this blog

asp.net mvc - SSO between MVCForum and Umbraco7 -

i need integrate sso between mvcforum (forum of company) , umbraco7 (manages cms company). however struggling shared authentication work. tried several ways suggested on other threads still not running expected. here did: 1. in mvcforum (forum.mywebsite.com) 1.1. machine key in web.xml: <machinekey validationkey="the same key umbraco7" decryptionkey="the same key umbraco7" validation="sha1" decryption="aes" /> 1.2. authenticate forms in web.xml <forms name="my-sso-auth" protection="all" path="/" timeout="43200" domain="forum.mywebsite.com" loginurl="/members/logon" enablecrossappredirects="true" /> 2. in umbraco7 (news.mywebsite.com) 2.1. machine key in web.xml: <machinekey validationkey="the same key mvcforum" decryptionkey="the same key mvcforum" validation="sha1" decryption="aes" /> 2.2. a
Read more

Python Tkinter keyboard using bind -

i have problem using bind option can click button in keyboard, , call function once key pressed. tried taking other codes have similar purpose , saw i'm doing pretty same, though still have problem must've missed. thankful if me this. here's code: # -*- coding: utf-8 -*- #imports tkinter import * pil import imagetk, image import time import tkmessagebox #===========================================================================================================================================# #tkinter class class app(frame): def __init__(self, master=none): frame.__init__(self, master) self.pack() #===========================================================================================================================================# #game pieces classes class board: def __init__(self, rows = 7, columns = 6, picture_height = none, picture_width = none): self.rows = rows self.columns = columns self.picture
Read more

ubuntu - Selenium Node Not Connecting to Hub, Not Opening Port -

i'm trying set demo selenium grid. have digital ocean ubuntu 14.02 droplet. (i have 2 , tried set using 2 different machines got nowhere.) i'm trying run hub , node both locally. here input both hub, node, , nmap results. https://gist.github.com/mekhami/d5bbecca5ff0de9d2dc9 so, node starting tcp connection reset , port it's supposed operate on closed. i have had no luck in number of different options , configurations work. but... of course, worked randomly once. don't know why, don't know did, know 1 brief moment, node connected , saw on grid console. tried run test , went down again , i've never seen come up. please let me know more information can provide. update: randomly came online again. don't know happened, might related timeout or time_wait or going on. this because vm/server not have enough entropy available. to resolve problem, install haveged (or other similar things). the instructions of how install haveged on ubu
Read more