# Health Care Reform vote

[This article was first published on

Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

**simon jackman's blog » R**, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

A little bit of churn relative to the House’s 1st shot at this but otherwise a remarkably similar vote, with an estimated cutpoint almost at the same place; see some raw R output, below the fold, after the thumbnail…

y is the vote to take up the Senate amendments; yEarly is the previous go at this by the House:

table(y,yEarly,exclude=NULL) yEarly y 0 1 NA 0 206 6 0 1 8 211 0 NA 1 3 4

Probits of the votes against ideal points:

> coef(m1) (Intercept) x -0.7004063 -3.4044442 > coef(mEarly) (Intercept) x -0.7372492 -3.3910989

Cutpoints:

> -coef(m1)[1]/coef(m1)[2] (Intercept) -0.2057329 > -coef(mEarly)[1]/coef(mEarly)[2] (Intercept) -0.2174072

To

**leave a comment**for the author, please follow the link and comment on their blog:**simon jackman's blog » R**.R-bloggers.com offers

**daily e-mail updates**about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.

Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.