flexmix (version 2.3-9)

patent: Patents and R&D spending

Description

Number of patents, R&D spending and sales in millions of dollar for 70 pharmaceutical and biomedical companies in 1976.

Usage

data("patent")

Arguments

source

P. Wang, I.M. Cockburn and M.L. Puterman. Analysis of Patent Data - A Mixed-Poisson-Regression-Model Approach. Journal of Business & Economic Statistics, 16(1), 27--41, 1998.

Details

The data is taken from the National Bureau of Economic Research R&D Masterfile.

References

B.H. Hall, C. Cummins, E. Laderman and J. Mundy. The R&D Master File Documentation. Technical Working Paper 72, National Bureau of Economic Research, 1988. Cambridge, MA.

Examples

Run this code
data("patent", package = "flexmix")
patentMix <- initFlexmix(Patents ~ lgRD, k=3,
                      model=FLXMRglm(family="poisson"),
                      concomitant=FLXPmultinom(~RDS),
                      nrep=5, data=patent)
plot(Patents ~ lgRD, data=patent,
     pch=as.character(clusters(patentMix)))
ordering <- order(patent$lgRD)
apply(fitted(patentMix), 2, function(y)
      lines(sort(patent$lgRD), y[ordering]))

Run the code above in your browser using DataCamp Workspace