Discrete Data Analysis With R by David Meyer Michael Friendly