CrowdFunding - Digital Marketing Analytics
Alice W
July 31, 2018
R Markdown
Part 1: You would like to understand what factors will determine the attractiveness of a pitch. The pitch attractiveness is measured by whether the story has convinced other members to contribute. How would you approach this problem? Pick a dependent variable (or a few dependent variables) that will give you some insights on contribution behaviors. Discuss why you choose this variable (or this set of variables) as your dependent variable(s). Then, given each dependent variable, select an appropriate model and relevant independent variables. Justify your choices with a few sentences. Finally, show the output of your model in STATA or R and discuss your interpretations of the results.
- story_id – unique pitch identifier
- abs_week - absolute week (observationperiod)
- rel_week - relative week (weeks since story was published)
- story_readtime - total time visitors spent at the story URL this week, in seconds
- story_views - total number of visitors to the story URL this week
- story_funding_duration - the number of days the associated pitch spent being funded
- story_length - the length of the story, in characters
- focal_page - a binary indicator of whether this story is on the first page or not (rank = 1-12)
- pitch_contributors - total number of contributors that funded the story
- tags - number of story topic tags associated with this story
- pitch_views - total number of visitors to the pitch URL
- arindex - Automated Readability index value for the story text
- pitchsum_budget - the funding target of the associated story, in cents
- video - binary indicator of whether the story includes video
- insights - Google Search Trends for pitch keywords (0-100, relative to peak)
library(readxl)
crowdfunding= read_excel("Crowdfunding.xls")
#View(crowdfunding)
class(crowdfunding)## [1] "tbl_df" "tbl" "data.frame"crowdfunding=data.frame(crowdfunding)
#class(crowdfunding)
head(crowdfunding)## story_id abs_week rel_week story_readtime story_views
## 1 860 19 1 1711 17
## 2 860 20 2 2171 24
## 3 860 21 3 1608 30
## 4 860 22 4 2411 29
## 5 860 23 5 53 6
## 6 860 24 6 215 9
## story_funding_duration story_length focal_page pitch_contributors tags
## 1 294 3620 1 17 4
## 2 294 3620 1 17 4
## 3 294 3620 1 17 4
## 4 294 3620 1 17 4
## 5 294 3620 1 17 4
## 6 294 3620 1 17 4
## pitch_views arindex pitch_budget video insights
## 1 355 11.6 1e+05 0 77
## 2 355 11.6 1e+05 0 73
## 3 355 11.6 1e+05 0 73
## 4 355 11.6 1e+05 0 66
## 5 355 11.6 1e+05 0 66
## 6 355 11.6 1e+05 0 56crowdfunding[crowdfunding$story_id==860,]## story_id abs_week rel_week story_readtime story_views
## 1 860 19 1 1711 17
## 2 860 20 2 2171 24
## 3 860 21 3 1608 30
## 4 860 22 4 2411 29
## 5 860 23 5 53 6
## 6 860 24 6 215 9
## 7 860 25 7 1170 12
## 8 860 26 8 154 6
## 9 860 27 9 1108 10
## 10 860 28 10 785 7
## 11 860 29 11 47 1
## 12 860 30 12 26 2
## 13 860 31 13 538 7
## 14 860 32 14 0 3
## 15 860 33 15 47 6
## 16 860 34 16 30 11
## 17 860 35 17 0 2
## 18 860 36 18 20 3
## 19 860 37 19 0 3
## 20 860 38 20 332 6
## 21 860 39 21 0 0
## 22 860 40 22 48 1
## 23 860 41 23 17 1
## 24 860 42 24 710 5
## 25 860 43 25 0 2
## 26 860 44 26 0 0
## 27 860 45 27 0 1
## 28 860 46 28 229 4
## 29 860 47 29 420 3
## 30 860 48 30 0 3
## 31 860 49 31 0 1
## 32 860 50 32 0 3
## 33 860 51 33 358 4
## 34 860 52 34 216 2
## 35 860 53 35 279 4
## 36 860 54 36 0 4
## 37 860 55 37 0 2
## 38 860 56 38 0 4
## 39 860 57 39 285 6
## 40 860 58 40 506 1
## 41 860 59 41 1037 5
## 42 860 60 42 18 2
## 43 860 61 43 0 5
## 44 860 62 44 0 1
## 45 860 63 45 118 1
## 46 860 64 46 107 5
## 47 860 65 47 0 3
## 48 860 66 48 0 4
## 49 860 67 49 0 3
## 50 860 68 50 21 1
## 51 860 69 51 0 3
## 52 860 70 52 0 0
## 53 860 71 53 0 0
## 54 860 72 54 0 2
## 55 860 73 55 0 0
## 56 860 74 56 0 0
## story_funding_duration story_length focal_page pitch_contributors tags
## 1 294 3620 1 17 4
## 2 294 3620 1 17 4
## 3 294 3620 1 17 4
## 4 294 3620 1 17 4
## 5 294 3620 1 17 4
## 6 294 3620 1 17 4
## 7 294 3620 1 17 4
## 8 294 3620 1 17 4
## 9 294 3620 1 17 4
## 10 294 3620 1 17 4
## 11 294 3620 1 17 4
## 12 294 3620 1 17 4
## 13 294 3620 1 17 4
## 14 294 3620 0 17 4
## 15 294 3620 0 17 4
## 16 294 3620 0 17 4
## 17 294 3620 0 17 4
## 18 294 3620 0 17 4
## 19 294 3620 0 17 4
## 20 294 3620 0 17 4
## 21 294 3620 0 17 4
## 22 294 3620 0 17 4
## 23 294 3620 0 17 4
## 24 294 3620 0 17 4
## 25 294 3620 0 17 4
## 26 294 3620 0 17 4
## 27 294 3620 0 17 4
## 28 294 3620 0 17 4
## 29 294 3620 0 17 4
## 30 294 3620 0 17 4
## 31 294 3620 0 17 4
## 32 294 3620 0 17 4
## 33 294 3620 0 17 4
## 34 294 3620 0 17 4
## 35 294 3620 0 17 4
## 36 294 3620 0 17 4
## 37 294 3620 0 17 4
## 38 294 3620 0 17 4
## 39 294 3620 0 17 4
## 40 294 3620 0 17 4
## 41 294 3620 0 17 4
## 42 294 3620 0 17 4
## 43 294 3620 0 17 4
## 44 294 3620 0 17 4
## 45 294 3620 0 17 4
## 46 294 3620 0 17 4
## 47 294 3620 0 17 4
## 48 294 3620 0 17 4
## 49 294 3620 0 17 4
## 50 294 3620 0 17 4
## 51 294 3620 0 17 4
## 52 294 3620 0 17 4
## 53 294 3620 0 17 4
## 54 294 3620 0 17 4
## 55 294 3620 0 17 4
## 56 294 3620 0 17 4
## pitch_views arindex pitch_budget video insights
## 1 355 11.6 1e+05 0 77
## 2 355 11.6 1e+05 0 73
## 3 355 11.6 1e+05 0 73
## 4 355 11.6 1e+05 0 66
## 5 355 11.6 1e+05 0 66
## 6 355 11.6 1e+05 0 56
## 7 355 11.6 1e+05 0 56
## 8 355 11.6 1e+05 0 52
## 9 355 11.6 1e+05 0 65
## 10 355 11.6 1e+05 0 55
## 11 355 11.6 1e+05 0 55
## 12 355 11.6 1e+05 0 55
## 13 355 11.6 1e+05 0 50
## 14 355 11.6 1e+05 0 54
## 15 355 11.6 1e+05 0 57
## 16 355 11.6 1e+05 0 61
## 17 355 11.6 1e+05 0 65
## 18 355 11.6 1e+05 0 71
## 19 355 11.6 1e+05 0 76
## 20 355 11.6 1e+05 0 51
## 21 355 11.6 1e+05 0 61
## 22 355 11.6 1e+05 0 57
## 23 355 11.6 1e+05 0 52
## 24 355 11.6 1e+05 0 52
## 25 355 11.6 1e+05 0 52
## 26 355 11.6 1e+05 0 93
## 27 355 11.6 1e+05 0 97
## 28 355 11.6 1e+05 0 100
## 29 355 11.6 1e+05 0 59
## 30 355 11.6 1e+05 0 74
## 31 355 11.6 1e+05 0 0
## 32 355 11.6 1e+05 0 0
## 33 355 11.6 1e+05 0 0
## 34 355 11.6 1e+05 0 0
## 35 355 11.6 1e+05 0 0
## 36 355 11.6 1e+05 0 51
## 37 355 11.6 1e+05 0 48
## 38 355 11.6 1e+05 0 48
## 39 355 11.6 1e+05 0 48
## 40 355 11.6 1e+05 0 48
## 41 355 11.6 1e+05 0 48
## 42 355 11.6 1e+05 0 70
## 43 355 11.6 1e+05 0 46
## 44 355 11.6 1e+05 0 46
## 45 355 11.6 1e+05 0 46
## 46 355 11.6 1e+05 0 48
## 47 355 11.6 1e+05 0 51
## 48 355 11.6 1e+05 0 53
## 49 355 11.6 1e+05 0 56
## 50 355 11.6 1e+05 0 58
## 51 355 11.6 1e+05 0 41
## 52 355 11.6 1e+05 0 41
## 53 355 11.6 1e+05 0 41
## 54 355 11.6 1e+05 0 41
## 55 355 11.6 1e+05 0 51
## 56 355 11.6 1e+05 0 44str(crowdfunding)## 'data.frame': 1848 obs. of 15 variables:
## $ story_id : num 860 860 860 860 860 860 860 860 860 860 ...
## $ abs_week : num 19 20 21 22 23 24 25 26 27 28 ...
## $ rel_week : num 1 2 3 4 5 6 7 8 9 10 ...
## $ story_readtime : num 1711 2171 1608 2411 53 ...
## $ story_views : num 17 24 30 29 6 9 12 6 10 7 ...
## $ story_funding_duration: num 294 294 294 294 294 294 294 294 294 294 ...
## $ story_length : num 3620 3620 3620 3620 3620 3620 3620 3620 3620 3620 ...
## $ focal_page : num 1 1 1 1 1 1 1 1 1 1 ...
## $ pitch_contributors : num 17 17 17 17 17 17 17 17 17 17 ...
## $ tags : num 4 4 4 4 4 4 4 4 4 4 ...
## $ pitch_views : num 355 355 355 355 355 355 355 355 355 355 ...
## $ arindex : num 11.6 11.6 11.6 11.6 11.6 ...
## $ pitch_budget : num 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 ...
## $ video : num 0 0 0 0 0 0 0 0 0 0 ...
## $ insights : num 77 73 73 66 66 56 56 52 65 55 ...#View(crowdfunding)psych::describe(crowdfunding)## vars n mean sd median trimmed
## story_id 1 1848 1003.88 61.54 1007.0 1007.74
## abs_week 2 1848 47.01 17.76 49.0 48.03
## rel_week 3 1848 27.99 17.76 26.0 26.97
## story_readtime 4 1848 799.84 4283.00 34.0 227.31
## story_views 5 1848 9.91 40.36 3.0 4.26
## story_funding_duration 6 1848 86.62 75.29 68.0 75.82
## story_length 7 1848 13430.60 11106.95 12004.0 12087.06
## focal_page 8 1848 0.25 0.43 0.0 0.19
## pitch_contributors 9 1848 24.72 31.64 11.0 17.55
## tags 10 1848 4.43 1.90 4.0 4.23
## pitch_views 11 1848 616.14 950.75 366.0 425.09
## arindex 12 1848 12.18 3.08 11.8 11.96
## pitch_budget 13 1848 156216.18 187923.99 80000.0 112587.16
## video 14 1848 0.05 0.22 0.0 0.00
## insights 15 1848 51.73 26.89 56.0 52.97
## mad min max range skew kurtosis
## story_id 57.82 860.0 1110.0 250.0 -0.49 -0.25
## abs_week 20.76 2.0 74.0 72.0 -0.40 -0.74
## rel_week 20.76 1.0 73.0 72.0 0.40 -0.74
## story_readtime 50.41 0.0 127455.0 127455.0 19.23 483.80
## story_views 4.45 0.0 960.0 960.0 15.55 305.19
## story_funding_duration 68.20 4.0 300.0 296.0 1.18 0.87
## story_length 9340.38 1853.0 72000.0 70147.0 2.71 11.81
## focal_page 0.00 0.0 1.0 1.0 1.15 -0.68
## pitch_contributors 8.90 1.0 144.0 143.0 2.26 4.69
## tags 1.48 2.0 13.0 11.0 1.36 2.95
## pitch_views 335.07 33.0 5461.0 5428.0 4.05 17.20
## arindex 2.08 5.8 19.7 13.9 0.61 0.41
## pitch_budget 51891.00 25000.0 1000000.0 975000.0 2.64 7.23
## video 0.00 0.0 1.0 1.0 4.01 14.09
## insights 26.69 0.0 100.0 100.0 -0.40 -0.69
## se
## story_id 1.43
## abs_week 0.41
## rel_week 0.41
## story_readtime 99.63
## story_views 0.94
## story_funding_duration 1.75
## story_length 258.37
## focal_page 0.01
## pitch_contributors 0.74
## tags 0.04
## pitch_views 22.12
## arindex 0.07
## pitch_budget 4371.51
## video 0.01
## insights 0.63summary(crowdfunding)## story_id abs_week rel_week story_readtime
## Min. : 860 Min. : 2.00 Min. : 1.00 Min. : 0.0
## 1st Qu.: 976 1st Qu.:34.00 1st Qu.:13.00 1st Qu.: 0.0
## Median :1007 Median :49.00 Median :26.00 Median : 34.0
## Mean :1004 Mean :47.01 Mean :27.99 Mean : 799.8
## 3rd Qu.:1048 3rd Qu.:62.00 3rd Qu.:41.00 3rd Qu.: 437.0
## Max. :1110 Max. :74.00 Max. :73.00 Max. :127455.0
## story_views story_funding_duration story_length focal_page
## Min. : 0.00 Min. : 4.00 Min. : 1853 Min. :0.0000
## 1st Qu.: 1.00 1st Qu.: 26.00 1st Qu.: 6324 1st Qu.:0.0000
## Median : 3.00 Median : 68.00 Median :12004 Median :0.0000
## Mean : 9.91 Mean : 86.62 Mean :13431 Mean :0.2511
## 3rd Qu.: 7.00 3rd Qu.:114.00 3rd Qu.:18304 3rd Qu.:1.0000
## Max. :960.00 Max. :300.00 Max. :72000 Max. :1.0000
## pitch_contributors tags pitch_views arindex
## Min. : 1.00 Min. : 2.000 Min. : 33.0 Min. : 5.80
## 1st Qu.: 6.00 1st Qu.: 3.000 1st Qu.: 167.0 1st Qu.:10.50
## Median : 11.00 Median : 4.000 Median : 366.0 Median :11.80
## Mean : 24.72 Mean : 4.429 Mean : 616.1 Mean :12.18
## 3rd Qu.: 26.00 3rd Qu.: 5.000 3rd Qu.: 728.0 3rd Qu.:13.20
## Max. :144.00 Max. :13.000 Max. :5461.0 Max. :19.70
## pitch_budget video insights
## Min. : 25000 Min. :0.00000 Min. : 0.00
## 1st Qu.: 50000 1st Qu.:0.00000 1st Qu.: 35.00
## Median : 80000 Median :0.00000 Median : 56.00
## Mean : 156216 Mean :0.05249 Mean : 51.73
## 3rd Qu.: 160000 3rd Qu.:0.00000 3rd Qu.: 72.00
## Max. :1000000 Max. :1.00000 Max. :100.00Key Observations
- This dataset has 1848 observations and 15 variables.
- All variables are numeric. Variables focal_page and video are binary.
- No value is missing in any varable.
- There are multiple rows per story. We will have to aggregate data by story_id.
- The skew value indicates that story_readtime and story_views are quite skewed, and the kurtosis value indicates that these two fields have high peak value. Furhter investigation will be conducted to examine the distriution of data.
ggplot(crowdfunding,aes(pitch_contributors))+
geom_histogram(binwidth = 2)+
theme_economist()
psych::describe(unique(subset(crowdfunding,select=c(story_id))))## vars n mean sd median trimmed mad min max range skew
## story_id 1 37 1017.43 62.18 1024 1022.52 63.75 860 1110 250 -0.69
## kurtosis se
## story_id -0.14 10.22#get the unique story_id and pitch_contributors since there are multiple lines for each story_id
sub_crowd1=subset(crowdfunding,select=c(story_id,pitch_contributors,pitch_views))
sub_crowd1=unique(sub_crowd1)
sub_crowd1## story_id pitch_contributors pitch_views
## 1 860 17 355
## 57 871 66 124
## 126 918 70 366
## 196 923 18 86
## 269 940 4 33
## 342 958 6 76
## 412 973 24 799
## 446 976 27 1224
## 513 980 27 1048
## 564 987 11 640
## 631 988 6 159
## 701 990 9 395
## 744 991 26 728
## 802 997 8 418
## 870 1004 144 5461
## 923 1007 8 515
## 986 1014 9 167
## 1051 1020 11 396
## 1099 1024 25 788
## 1143 1028 1 140
## 1192 1034 13 422
## 1246 1042 11 218
## 1304 1046 18 947
## 1350 1048 16 1012
## 1393 1052 114 3325
## 1416 1053 5 216
## 1464 1058 3 135
## 1515 1067 53 559
## 1539 1078 5 288
## 1584 1079 97 272
## 1631 1080 77 1131
## 1649 1084 3 489
## 1688 1086 8 345
## 1727 1091 15 334
## 1758 1093 15 747
## 1797 1095 24 1580
## 1808 1110 5 192ggplot(sub_crowd1,aes(pitch_contributors))+
geom_histogram(binwidth = 2)+
labs(
x="pitch_contributors",
y="count of stories",
title="count of stories by pitch_contributors"
)+
theme_economist_white()+
ggsave('pc.png')## Saving 7 x 5 in image
ggplot(sub_crowd1,aes(pitch_contributors))+
geom_bar(binwidth = 2.5)+
labs(
x="pitch_contributors",
y="count of stories",
title="count of stories by pitch_contributors"
)+
theme_economist_white()+
ggsave('pc.png')## Warning: `geom_bar()` no longer has a `binwidth` parameter. Please use
## `geom_histogram()` instead.## Saving 7 x 5 in image
hist(sub_crowd1$pitch_contributors,breaks = "Sturges",xlab='pitch_contributors',main='frequency of stories by pitch_contributors')
ggplot(sub_crowd1,aes(pitch_views))+
geom_bar(binwidth = 2.5)+
labs(
x="pitch_views",
y="count of stories",
title="count of stories by pitch_views"
)+
theme_economist_white()+
ggsave('pc.png')## Warning: `geom_bar()` no longer has a `binwidth` parameter. Please use
## `geom_histogram()` instead.## Saving 7 x 5 in image
hist(sub_crowd1$pitch_views,breaks = "Sturges",xlab='pitch_views',main='frequency of stories by pitch_views')
sub_crowd1$pitch_conversion=sub_crowd1$pitch_contributors/sub_crowd1$pitch_views
hist(sub_crowd1$pitch_conversion,breaks = "Sturges",xlab='pitch_conversion',main='frequency of stories by pitch_conversion')
by_contri_count=data.frame(table(sub_crowd1$pitch_contributors))
names(by_contri_count)=c('pitch_contributors','num_of_story')
by_contri_count## pitch_contributors num_of_story
## 1 1 1
## 2 3 2
## 3 4 1
## 4 5 3
## 5 6 2
## 6 8 3
## 7 9 2
## 8 11 3
## 9 13 1
## 10 15 2
## 11 16 1
## 12 17 1
## 13 18 2
## 14 24 2
## 15 25 1
## 16 26 1
## 17 27 2
## 18 53 1
## 19 66 1
## 20 70 1
## 21 77 1
## 22 97 1
## 23 114 1
## 24 144 1sub_crowd=subset(crowdfunding,select=c(story_id,story_funding_duration,story_length,pitch_contributors,tags,pitch_views,pitch_budget))
sub_crowd=unique(sub_crowd)
sub_crowd## story_id story_funding_duration story_length pitch_contributors tags
## 1 860 294 3620 17 4
## 57 871 199 17131 66 5
## 126 918 135 9561 70 3
## 196 923 108 1853 18 3
## 269 940 74 3132 4 7
## 342 958 68 16714 6 2
## 412 973 300 72000 24 3
## 446 976 62 6548 27 5
## 513 980 154 11210 27 5
## 564 987 26 2899 11 4
## 631 988 4 22487 6 4
## 701 990 187 14763 9 3
## 744 991 86 22922 26 5
## 802 997 11 20435 8 4
## 870 1004 96 3137 144 3
## 923 1007 26 13612 8 8
## 986 1014 5 13723 9 4
## 1051 1020 114 13626 11 6
## 1099 1024 133 9680 25 4
## 1143 1028 97 18304 1 7
## 1192 1034 51 8801 13 2
## 1246 1042 18 25307 11 2
## 1304 1046 91 24883 18 4
## 1350 1048 102 1858 16 4
## 1393 1052 231 12035 114 5
## 1416 1053 52 2933 5 4
## 1464 1058 20 12004 3 2
## 1515 1067 185 12352 53 5
## 1539 1078 22 28336 5 9
## 1584 1079 10 3287 97 7
## 1631 1080 211 6324 77 13
## 1649 1084 57 11765 3 6
## 1688 1086 51 18617 8 4
## 1727 1091 37 6852 15 3
## 1758 1093 47 13203 15 3
## 1797 1095 238 39261 24 3
## 1808 1110 13 9200 5 4
## pitch_views pitch_budget
## 1 355 100000
## 57 124 300000
## 126 366 500000
## 196 86 150000
## 269 33 50000
## 342 76 40000
## 412 799 100000
## 446 1224 74000
## 513 1048 200000
## 564 640 280000
## 631 159 25000
## 701 395 120000
## 744 728 160000
## 802 418 70000
## 870 5461 825000
## 923 515 50000
## 986 167 30000
## 1051 396 60000
## 1099 788 100000
## 1143 140 100000
## 1192 422 60000
## 1246 218 80000
## 1304 947 70000
## 1350 1012 45000
## 1393 3325 1000000
## 1416 216 129000
## 1464 135 40000
## 1515 559 90000
## 1539 288 200000
## 1584 272 380500
## 1631 1131 100000
## 1649 489 55000
## 1688 345 100000
## 1727 334 45000
## 1758 747 45000
## 1797 1580 400000
## 1808 192 49000some data pre-processing needs to be done before dive into analysis by looking at the data 1. instead of have each week as one observation, we group the weeks and calculate the satrt week,the end week, and total number of weeks 2. sum up the story_readtime, story_views 3. story_funding_duration,story_length,pitch_contributors,tags,pitch_views,and pitch_budget are the same per story_id, so use max() to get the unique value in a groupby function
#because of the multiple rows for each story, it is important to aggregate data
agg_story = crowdfunding %>%
group_by(story_id) %>%
summarise(abs_week_start = min(abs_week),
abs_week_end = max(abs_week),
rel_week = max(rel_week),
story_readtime = sum(story_readtime),
story_views_sum = sum(story_views),
story_views_max = sum(story_views),
story_views_mean = sum(story_views),
story_views_min= sum(story_views),
story_funding_duration = max(story_funding_duration),
story_length = max(story_length),
focal_page = mean(focal_page),###
pitch_contributors = max(pitch_contributors),
tags = max(tags),
pitch_views = max(pitch_views),
arindex = max(arindex),###
pitch_budget = max(pitch_budget),
video_mean = mean(video), ####
insights = mean(insights))
#agg_story$rel_week2=agg_story$abs_week_end-agg_story$abs_week_start+1
#a=agg_story$rel_week2-agg_story$rel_week
#unique(a)
log_story=NULL
log_story$story_id=agg_story$story_id
log_story$log_abs_week_start=log(agg_story$abs_week_start)
log_story$log_abs_week_end=log(agg_story$abs_week_end)
log_story$log_rel_week=log(agg_story$rel_week)
log_story$log_story_readtime=log(agg_story$story_readtime)
log_story$log_story_views_sum=log(agg_story$story_views_sum)
log_story$log_story_views_max=log(agg_story$story_views_max)
log_story$log_story_views_mean=log(agg_story$story_views_mean)
log_story$log_story_views_min=log(agg_story$story_views_min)
log_story$log_story_funding_duration=log(agg_story$story_funding_duration)
log_story$log_story_length=log(agg_story$story_length)
log_story$log_focal_page=log(agg_story$focal_page+1)
log_story$log_pitch_contributors=log(agg_story$pitch_contributors)
log_story$log_tags=log(agg_story$tags)
log_story$log_pitch_views=log(agg_story$pitch_views)
log_story$log_arindex=log(agg_story$arindex)
log_story$log_pitch_budget=log(agg_story$pitch_budget)
log_story$log_video_mean=log(agg_story$video_mean+1)
log_story$log_insights=log(agg_story$insights)
psych::describe(agg_story)## vars n mean sd median trimmed
## story_id 1 37 1017.43 62.18 1024.00 1022.52
## abs_week_start 2 37 25.05 16.08 26.00 24.03
## abs_week_end 3 37 74.00 0.00 74.00 74.00
## rel_week 4 37 49.95 16.08 49.00 50.97
## story_readtime 5 37 39948.89 63069.89 25624.00 27909.13
## story_views_sum 6 37 494.97 632.87 281.00 370.45
## story_views_max 7 37 494.97 632.87 281.00 370.45
## story_views_mean 8 37 494.97 632.87 281.00 370.45
## story_views_min 9 37 494.97 632.87 281.00 370.45
## story_funding_duration 10 37 97.70 82.87 74.00 89.16
## story_length 11 37 14442.57 12882.98 12035.00 12521.55
## focal_page 12 37 0.26 0.10 0.24 0.25
## pitch_contributors 13 37 27.00 33.66 15.00 20.55
## tags 14 37 4.57 2.21 4.00 4.29
## pitch_views 15 37 706.22 998.00 396.00 502.23
## arindex 16 37 11.88 3.05 11.70 11.68
## pitch_budget 17 37 168175.68 213090.69 100000.00 122661.29
## video_mean 18 37 0.05 0.23 0.00 0.00
## insights 19 37 51.80 19.37 57.46 52.95
## mad min max range skew
## story_id 63.75 860.00 1110.00 250.00 -0.69
## abs_week_start 14.83 2.00 64.00 62.00 0.43
## abs_week_end 0.00 74.00 74.00 0.00 NaN
## rel_week 14.83 11.00 73.00 62.00 -0.43
## story_readtime 21660.79 729.00 378940.00 378211.00 4.24
## story_views_sum 213.49 8.00 3579.00 3571.00 3.32
## story_views_max 213.49 8.00 3579.00 3571.00 3.32
## story_views_mean 213.49 8.00 3579.00 3571.00 3.32
## story_views_min 213.49 8.00 3579.00 3571.00 3.32
## story_funding_duration 77.10 4.00 300.00 296.00 0.88
## story_length 8467.13 1853.00 72000.00 70147.00 2.50
## focal_page 0.04 0.18 0.82 0.64 4.53
## pitch_contributors 13.34 1.00 144.00 143.00 1.93
## tags 1.48 2.00 13.00 11.00 1.70
## pitch_views 361.75 33.00 5461.00 5428.00 3.37
## arindex 1.93 5.80 19.70 13.90 0.63
## pitch_budget 74130.00 25000.00 1000000.00 975000.00 2.49
## video_mean 0.00 0.00 1.00 1.00 3.79
## insights 15.54 5.60 80.59 74.98 -0.69
## kurtosis se
## story_id -0.14 10.22
## abs_week_start -0.53 2.64
## abs_week_end NaN 0.00
## rel_week -0.53 2.64
## story_readtime 19.69 10368.63
## story_views_sum 12.73 104.04
## story_views_max 12.73 104.04
## story_views_mean 12.73 104.04
## story_views_min 12.73 104.04
## story_funding_duration -0.26 13.62
## story_length 8.37 2117.95
## focal_page 22.36 0.02
## pitch_contributors 2.99 5.53
## tags 3.76 0.36
## pitch_views 12.26 164.07
## arindex 0.46 0.50
## pitch_budget 5.99 35031.89
## video_mean 12.67 0.04
## insights -0.51 3.19agg_story=data.frame(agg_story)
log_story=data.frame(log_story)
str(agg_story)## 'data.frame': 37 obs. of 19 variables:
## $ story_id : num 860 871 918 923 940 958 973 976 980 987 ...
## $ abs_week_start : num 19 6 5 2 2 5 41 8 24 8 ...
## $ abs_week_end : num 74 74 74 74 74 74 74 74 74 74 ...
## $ rel_week : num 56 69 70 73 73 70 34 67 51 67 ...
## $ story_readtime : num 16795 55939 41639 3455 16334 ...
## $ story_views_sum : num 280 692 444 49 179 169 168 628 163 344 ...
## $ story_views_max : num 280 692 444 49 179 169 168 628 163 344 ...
## $ story_views_mean : num 280 692 444 49 179 169 168 628 163 344 ...
## $ story_views_min : num 280 692 444 49 179 169 168 628 163 344 ...
## $ story_funding_duration: num 294 199 135 108 74 68 300 62 154 26 ...
## $ story_length : num 3620 17131 9561 1853 3132 ...
## $ focal_page : num 0.232 0.275 0.243 0.247 0.219 ...
## $ pitch_contributors : num 17 66 70 18 4 6 24 27 27 11 ...
## $ tags : num 4 5 3 3 7 2 3 5 5 4 ...
## $ pitch_views : num 355 124 366 86 33 ...
## $ arindex : num 11.6 14.8 19.3 8.7 13.2 ...
## $ pitch_budget : num 100000 300000 500000 150000 50000 40000 100000 74000 200000 280000 ...
## $ video_mean : num 0 0 0 0 0 0 1 0 0 0 ...
## $ insights : num 52.8 41.4 41.7 62.5 61.5 ...str(log_story)## 'data.frame': 37 obs. of 19 variables:
## $ story_id : num 860 871 918 923 940 958 973 976 980 987 ...
## $ log_abs_week_start : num 2.944 1.792 1.609 0.693 0.693 ...
## $ log_abs_week_end : num 4.3 4.3 4.3 4.3 4.3 ...
## $ log_rel_week : num 4.03 4.23 4.25 4.29 4.29 ...
## $ log_story_readtime : num 9.73 10.93 10.64 8.15 9.7 ...
## $ log_story_views_sum : num 5.63 6.54 6.1 3.89 5.19 ...
## $ log_story_views_max : num 5.63 6.54 6.1 3.89 5.19 ...
## $ log_story_views_mean : num 5.63 6.54 6.1 3.89 5.19 ...
## $ log_story_views_min : num 5.63 6.54 6.1 3.89 5.19 ...
## $ log_story_funding_duration: num 5.68 5.29 4.91 4.68 4.3 ...
## $ log_story_length : num 8.19 9.75 9.17 7.52 8.05 ...
## $ log_focal_page : num 0.209 0.243 0.217 0.22 0.198 ...
## $ log_pitch_contributors : num 2.83 4.19 4.25 2.89 1.39 ...
## $ log_tags : num 1.39 1.61 1.1 1.1 1.95 ...
## $ log_pitch_views : num 5.87 4.82 5.9 4.45 3.5 ...
## $ log_arindex : num 2.45 2.69 2.96 2.16 2.58 ...
## $ log_pitch_budget : num 11.5 12.6 13.1 11.9 10.8 ...
## $ log_video_mean : num 0 0 0 0 0 ...
## $ log_insights : num 3.97 3.72 3.73 4.14 4.12 ...class(log_story)## [1] "data.frame"names(log_story)## [1] "story_id" "log_abs_week_start"
## [3] "log_abs_week_end" "log_rel_week"
## [5] "log_story_readtime" "log_story_views_sum"
## [7] "log_story_views_max" "log_story_views_mean"
## [9] "log_story_views_min" "log_story_funding_duration"
## [11] "log_story_length" "log_focal_page"
## [13] "log_pitch_contributors" "log_tags"
## [15] "log_pitch_views" "log_arindex"
## [17] "log_pitch_budget" "log_video_mean"
## [19] "log_insights"psych::describe(agg_story)## vars n mean sd median trimmed
## story_id 1 37 1017.43 62.18 1024.00 1022.52
## abs_week_start 2 37 25.05 16.08 26.00 24.03
## abs_week_end 3 37 74.00 0.00 74.00 74.00
## rel_week 4 37 49.95 16.08 49.00 50.97
## story_readtime 5 37 39948.89 63069.89 25624.00 27909.13
## story_views_sum 6 37 494.97 632.87 281.00 370.45
## story_views_max 7 37 494.97 632.87 281.00 370.45
## story_views_mean 8 37 494.97 632.87 281.00 370.45
## story_views_min 9 37 494.97 632.87 281.00 370.45
## story_funding_duration 10 37 97.70 82.87 74.00 89.16
## story_length 11 37 14442.57 12882.98 12035.00 12521.55
## focal_page 12 37 0.26 0.10 0.24 0.25
## pitch_contributors 13 37 27.00 33.66 15.00 20.55
## tags 14 37 4.57 2.21 4.00 4.29
## pitch_views 15 37 706.22 998.00 396.00 502.23
## arindex 16 37 11.88 3.05 11.70 11.68
## pitch_budget 17 37 168175.68 213090.69 100000.00 122661.29
## video_mean 18 37 0.05 0.23 0.00 0.00
## insights 19 37 51.80 19.37 57.46 52.95
## mad min max range skew
## story_id 63.75 860.00 1110.00 250.00 -0.69
## abs_week_start 14.83 2.00 64.00 62.00 0.43
## abs_week_end 0.00 74.00 74.00 0.00 NaN
## rel_week 14.83 11.00 73.00 62.00 -0.43
## story_readtime 21660.79 729.00 378940.00 378211.00 4.24
## story_views_sum 213.49 8.00 3579.00 3571.00 3.32
## story_views_max 213.49 8.00 3579.00 3571.00 3.32
## story_views_mean 213.49 8.00 3579.00 3571.00 3.32
## story_views_min 213.49 8.00 3579.00 3571.00 3.32
## story_funding_duration 77.10 4.00 300.00 296.00 0.88
## story_length 8467.13 1853.00 72000.00 70147.00 2.50
## focal_page 0.04 0.18 0.82 0.64 4.53
## pitch_contributors 13.34 1.00 144.00 143.00 1.93
## tags 1.48 2.00 13.00 11.00 1.70
## pitch_views 361.75 33.00 5461.00 5428.00 3.37
## arindex 1.93 5.80 19.70 13.90 0.63
## pitch_budget 74130.00 25000.00 1000000.00 975000.00 2.49
## video_mean 0.00 0.00 1.00 1.00 3.79
## insights 15.54 5.60 80.59 74.98 -0.69
## kurtosis se
## story_id -0.14 10.22
## abs_week_start -0.53 2.64
## abs_week_end NaN 0.00
## rel_week -0.53 2.64
## story_readtime 19.69 10368.63
## story_views_sum 12.73 104.04
## story_views_max 12.73 104.04
## story_views_mean 12.73 104.04
## story_views_min 12.73 104.04
## story_funding_duration -0.26 13.62
## story_length 8.37 2117.95
## focal_page 22.36 0.02
## pitch_contributors 2.99 5.53
## tags 3.76 0.36
## pitch_views 12.26 164.07
## arindex 0.46 0.50
## pitch_budget 5.99 35031.89
## video_mean 12.67 0.04
## insights -0.51 3.19psych::describe(log_story)## vars n mean sd median trimmed mad
## story_id 1 37 1017.43 62.18 1024.00 1022.52 63.75
## log_abs_week_start 2 37 2.92 0.90 3.26 3.00 0.63
## log_abs_week_end 3 37 4.30 0.00 4.30 4.30 0.00
## log_rel_week 4 37 3.84 0.41 3.89 3.90 0.34
## log_story_readtime 5 37 10.03 1.08 10.15 10.05 0.91
## log_story_views_sum 6 37 5.71 1.05 5.64 5.74 0.78
## log_story_views_max 7 37 5.71 1.05 5.64 5.74 0.78
## log_story_views_mean 8 37 5.71 1.05 5.64 5.74 0.78
## log_story_views_min 9 37 5.71 1.05 5.64 5.74 0.78
## log_story_funding_duration 10 37 4.11 1.13 4.30 4.19 1.09
## log_story_length 11 37 9.25 0.86 9.40 9.27 0.78
## log_focal_page 12 37 0.23 0.07 0.22 0.22 0.03
## log_pitch_contributors 13 37 2.69 1.12 2.71 2.68 0.93
## log_tags 14 37 1.43 0.43 1.39 1.41 0.43
## log_pitch_views 15 37 6.02 1.03 5.98 6.01 1.02
## log_arindex 16 37 2.44 0.26 2.46 2.44 0.16
## log_pitch_budget 17 37 11.56 0.90 11.51 11.49 1.03
## log_video_mean 18 37 0.04 0.16 0.00 0.00 0.00
## log_insights 19 37 3.83 0.56 4.05 3.92 0.26
## min max range skew kurtosis se
## story_id 860.00 1110.00 250.00 -0.69 -0.14 10.22
## log_abs_week_start 0.69 4.16 3.47 -0.90 -0.13 0.15
## log_abs_week_end 4.30 4.30 0.00 NaN NaN 0.00
## log_rel_week 2.40 4.29 1.89 -1.51 2.45 0.07
## log_story_readtime 6.59 12.85 6.25 -0.39 1.78 0.18
## log_story_views_sum 2.08 8.18 6.10 -0.68 2.44 0.17
## log_story_views_max 2.08 8.18 6.10 -0.68 2.44 0.17
## log_story_views_mean 2.08 8.18 6.10 -0.68 2.44 0.17
## log_story_views_min 2.08 8.18 6.10 -0.68 2.44 0.17
## log_story_funding_duration 1.39 5.70 4.32 -0.65 -0.43 0.19
## log_story_length 7.52 11.18 3.66 -0.30 -0.47 0.14
## log_focal_page 0.16 0.60 0.44 4.14 19.70 0.01
## log_pitch_contributors 0.00 4.97 4.97 0.11 -0.35 0.18
## log_tags 0.69 2.56 1.87 0.32 -0.02 0.07
## log_pitch_views 3.50 8.61 5.11 0.07 0.18 0.17
## log_arindex 1.76 2.98 1.22 -0.21 0.27 0.04
## log_pitch_budget 10.13 13.82 3.69 0.77 -0.17 0.15
## log_video_mean 0.00 0.69 0.69 3.79 12.67 0.03
## log_insights 1.72 4.39 2.67 -1.83 3.42 0.09col_names=names(agg_story)
col_len=length(col_names)
for (i in 2:col_len){
layout(matrix(seq(1:2), ncol = 2,byrow=TRUE),respect=TRUE)
hist(agg_story[,i],xlab=col_names[i],main="Original value")
hist(log_story[,i],xlab=col_names[i],main='Log Value')
}
null=lm(log_pitch_contributors~1,data=log_story)
full=lm(log_pitch_contributors~.,data=log_story)
step(null,scope=list(lower=null,upper=full),direction="forward")## Start: AIC=9.16
## log_pitch_contributors ~ 1
##
## Df Sum of Sq RSS AIC
## + log_pitch_budget 1 18.6257 26.277 -8.6626
## + log_pitch_views 1 15.9077 28.995 -5.0207
## + log_story_funding_duration 1 7.3779 37.525 4.5208
## + log_insights 1 6.2566 38.646 5.6103
## + log_arindex 1 4.8202 40.082 6.9606
## + log_story_views_sum 1 4.0693 40.833 7.6473
## + log_story_views_max 1 4.0693 40.833 7.6473
## + log_story_views_mean 1 4.0693 40.833 7.6473
## + log_story_views_min 1 4.0693 40.833 7.6473
## + log_rel_week 1 3.3151 41.587 8.3244
## + log_story_readtime 1 3.2957 41.607 8.3418
## <none> 44.902 9.1622
## + log_story_length 1 1.1629 43.739 10.1913
## + log_abs_week_start 1 0.9280 43.974 10.3895
## + log_focal_page 1 0.9140 43.988 10.4013
## + story_id 1 0.9113 43.991 10.4036
## + log_tags 1 0.1167 44.786 11.0660
## + log_video_mean 1 0.0088 44.894 11.1550
##
## Step: AIC=-8.66
## log_pitch_contributors ~ log_pitch_budget
##
## Df Sum of Sq RSS AIC
## + log_pitch_views 1 4.9010 21.376 -14.3004
## + log_story_views_sum 1 2.4471 23.830 -10.2795
## + log_story_views_max 1 2.4471 23.830 -10.2795
## + log_story_views_mean 1 2.4471 23.830 -10.2795
## + log_story_views_min 1 2.4471 23.830 -10.2795
## + log_arindex 1 1.7434 24.533 -9.2027
## + log_insights 1 1.3971 24.880 -8.6842
## <none> 26.277 -8.6626
## + log_story_readtime 1 1.2423 25.034 -8.4546
## + log_story_funding_duration 1 0.9524 25.324 -8.0286
## + log_rel_week 1 0.7292 25.548 -7.7039
## + log_story_length 1 0.3625 25.914 -7.1766
## + log_abs_week_start 1 0.2001 26.077 -6.9454
## + story_id 1 0.1318 26.145 -6.8487
## + log_video_mean 1 0.1313 26.145 -6.8479
## + log_tags 1 0.0119 26.265 -6.6793
## + log_focal_page 1 0.0096 26.267 -6.6762
##
## Step: AIC=-14.3
## log_pitch_contributors ~ log_pitch_budget + log_pitch_views
##
## Df Sum of Sq RSS AIC
## + log_arindex 1 2.10797 19.268 -16.142
## + story_id 1 1.77831 19.598 -15.514
## + log_abs_week_start 1 1.17686 20.199 -14.396
## <none> 21.376 -14.300
## + log_story_length 1 0.78222 20.594 -13.680
## + log_insights 1 0.68980 20.686 -13.514
## + log_story_views_sum 1 0.55776 20.818 -13.279
## + log_story_views_max 1 0.55776 20.818 -13.279
## + log_story_views_mean 1 0.55776 20.818 -13.279
## + log_story_views_min 1 0.55776 20.818 -13.279
## + log_story_funding_duration 1 0.26428 21.111 -12.761
## + log_story_readtime 1 0.17614 21.200 -12.607
## + log_focal_page 1 0.12645 21.249 -12.520
## + log_rel_week 1 0.03231 21.343 -12.356
## + log_tags 1 0.02752 21.348 -12.348
## + log_video_mean 1 0.00080 21.375 -12.302
##
## Step: AIC=-16.14
## log_pitch_contributors ~ log_pitch_budget + log_pitch_views +
## log_arindex
##
## Df Sum of Sq RSS AIC
## + story_id 1 1.05217 18.216 -16.220
## <none> 19.268 -16.142
## + log_story_funding_duration 1 0.41899 18.849 -14.955
## + log_abs_week_start 1 0.41584 18.852 -14.949
## + log_story_views_sum 1 0.34559 18.922 -14.812
## + log_story_views_max 1 0.34559 18.922 -14.812
## + log_story_views_mean 1 0.34559 18.922 -14.812
## + log_story_views_min 1 0.34559 18.922 -14.812
## + log_story_length 1 0.30578 18.962 -14.734
## + log_insights 1 0.23719 19.031 -14.600
## + log_rel_week 1 0.20436 19.064 -14.536
## + log_video_mean 1 0.14989 19.118 -14.431
## + log_story_readtime 1 0.09425 19.174 -14.323
## + log_focal_page 1 0.03490 19.233 -14.209
## + log_tags 1 0.01015 19.258 -14.161
##
## Step: AIC=-16.22
## log_pitch_contributors ~ log_pitch_budget + log_pitch_views +
## log_arindex + story_id
##
## Df Sum of Sq RSS AIC
## + log_rel_week 1 1.61956 16.596 -17.665
## <none> 18.216 -16.220
## + log_insights 1 0.27418 17.942 -14.781
## + log_story_length 1 0.25064 17.965 -14.732
## + log_story_views_sum 1 0.16630 18.049 -14.559
## + log_story_views_max 1 0.16630 18.049 -14.559
## + log_story_views_mean 1 0.16630 18.049 -14.559
## + log_story_views_min 1 0.16630 18.049 -14.559
## + log_focal_page 1 0.09664 18.119 -14.416
## + log_story_funding_duration 1 0.06341 18.152 -14.349
## + log_story_readtime 1 0.02724 18.188 -14.275
## + log_video_mean 1 0.00787 18.208 -14.236
## + log_abs_week_start 1 0.00352 18.212 -14.227
## + log_tags 1 0.00034 18.215 -14.220
##
## Step: AIC=-17.66
## log_pitch_contributors ~ log_pitch_budget + log_pitch_views +
## log_arindex + story_id + log_rel_week
##
## Df Sum of Sq RSS AIC
## <none> 16.596 -17.665
## + log_story_funding_duration 1 0.72446 15.872 -17.316
## + log_insights 1 0.67908 15.917 -17.211
## + log_story_length 1 0.51672 16.079 -16.835
## + log_abs_week_start 1 0.45681 16.139 -16.698
## + log_story_views_sum 1 0.34058 16.256 -16.432
## + log_story_views_max 1 0.34058 16.256 -16.432
## + log_story_views_mean 1 0.34058 16.256 -16.432
## + log_story_views_min 1 0.34058 16.256 -16.432
## + log_focal_page 1 0.26862 16.328 -16.269
## + log_story_readtime 1 0.19242 16.404 -16.096
## + log_video_mean 1 0.01693 16.579 -15.703
## + log_tags 1 0.00609 16.590 -15.678##
## Call:
## lm(formula = log_pitch_contributors ~ log_pitch_budget + log_pitch_views +
## log_arindex + story_id + log_rel_week, data = log_story)
##
## Coefficients:
## (Intercept) log_pitch_budget log_pitch_views log_arindex
## 2.165335 0.366408 0.415844 1.119785
## story_id log_rel_week
## -0.005799 -0.792258model_contributors=lm(formula = log_pitch_contributors ~ log_pitch_budget + log_pitch_views +
log_arindex + story_id + log_rel_week, data = log_story)
summary(model_contributors)##
## Call:
## lm(formula = log_pitch_contributors ~ log_pitch_budget + log_pitch_views +
## log_arindex + story_id + log_rel_week, data = log_story)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.73604 -0.31107 0.06757 0.29313 1.88619
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 2.165335 4.932298 0.439 0.6637
## log_pitch_budget 0.366408 0.169606 2.160 0.0386 *
## log_pitch_views 0.415844 0.153388 2.711 0.0108 *
## log_arindex 1.119785 0.530841 2.109 0.0431 *
## story_id -0.005799 0.002701 -2.147 0.0397 *
## log_rel_week -0.792258 0.455502 -1.739 0.0919 .
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7317 on 31 degrees of freedom
## Multiple R-squared: 0.6304, Adjusted R-squared: 0.5708
## F-statistic: 10.57 on 5 and 31 DF, p-value: 5.426e-06leap_story=regsubsets(log_pitch_contributors ~ log_abs_week_start
+log_abs_week_end
+log_rel_week
+log_story_readtime
+log_story_views_mean
+log_story_funding_duration
+log_story_length
+log_focal_page
+log_tags
+log_pitch_views
+log_arindex
+log_pitch_budget
+log_video_mean
+log_insights
# +log_pitch_conversion
# +log_avg_amount
,
data=log_story
)## Warning in leaps.setup(x, y, wt = wt, nbest = nbest, nvmax = nvmax,
## force.in = force.in, : 1 linear dependencies found## Reordering variables and trying again:plot(leap_story,scale = "r2")
agg_story$pitch_conversion=agg_story$pitch_views/agg_story$pitch_contributors
log_story$log_pitch_conversion=log(agg_story$pitch_conversion)corrplot(cor(log_story))## Warning in cor(log_story): the standard deviation is zero
leap_story=regsubsets(log_pitch_contributors ~ log_abs_week_start
+log_abs_week_end
+log_rel_week
+log_story_readtime
+log_story_views_mean
+log_story_funding_duration
+log_story_length
+log_focal_page
+log_tags
+log_pitch_views
+log_arindex
+log_pitch_budget
+log_video_mean
+log_insights
+log_pitch_conversion
#+log_avg_amount
,
data=log_story,
nbest = 3
)## Warning in leaps.setup(x, y, wt = wt, nbest = nbest, nvmax = nvmax,
## force.in = force.in, : 1 linear dependencies found## Reordering variables and trying again:plot(leap_story,scale = "r2")## Warning in log(vr): NaNs produced## Warning in log(vr): NaNs produced
leap_story=regsubsets(log_pitch_contributors ~ log_rel_week
+log_story_readtime
+log_story_views_mean
+log_story_funding_duration
+log_story_length
+log_focal_page
+log_tags
+log_pitch_views
+log_arindex
+log_pitch_budget
+log_video_mean
+log_insights,
data=log_story,nbest = 2
)
plot(leap_story,scale = "r2")
attach(log_story)
model1=lm(log_pitch_contributors ~ log_rel_week+log_story_readtime+log_story_views_mean+log_story_length+log_pitch_views+
log_arindex+log_pitch_budget+log_video_mean)
summary(model1)##
## Call:
## lm(formula = log_pitch_contributors ~ log_rel_week + log_story_readtime +
## log_story_views_mean + log_story_length + log_pitch_views +
## log_arindex + log_pitch_budget + log_video_mean)
##
## Residuals:
## Min 1Q Median 3Q Max
## -1.8777 -0.3710 0.1049 0.4508 1.1626
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -2.4831 3.5752 -0.695 0.49308
## log_rel_week -0.5026 0.4374 -1.149 0.26025
## log_story_readtime -0.4992 0.4950 -1.008 0.32187
## log_story_views_mean 0.7277 0.5134 1.418 0.16736
## log_story_length -0.2679 0.1801 -1.488 0.14797
## log_pitch_views 0.1775 0.1894 0.937 0.35670
## log_arindex 1.0593 0.5942 1.783 0.08549 .
## log_pitch_budget 0.5831 0.1776 3.284 0.00275 **
## log_video_mean 1.0337 0.9211 1.122 0.27128
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7608 on 28 degrees of freedom
## Multiple R-squared: 0.639, Adjusted R-squared: 0.5359
## F-statistic: 6.196 on 8 and 28 DF, p-value: 0.0001268attach(log_story)## The following objects are masked from log_story (pos = 3):
##
## log_abs_week_end, log_abs_week_start, log_arindex,
## log_focal_page, log_insights, log_pitch_budget,
## log_pitch_contributors, log_pitch_conversion, log_pitch_views,
## log_rel_week, log_story_funding_duration, log_story_length,
## log_story_readtime, log_story_views_max, log_story_views_mean,
## log_story_views_min, log_story_views_sum, log_tags,
## log_video_mean, story_idmodel1=lm(log_pitch_contributors ~
log_pitch_budget)
summary(model1)##
## Call:
## lm(formula = log_pitch_contributors ~ log_pitch_budget)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.6568 -0.5773 0.1764 0.5621 1.6870
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -6.5060 1.8524 -3.512 0.00125 **
## log_pitch_budget 0.7959 0.1598 4.981 1.7e-05 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.8665 on 35 degrees of freedom
## Multiple R-squared: 0.4148, Adjusted R-squared: 0.3981
## F-statistic: 24.81 on 1 and 35 DF, p-value: 1.7e-05crowdfunding=data.frame(crowdfunding)
log_story=crowdfunding
log_story$abs_week=log(crowdfunding$abs_week)
log_story$rel_week=log(crowdfunding$rel_week)
log_story$story_readtime=log(crowdfunding$story_readtime+1)
log_story$story_views=log(crowdfunding$story_views+1)
log_story$story_funding_duration=log(crowdfunding$story_funding_duration)
log_story$story_length=log(crowdfunding$story_length)
log_story$focal_page=log(crowdfunding$focal_page+1)
log_story$pitch_contributors=log(crowdfunding$pitch_contributors)
log_story$tags=log(crowdfunding$tags)
log_story$pitch_views=log(crowdfunding$pitch_views)
log_story$arindex=log(crowdfunding$arindex)
log_story$pitch_budget=log(crowdfunding$pitch_budget)
log_story$video=log(crowdfunding$video+1)
log_story$insights=log(crowdfunding$insights+1)
log_story$pitch_conversion=log(crowdfunding$pitch_contributors/crowdfunding$pitch_views)
log_story$amount_per_contributor=log(crowdfunding$pitch_budget/crowdfunding$pitch_contributors)
psych::describe(log_story)## vars n mean sd median trimmed mad
## story_id 1 1848 1003.88 61.54 1007.00 1007.74 57.82
## abs_week 2 1848 3.74 0.52 3.89 3.83 0.42
## rel_week 3 1848 3.02 0.93 3.26 3.15 0.78
## story_readtime 4 1848 3.34 3.07 3.56 3.14 5.27
## story_views 5 1848 1.45 1.15 1.39 1.34 1.03
## story_funding_duration 6 1848 3.98 1.13 4.22 4.06 1.02
## story_length 7 1848 9.19 0.85 9.39 9.23 0.79
## focal_page 8 1848 0.17 0.30 0.00 0.13 0.00
## pitch_contributors 9 1848 2.61 1.07 2.40 2.58 0.90
## tags 10 1848 1.40 0.41 1.39 1.40 0.43
## pitch_views 11 1848 5.85 1.04 5.90 5.85 1.06
## arindex 12 1848 2.47 0.25 2.47 2.47 0.17
## pitch_budget 13 1848 11.51 0.88 11.29 11.43 0.85
## video 14 1848 0.04 0.15 0.00 0.00 0.00
## insights 15 1848 3.63 1.14 4.04 3.89 0.47
## pitch_conversion 16 1848 -3.23 1.01 -3.51 -3.33 0.69
## amount_per_contributor 17 1848 8.89 0.80 8.74 8.81 0.66
## min max range skew kurtosis se
## story_id 860.00 1110.00 250.00 -0.49 -0.25 1.43
## abs_week 0.69 4.30 3.61 -1.73 3.86 0.01
## rel_week 0.00 4.29 4.29 -1.20 1.18 0.02
## story_readtime 0.00 11.76 11.76 0.20 -1.40 0.07
## story_views 0.00 6.87 6.87 0.81 0.82 0.03
## story_funding_duration 1.39 5.70 4.32 -0.65 -0.36 0.03
## story_length 7.52 11.18 3.66 -0.40 -0.57 0.02
## focal_page 0.00 0.69 0.69 1.15 -0.68 0.01
## pitch_contributors 0.00 4.97 4.97 0.22 -0.05 0.02
## tags 0.69 2.56 1.87 0.08 -0.20 0.01
## pitch_views 3.50 8.61 5.11 0.12 0.42 0.02
## arindex 1.76 2.98 1.22 -0.24 0.53 0.01
## pitch_budget 10.13 13.82 3.69 0.72 -0.14 0.02
## video 0.00 0.69 0.69 4.01 14.09 0.00
## insights 0.00 4.62 4.62 -2.13 3.78 0.03
## pitch_conversion -5.09 -0.63 4.46 0.90 0.38 0.02
## amount_per_contributor 7.17 11.51 4.34 1.04 1.55 0.02col_names=names(crowdfunding)
col_len=length(col_names)
for (i in 2:col_len){
layout(matrix(seq(1:2), ncol = 2,byrow=TRUE),respect=TRUE)
hist(crowdfunding[,i],xlab=col_names[i],main="Original value")
hist(log_story[,i],xlab=col_names[i],main='Log Value')
}
cor(log_story)## story_id abs_week rel_week story_readtime
## story_id 1.000000000 0.29151793 -0.19805294 0.03532729
## abs_week 0.291517927 1.00000000 0.65595927 -0.18460303
## rel_week -0.198052939 0.65595927 1.00000000 -0.33226469
## story_readtime 0.035327291 -0.18460303 -0.33226469 1.00000000
## story_views 0.073386162 -0.14528087 -0.34633781 0.76873324
## story_funding_duration -0.389796188 0.08858619 -0.08677615 0.13305062
## story_length 0.179116170 0.08362073 -0.05456119 0.11779184
## focal_page 0.009284292 -0.67226997 -0.79315932 0.32391313
## pitch_contributors -0.242637232 0.02654537 -0.04066557 0.21085650
## tags 0.069792204 0.04012847 -0.03919823 -0.01429074
## pitch_views 0.278110898 0.21159632 -0.13759471 0.27019903
## arindex -0.245572135 -0.10007898 0.07720873 0.07221251
## pitch_budget -0.220497679 0.02755887 -0.03032280 0.09605163
## video -0.033655314 0.01883470 -0.00981049 -0.03037656
## insights -0.008413330 -0.06251100 -0.04878626 -0.04853652
## pitch_conversion -0.542020251 -0.18874934 0.09795014 -0.05360099
## amount_per_contributor 0.081955231 -0.00520508 0.02099605 -0.17583893
## story_views story_funding_duration story_length
## story_id 0.073386162 -0.389796188 0.179116170
## abs_week -0.145280873 0.088586193 0.083620733
## rel_week -0.346337814 -0.086776155 -0.054561193
## story_readtime 0.768733238 0.133050615 0.117791839
## story_views 1.000000000 0.169941133 0.186185945
## story_funding_duration 0.169941133 1.000000000 -0.138171427
## story_length 0.186185945 -0.138171427 1.000000000
## focal_page 0.298320568 -0.006636245 0.026863274
## pitch_contributors 0.229874666 0.375572767 -0.177371989
## tags 0.031853928 0.018052670 -0.048854391
## pitch_views 0.329736825 0.243371325 0.031884824
## arindex 0.072851898 0.079220013 -0.127997006
## pitch_budget 0.089679208 0.437488265 -0.221276932
## video -0.001308098 0.029141280 0.253663931
## insights -0.050598281 0.044567230 0.009902679
## pitch_conversion -0.094478317 0.148351168 -0.220539280
## amount_per_contributor -0.208158840 -0.021560093 -0.005871028
## focal_page pitch_contributors tags
## story_id 0.009284292 -0.24263723 0.069792204
## abs_week -0.672269971 0.02654537 0.040128467
## rel_week -0.793159325 -0.04066557 -0.039198230
## story_readtime 0.323913135 0.21085650 -0.014290743
## story_views 0.298320568 0.22987467 0.031853928
## story_funding_duration -0.006636245 0.37557277 0.018052670
## story_length 0.026863274 -0.17737199 -0.048854391
## focal_page 1.000000000 0.01055497 0.003459042
## pitch_contributors 0.010554969 1.00000000 -0.034415761
## tags 0.003459042 -0.03441576 1.000000000
## pitch_views 0.017753627 0.53992385 0.047792822
## arindex -0.021486308 0.39209772 -0.124919548
## pitch_budget 0.002239015 0.67665890 0.092902645
## video 0.014800460 -0.03304295 0.191323295
## insights 0.009328327 -0.23900359 -0.074762781
## pitch_conversion -0.007016518 0.50576719 -0.085433605
## amount_per_contributor -0.011614548 -0.59185102 0.147566308
## pitch_views arindex pitch_budget video
## story_id 0.27811090 -0.24557214 -0.220497679 -0.033655314
## abs_week 0.21159632 -0.10007898 0.027558870 0.018834698
## rel_week -0.13759471 0.07720873 -0.030322804 -0.009810490
## story_readtime 0.27019903 0.07221251 0.096051626 -0.030376559
## story_views 0.32973682 0.07285190 0.089679208 -0.001308098
## story_funding_duration 0.24337132 0.07922001 0.437488265 0.029141280
## story_length 0.03188482 -0.12799701 -0.221276932 0.253663931
## focal_page 0.01775363 -0.02148631 0.002239015 0.014800460
## pitch_contributors 0.53992385 0.39209772 0.676658903 -0.033042954
## tags 0.04779282 -0.12491955 0.092902645 0.191323295
## pitch_views 1.00000000 0.07483125 0.409915395 0.125240165
## arindex 0.07483125 1.00000000 0.290996567 -0.313649037
## pitch_budget 0.40991540 0.29099657 1.000000000 -0.119440234
## video 0.12524017 -0.31364904 -0.119440234 1.000000000
## insights -0.16139330 -0.12284993 -0.188222087 0.070876286
## pitch_conversion -0.45304555 0.33858952 0.296551069 -0.163355169
## amount_per_contributor -0.27076107 -0.20395055 0.193008699 -0.086721621
## insights pitch_conversion
## story_id -0.008413330 -0.542020251
## abs_week -0.062511000 -0.188749341
## rel_week -0.048786258 0.097950141
## story_readtime -0.048536520 -0.053600985
## story_views -0.050598281 -0.094478317
## story_funding_duration 0.044567230 0.148351168
## story_length 0.009902679 -0.220539280
## focal_page 0.009328327 -0.007016518
## pitch_contributors -0.239003592 0.505767186
## tags -0.074762781 -0.085433605
## pitch_views -0.161393302 -0.453045546
## arindex -0.122849934 0.338589515
## pitch_budget -0.188222087 0.296551069
## video 0.070876286 -0.163355169
## insights 1.000000000 -0.087725205
## pitch_conversion -0.087725205 1.000000000
## amount_per_contributor 0.112446121 -0.349347054
## amount_per_contributor
## story_id 0.081955231
## abs_week -0.005205080
## rel_week 0.020996048
## story_readtime -0.175838931
## story_views -0.208158840
## story_funding_duration -0.021560093
## story_length -0.005871028
## focal_page -0.011614548
## pitch_contributors -0.591851024
## tags 0.147566308
## pitch_views -0.270761068
## arindex -0.203950549
## pitch_budget 0.193008699
## video -0.086721621
## insights 0.112446121
## pitch_conversion -0.349347054
## amount_per_contributor 1.000000000cor(crowdfunding)## story_id abs_week rel_week story_readtime
## story_id 1.000000000 0.27001883 -0.27001883 0.058807409
## abs_week 0.270018835 1.00000000 0.69853612 -0.054257629
## rel_week -0.270018835 0.69853612 1.00000000 -0.155880166
## story_readtime 0.058807409 -0.05425763 -0.15588017 1.000000000
## story_views 0.076491255 -0.05886295 -0.18691251 0.940974451
## story_funding_duration -0.491434918 0.10611297 -0.10611297 0.088957021
## story_length 0.089753610 0.08172647 -0.08172647 0.021967198
## focal_page 0.009284292 -0.65387236 -0.67077433 0.167563253
## pitch_contributors -0.124508717 0.04729524 -0.04729524 0.140987185
## tags 0.124571116 0.05644108 -0.05644108 0.016441941
## pitch_views 0.096121662 0.09253671 -0.09253671 0.154038703
## arindex -0.255102683 -0.10075532 0.10075532 -0.015898247
## pitch_budget -0.135379291 0.02920334 -0.02920334 0.206856318
## video -0.033655314 0.01424293 -0.01424293 -0.007688042
## insights 0.017627106 -0.10728392 -0.10152994 0.016082394
## story_views story_funding_duration story_length
## story_id 0.07649125 -0.491434918 0.08975361
## abs_week -0.05886295 0.106112972 0.08172647
## rel_week -0.18691251 -0.106112972 -0.08172647
## story_readtime 0.94097445 0.088957021 0.02196720
## story_views 1.00000000 0.106991717 0.03437807
## story_funding_duration 0.10699172 1.000000000 0.17777656
## story_length 0.03437807 0.177776561 1.00000000
## focal_page 0.17446575 0.012786323 0.03380461
## pitch_contributors 0.14849574 0.310334306 -0.17548173
## tags 0.01809185 -0.002219174 -0.05910231
## pitch_views 0.16044734 0.170655727 -0.10911460
## arindex -0.01297695 0.046894525 -0.16136049
## pitch_budget 0.19668102 0.272256176 -0.15993705
## video -0.01300789 0.110770768 0.43765155
## insights 0.01628420 -0.022147763 -0.03003149
## focal_page pitch_contributors tags
## story_id 0.0092842919 -0.1245087174 0.124571116
## abs_week -0.6538723648 0.0472952434 0.056441084
## rel_week -0.6707743346 -0.0472952434 -0.056441084
## story_readtime 0.1675632532 0.1409871853 0.016441941
## story_views 0.1744657498 0.1484957439 0.018091846
## story_funding_duration 0.0127863229 0.3103343058 -0.002219174
## story_length 0.0338046105 -0.1754817310 -0.059102310
## focal_page 1.0000000000 -0.0008560775 0.003370834
## pitch_contributors -0.0008560775 1.0000000000 0.044726675
## tags 0.0033708336 0.0447266754 1.000000000
## pitch_views 0.0023424747 0.7136869031 -0.062603624
## arindex -0.0222519267 0.4722602215 -0.196172256
## pitch_budget 0.0057600184 0.8739299374 -0.032525646
## video 0.0148004603 -0.0827184893 0.224853610
## insights 0.0463889536 -0.3528116715 -0.030257322
## pitch_views arindex pitch_budget
## story_id 0.0961216616 -0.25510268 -0.135379291
## abs_week 0.0925367132 -0.10075532 0.029203337
## rel_week -0.0925367132 0.10075532 -0.029203337
## story_readtime 0.1540387032 -0.01589825 0.206856318
## story_views 0.1604473424 -0.01297695 0.196681020
## story_funding_duration 0.1706557273 0.04689452 0.272256176
## story_length -0.1091145977 -0.16136049 -0.159937052
## focal_page 0.0023424747 -0.02225193 0.005760018
## pitch_contributors 0.7136869031 0.47226022 0.873929937
## tags -0.0626036241 -0.19617226 -0.032525646
## pitch_views 1.0000000000 0.32205690 0.718236795
## arindex 0.3220569024 1.00000000 0.435052145
## pitch_budget 0.7182367951 0.43505215 1.000000000
## video -0.0003939853 -0.28883357 -0.111110412
## insights -0.2444762370 -0.21401586 -0.256328447
## video insights
## story_id -0.0336553135 0.01762711
## abs_week 0.0142429340 -0.10728392
## rel_week -0.0142429340 -0.10152994
## story_readtime -0.0076880421 0.01608239
## story_views -0.0130078898 0.01628420
## story_funding_duration 0.1107707678 -0.02214776
## story_length 0.4376515458 -0.03003149
## focal_page 0.0148004603 0.04638895
## pitch_contributors -0.0827184893 -0.35281167
## tags 0.2248536100 -0.03025732
## pitch_views -0.0003939853 -0.24447624
## arindex -0.2888335670 -0.21401586
## pitch_budget -0.1111104121 -0.25632845
## video 1.0000000000 0.02388509
## insights 0.0238850913 1.00000000corrplot(cor(log_story))
Key Observations
- There are total of 37 stories in this dataset.
- And the majority of stories have relatively small number of contributers
####pick a dependent variable 1. pitch_contributors 2. pitch_views 3. pitch_conversion=pitch_views/pitch_contributors
null=lm(pitch_contributors~1,data=log_story)
full=lm(pitch_contributors~.,data=log_story)
step(null,scope=list(lower=null,upper=full),direction="forward")## Start: AIC=250.95
## pitch_contributors ~ 1
##
## Df Sum of Sq RSS AIC
## + pitch_budget 1 968.16 1146.3 -878.47
## + amount_per_contributor 1 740.68 1373.8 -543.95
## + pitch_views 1 616.41 1498.1 -383.92
## + pitch_conversion 1 540.89 1573.6 -293.03
## + arindex 1 325.08 1789.4 -55.53
## + story_funding_duration 1 298.26 1816.2 -28.04
## + story_id 1 124.49 1990.0 140.82
## + insights 1 120.79 1993.7 144.26
## + story_views 1 111.74 2002.8 152.63
## + story_readtime 1 94.01 2020.5 168.91
## + story_length 1 66.52 2048.0 193.88
## + rel_week 1 3.50 2111.0 249.89
## + tags 1 2.50 2112.0 250.76
## + video 1 2.31 2112.2 250.93
## <none> 2114.5 250.95
## + abs_week 1 1.49 2113.0 251.65
## + focal_page 1 0.24 2114.3 252.75
##
## Step: AIC=-878.47
## pitch_contributors ~ pitch_budget
##
## Df Sum of Sq RSS AIC
## + amount_per_contributor 1 1146.34 0.00 -122379
## + pitch_conversion 1 215.81 930.53 -1262
## + pitch_views 1 175.20 971.14 -1183
## + arindex 1 88.02 1058.32 -1024
## + story_views 1 61.02 1085.32 -978
## + story_readtime 1 45.41 1100.93 -951
## + insights 1 27.32 1119.02 -921
## + tags 1 20.18 1126.16 -909
## + story_id 1 19.40 1126.94 -908
## + story_funding_duration 1 16.55 1129.80 -903
## + video 1 4.90 1141.44 -884
## + story_length 1 1.70 1144.64 -879
## <none> 1146.34 -878
## + rel_week 1 0.86 1145.48 -878
## + focal_page 1 0.17 1146.17 -877
## + abs_week 1 0.13 1146.21 -877
##
## Step: AIC=-122379.2
## pitch_contributors ~ pitch_budget + amount_per_contributor## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + rel_week 1 1.6317e-28 3.1842e-26 -122387
## + story_id 1 1.6075e-28 3.1845e-26 -122386
## + abs_week 1 1.0095e-28 3.1905e-26 -122383
## + focal_page 1 6.6189e-29 3.1939e-26 -122381
## + story_readtime 1 5.8706e-29 3.1947e-26 -122381
## + tags 1 5.3659e-29 3.1952e-26 -122380
## + story_views 1 4.4959e-29 3.1961e-26 -122380
## <none> 3.2005e-26 -122379
## + video 1 2.4148e-29 3.1981e-26 -122379
## + story_funding_duration 1 1.8132e-29 3.1987e-26 -122378
## + story_length 1 7.1060e-30 3.1998e-26 -122378
## + arindex 1 1.0840e-30 3.2004e-26 -122377
## + insights 1 8.5500e-31 3.2005e-26 -122377
## + pitch_views 1 2.7900e-31 3.2005e-26 -122377
## + pitch_conversion 1 2.7900e-31 3.2005e-26 -122377
##
## Step: AIC=-122386.6
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + story_id 1 2.4972e-28 3.1593e-26 -122399
## + tags 1 6.1620e-29 3.1781e-26 -122388
## <none> 3.1842e-26 -122387
## + video 1 2.5652e-29 3.1817e-26 -122386
## + story_readtime 1 1.3122e-29 3.1829e-26 -122385
## + story_length 1 1.2181e-29 3.1830e-26 -122385
## + focal_page 1 1.0799e-29 3.1832e-26 -122385
## + story_funding_duration 1 1.0615e-29 3.1832e-26 -122385
## + story_views 1 5.7880e-30 3.1837e-26 -122385
## + pitch_views 1 5.3270e-30 3.1837e-26 -122385
## + pitch_conversion 1 5.3270e-30 3.1837e-26 -122385
## + abs_week 1 4.7620e-30 3.1838e-26 -122385
## + insights 1 2.8920e-30 3.1839e-26 -122385
## + arindex 1 6.6000e-32 3.1842e-26 -122385
##
## Step: AIC=-122399.2
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + abs_week 1 9.0399e-29 3.1502e-26 -122402
## + focal_page 1 6.0936e-29 3.1532e-26 -122401
## + tags 1 4.5704e-29 3.1547e-26 -122400
## + pitch_views 1 4.0621e-29 3.1552e-26 -122400
## + pitch_conversion 1 4.0621e-29 3.1552e-26 -122400
## + video 1 3.5882e-29 3.1557e-26 -122399
## <none> 3.1593e-26 -122399
## + story_readtime 1 1.5048e-29 3.1578e-26 -122398
## + story_views 1 1.1352e-29 3.1581e-26 -122398
## + insights 1 9.7280e-30 3.1583e-26 -122398
## + story_funding_duration 1 5.9070e-30 3.1587e-26 -122398
## + arindex 1 4.4690e-30 3.1588e-26 -122397
## + story_length 1 2.4490e-30 3.1590e-26 -122397
##
## Step: AIC=-122402.5
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + story_funding_duration 1 7.9526e-29 3.1423e-26 -122405
## + tags 1 5.3528e-29 3.1449e-26 -122404
## + video 1 4.7887e-29 3.1454e-26 -122403
## + focal_page 1 3.4681e-29 3.1467e-26 -122403
## <none> 3.1502e-26 -122402
## + pitch_views 1 2.1567e-29 3.1481e-26 -122402
## + pitch_conversion 1 2.1567e-29 3.1481e-26 -122402
## + story_readtime 1 1.2862e-29 3.1489e-26 -122401
## + insights 1 1.2235e-29 3.1490e-26 -122401
## + story_length 1 8.1290e-30 3.1494e-26 -122401
## + story_views 1 6.5550e-30 3.1496e-26 -122401
## + arindex 1 3.2000e-32 3.1502e-26 -122400
##
## Step: AIC=-122405.1
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week + story_funding_duration## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + tags 1 5.6382e-29 3.1366e-26 -122406
## + focal_page 1 5.2953e-29 3.1370e-26 -122406
## + video 1 4.5463e-29 3.1377e-26 -122406
## + pitch_views 1 3.8976e-29 3.1384e-26 -122405
## + pitch_conversion 1 3.8976e-29 3.1384e-26 -122405
## <none> 3.1423e-26 -122405
## + story_readtime 1 1.7027e-29 3.1406e-26 -122404
## + story_length 1 1.3578e-29 3.1409e-26 -122404
## + story_views 1 1.2114e-29 3.1411e-26 -122404
## + insights 1 5.1450e-30 3.1417e-26 -122403
## + arindex 1 3.7300e-31 3.1422e-26 -122403
##
## Step: AIC=-122406.5
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week + story_funding_duration +
## tags## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + focal_page 1 5.5009e-29 3.1311e-26 -122408
## + pitch_views 1 4.1575e-29 3.1325e-26 -122407
## + pitch_conversion 1 4.1575e-29 3.1325e-26 -122407
## <none> 3.1366e-26 -122406
## + video 1 2.7443e-29 3.1339e-26 -122406
## + story_length 1 1.6951e-29 3.1349e-26 -122405
## + story_readtime 1 1.6248e-29 3.1350e-26 -122405
## + story_views 1 1.4239e-29 3.1352e-26 -122405
## + insights 1 8.1910e-30 3.1358e-26 -122405
## + arindex 1 2.0600e-30 3.1364e-26 -122405
##
## Step: AIC=-122407.7
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week + story_funding_duration +
## tags + focal_page## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + pitch_views 1 4.5572e-29 3.1266e-26 -122408
## + pitch_conversion 1 4.5572e-29 3.1266e-26 -122408
## <none> 3.1311e-26 -122408
## + story_readtime 1 2.6511e-29 3.1285e-26 -122407
## + video 1 2.5849e-29 3.1285e-26 -122407
## + story_views 1 2.1092e-29 3.1290e-26 -122407
## + story_length 1 1.6270e-29 3.1295e-26 -122407
## + insights 1 1.1094e-29 3.1300e-26 -122406
## + arindex 1 2.1220e-30 3.1309e-26 -122406
##
## Step: AIC=-122408.4
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week + story_funding_duration +
## tags + focal_page + pitch_views## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## + video 1 4.6403e-29 3.1219e-26 -122409
## <none> 3.1266e-26 -122408
## + story_length 1 2.3114e-29 3.1243e-26 -122408
## + story_readtime 1 1.6892e-29 3.1249e-26 -122407
## + story_views 1 1.0972e-29 3.1255e-26 -122407
## + insights 1 9.7980e-30 3.1256e-26 -122407
## + arindex 1 1.0440e-30 3.1265e-26 -122406
##
## Step: AIC=-122409.1
## pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week + story_funding_duration +
## tags + focal_page + pitch_views + video## Warning: attempting model selection on an essentially perfect fit is
## nonsense## Df Sum of Sq RSS AIC
## <none> 3.1219e-26 -122409
## + story_readtime 1 1.2574e-29 3.1207e-26 -122408
## + arindex 1 1.0684e-29 3.1209e-26 -122408
## + story_length 1 1.0608e-29 3.1209e-26 -122408
## + story_views 1 7.7760e-30 3.1212e-26 -122408
## + insights 1 6.7778e-30 3.1213e-26 -122408##
## Call:
## lm(formula = pitch_contributors ~ pitch_budget + amount_per_contributor +
## rel_week + story_id + abs_week + story_funding_duration +
## tags + focal_page + pitch_views + video, data = log_story)
##
## Coefficients:
## (Intercept) pitch_budget amount_per_contributor
## 1.992e-14 1.000e+00 -1.000e+00
## rel_week story_id abs_week
## -1.210e-15 -1.571e-17 1.082e-15
## story_funding_duration tags focal_page
## -3.363e-16 -3.672e-16 -1.040e-15
## pitch_views video
## 2.691e-16 -1.096e-15Q2 p19
Now, you want to build and estimate a regression model where the dependent variable is a measure of how much time people spent on reading a story or how many people actually read a story (story_read_time or story_ views, respectively). What variables would you choose as independent variables? Show the output of the final model in STATA or R. Provide in a few sentences on your main takeaways from the analyses.
hist(crowdfunding$story_readtime)
hist(crowdfunding$story_readtime,breaks = "Sturges",xlab='story_readtime',main='frequency by story_readtime')
str(crowdfunding)## 'data.frame': 1848 obs. of 15 variables:
## $ story_id : num 860 860 860 860 860 860 860 860 860 860 ...
## $ abs_week : num 19 20 21 22 23 24 25 26 27 28 ...
## $ rel_week : num 1 2 3 4 5 6 7 8 9 10 ...
## $ story_readtime : num 1711 2171 1608 2411 53 ...
## $ story_views : num 17 24 30 29 6 9 12 6 10 7 ...
## $ story_funding_duration: num 294 294 294 294 294 294 294 294 294 294 ...
## $ story_length : num 3620 3620 3620 3620 3620 3620 3620 3620 3620 3620 ...
## $ focal_page : num 1 1 1 1 1 1 1 1 1 1 ...
## $ pitch_contributors : num 17 17 17 17 17 17 17 17 17 17 ...
## $ tags : num 4 4 4 4 4 4 4 4 4 4 ...
## $ pitch_views : num 355 355 355 355 355 355 355 355 355 355 ...
## $ arindex : num 11.6 11.6 11.6 11.6 11.6 ...
## $ pitch_budget : num 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 1e+05 ...
## $ video : num 0 0 0 0 0 0 0 0 0 0 ...
## $ insights : num 77 73 73 66 66 56 56 52 65 55 ...crowdfunding=data.frame(crowdfunding)
log_crowd=crowdfunding
log_crowd$story_id=crowdfunding$story_id
log_crowd$abs_week=log(crowdfunding$abs_week)
log_crowd$rel_week=log(crowdfunding$rel_week)
log_crowd$story_readtime=log(crowdfunding$story_readtime+1)
log_crowd$story_views=log(crowdfunding$story_views+1)
log_crowd$story_funding_duration=log(crowdfunding$story_funding_duration)
log_crowd$story_length=log(crowdfunding$story_length)
log_crowd$focal_page=log(crowdfunding$focal_page+1)
log_crowd$pitch_contributors=log(crowdfunding$pitch_contributors)
log_crowd$tags=log(crowdfunding$tags)
log_crowd$pitch_views=log(crowdfunding$pitch_views)
log_crowd$arindex=log(crowdfunding$arindex)
log_crowd$pitch_budget=log(crowdfunding$pitch_budget)
log_crowd$video=log(crowdfunding$video+1)
log_crowd$insights=log(crowdfunding$insights+1)
psych::describe(log_crowd)## vars n mean sd median trimmed mad
## story_id 1 1848 1003.88 61.54 1007.00 1007.74 57.82
## abs_week 2 1848 3.74 0.52 3.89 3.83 0.42
## rel_week 3 1848 3.02 0.93 3.26 3.15 0.78
## story_readtime 4 1848 3.34 3.07 3.56 3.14 5.27
## story_views 5 1848 1.45 1.15 1.39 1.34 1.03
## story_funding_duration 6 1848 3.98 1.13 4.22 4.06 1.02
## story_length 7 1848 9.19 0.85 9.39 9.23 0.79
## focal_page 8 1848 0.17 0.30 0.00 0.13 0.00
## pitch_contributors 9 1848 2.61 1.07 2.40 2.58 0.90
## tags 10 1848 1.40 0.41 1.39 1.40 0.43
## pitch_views 11 1848 5.85 1.04 5.90 5.85 1.06
## arindex 12 1848 2.47 0.25 2.47 2.47 0.17
## pitch_budget 13 1848 11.51 0.88 11.29 11.43 0.85
## video 14 1848 0.04 0.15 0.00 0.00 0.00
## insights 15 1848 3.63 1.14 4.04 3.89 0.47
## min max range skew kurtosis se
## story_id 860.00 1110.00 250.00 -0.49 -0.25 1.43
## abs_week 0.69 4.30 3.61 -1.73 3.86 0.01
## rel_week 0.00 4.29 4.29 -1.20 1.18 0.02
## story_readtime 0.00 11.76 11.76 0.20 -1.40 0.07
## story_views 0.00 6.87 6.87 0.81 0.82 0.03
## story_funding_duration 1.39 5.70 4.32 -0.65 -0.36 0.03
## story_length 7.52 11.18 3.66 -0.40 -0.57 0.02
## focal_page 0.00 0.69 0.69 1.15 -0.68 0.01
## pitch_contributors 0.00 4.97 4.97 0.22 -0.05 0.02
## tags 0.69 2.56 1.87 0.08 -0.20 0.01
## pitch_views 3.50 8.61 5.11 0.12 0.42 0.02
## arindex 1.76 2.98 1.22 -0.24 0.53 0.01
## pitch_budget 10.13 13.82 3.69 0.72 -0.14 0.02
## video 0.00 0.69 0.69 4.01 14.09 0.00
## insights 0.00 4.62 4.62 -2.13 3.78 0.03leaps_readtime=regsubsets(story_readtime ~ story_id
+ abs_week
+ rel_week
+ story_views
+ story_funding_duration
+ story_length
+ focal_page
+ pitch_contributors
+ tags
+ pitch_views
+ arindex
+ pitch_budget
+ video
+ insights,
data =log_crowd,nbest = 1)
plot(leaps_readtime,scale = 'r2')
leaps_readtime=regsubsets(story_readtime ~ story_id
+ abs_week
+ rel_week
+ story_views
+ story_funding_duration
+ story_length
+ focal_page
+ pitch_contributors
+ tags
+ pitch_views
+ arindex
+ pitch_budget
+ video
+ insights,
data =log_crowd,nbest = 2)
plot(leaps_readtime,scale = 'r2')
leaps_readtime## Subset selection object
## Call: regsubsets.formula(story_readtime ~ story_id + abs_week + rel_week +
## story_views + story_funding_duration + story_length + focal_page +
## pitch_contributors + tags + pitch_views + arindex + pitch_budget +
## video + insights, data = log_crowd, nbest = 2)
## 14 Variables (and intercept)
## Forced in Forced out
## story_id FALSE FALSE
## abs_week FALSE FALSE
## rel_week FALSE FALSE
## story_views FALSE FALSE
## story_funding_duration FALSE FALSE
## story_length FALSE FALSE
## focal_page FALSE FALSE
## pitch_contributors FALSE FALSE
## tags FALSE FALSE
## pitch_views FALSE FALSE
## arindex FALSE FALSE
## pitch_budget FALSE FALSE
## video FALSE FALSE
## insights FALSE FALSE
## 2 subsets of each size up to 8
## Selection Algorithm: exhaustivenull=lm(story_readtime~1,data=log_crowd)
full=lm(story_readtime~story_id+ abs_week+ rel_week+ story_views+ story_funding_duration+ story_length + focal_page+ pitch_contributors+ tags+ pitch_views + arindex+ pitch_budget+ video+ insights,data=log_crowd)
step(null, scope=list(lower=null,upper=full),direction='forward')## Start: AIC=4147.66
## story_readtime ~ 1
##
## Df Sum of Sq RSS AIC
## + story_views 1 10292.4 7124.3 2497.7
## + rel_week 1 1922.8 15493.9 3933.5
## + focal_page 1 1827.4 15589.3 3944.8
## + pitch_views 1 1271.5 16145.1 4009.6
## + pitch_contributors 1 774.4 16642.3 4065.6
## + abs_week 1 593.5 16823.1 4085.6
## + story_funding_duration 1 308.3 17108.4 4116.7
## + story_length 1 241.7 17175.0 4123.8
## + pitch_budget 1 160.7 17256.0 4132.5
## + arindex 1 90.8 17325.9 4140.0
## + insights 1 41.0 17375.6 4145.3
## + story_id 1 21.7 17394.9 4147.4
## <none> 17416.7 4147.7
## + video 1 16.1 17400.6 4148.0
## + tags 1 3.6 17413.1 4149.3
##
## Step: AIC=2497.7
## story_readtime ~ story_views
##
## Df Sum of Sq RSS AIC
## + focal_page 1 171.034 6953.2 2454.8
## + abs_week 1 94.609 7029.7 2475.0
## + rel_week 1 86.269 7038.0 2477.2
## + tags 1 26.217 7098.1 2492.9
## + pitch_contributors 1 21.438 7102.8 2494.1
## + video 1 15.025 7109.3 2495.8
## + pitch_budget 1 12.906 7111.4 2496.3
## + story_length 1 11.581 7112.7 2496.7
## + story_id 1 7.787 7116.5 2497.7
## <none> 7124.3 2497.7
## + pitch_views 1 5.463 7118.8 2498.3
## + arindex 1 4.600 7119.7 2498.5
## + insights 1 1.623 7122.7 2499.3
## + story_funding_duration 1 0.104 7124.2 2499.7
##
## Step: AIC=2454.79
## story_readtime ~ story_views + focal_page
##
## Df Sum of Sq RSS AIC
## + pitch_contributors 1 29.7856 6923.5 2448.9
## + tags 1 25.3760 6927.9 2450.0
## + video 1 16.6857 6936.6 2452.3
## + pitch_budget 1 15.4535 6937.8 2452.7
## + pitch_views 1 12.3997 6940.8 2453.5
## + story_length 1 9.0272 6944.2 2454.4
## <none> 6953.2 2454.8
## + arindex 1 7.5153 6945.7 2454.8
## + story_id 1 6.8510 6946.4 2455.0
## + insights 1 2.5903 6950.7 2456.1
## + abs_week 1 1.8579 6951.4 2456.3
## + rel_week 1 1.5263 6951.7 2456.4
## + story_funding_duration 1 1.2593 6952.0 2456.5
##
## Step: AIC=2448.86
## story_readtime ~ story_views + focal_page + pitch_contributors
##
## Df Sum of Sq RSS AIC
## + tags 1 23.0897 6900.4 2444.7
## + video 1 15.2752 6908.2 2446.8
## <none> 6923.5 2448.9
## + story_length 1 3.1803 6920.3 2450.0
## + abs_week 1 2.2953 6921.2 2450.2
## + rel_week 1 1.6443 6921.8 2450.4
## + story_id 1 1.4273 6922.0 2450.5
## + pitch_views 1 0.8110 6922.6 2450.6
## + story_funding_duration 1 0.6911 6922.8 2450.7
## + arindex 1 0.4811 6923.0 2450.7
## + insights 1 0.1212 6923.3 2450.8
## + pitch_budget 1 0.1042 6923.4 2450.8
##
## Step: AIC=2444.69
## story_readtime ~ story_views + focal_page + pitch_contributors +
## tags
##
## Df Sum of Sq RSS AIC
## + video 1 9.2964 6891.1 2444.2
## <none> 6900.4 2444.7
## + story_length 1 4.4740 6895.9 2445.5
## + abs_week 1 1.5538 6898.8 2446.3
## + pitch_views 1 1.5439 6898.8 2446.3
## + pitch_budget 1 1.2535 6899.1 2446.3
## + rel_week 1 1.0376 6899.3 2446.4
## + story_id 1 0.8408 6899.5 2446.5
## + insights 1 0.5817 6899.8 2446.5
## + story_funding_duration 1 0.4762 6899.9 2446.6
## + arindex 1 0.0130 6900.4 2446.7
##
## Step: AIC=2444.19
## story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video
##
## Df Sum of Sq RSS AIC
## <none> 6891.1 2444.2
## + pitch_views 1 3.13704 6887.9 2445.3
## + story_length 1 1.74602 6889.3 2445.7
## + abs_week 1 1.33320 6889.7 2445.8
## + story_id 1 1.18721 6889.9 2445.9
## + rel_week 1 1.11720 6890.0 2445.9
## + arindex 1 0.77485 6890.3 2446.0
## + pitch_budget 1 0.37768 6890.7 2446.1
## + story_funding_duration 1 0.32249 6890.7 2446.1
## + insights 1 0.26195 6890.8 2446.1##
## Call:
## lm(formula = story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video, data = log_crowd)
##
## Coefficients:
## (Intercept) story_views focal_page
## 0.3757 1.9460 1.0885
## pitch_contributors tags video
## 0.1158 -0.2407 -0.4677null=lm(story_readtime~1,data=log_crowd)
full=lm(story_readtime~.,data=log_crowd)
step(null, scope=list(lower=null,upper=full),direction='forward')## Start: AIC=4147.66
## story_readtime ~ 1
##
## Df Sum of Sq RSS AIC
## + story_views 1 10292.4 7124.3 2497.7
## + rel_week 1 1922.8 15493.9 3933.5
## + focal_page 1 1827.4 15589.3 3944.8
## + pitch_views 1 1271.5 16145.1 4009.6
## + pitch_contributors 1 774.4 16642.3 4065.6
## + abs_week 1 593.5 16823.1 4085.6
## + story_funding_duration 1 308.3 17108.4 4116.7
## + story_length 1 241.7 17175.0 4123.8
## + pitch_budget 1 160.7 17256.0 4132.5
## + arindex 1 90.8 17325.9 4140.0
## + insights 1 41.0 17375.6 4145.3
## + story_id 1 21.7 17394.9 4147.4
## <none> 17416.7 4147.7
## + video 1 16.1 17400.6 4148.0
## + tags 1 3.6 17413.1 4149.3
##
## Step: AIC=2497.7
## story_readtime ~ story_views
##
## Df Sum of Sq RSS AIC
## + focal_page 1 171.034 6953.2 2454.8
## + abs_week 1 94.609 7029.7 2475.0
## + rel_week 1 86.269 7038.0 2477.2
## + tags 1 26.217 7098.1 2492.9
## + pitch_contributors 1 21.438 7102.8 2494.1
## + video 1 15.025 7109.3 2495.8
## + pitch_budget 1 12.906 7111.4 2496.3
## + story_length 1 11.581 7112.7 2496.7
## + story_id 1 7.787 7116.5 2497.7
## <none> 7124.3 2497.7
## + pitch_views 1 5.463 7118.8 2498.3
## + arindex 1 4.600 7119.7 2498.5
## + insights 1 1.623 7122.7 2499.3
## + story_funding_duration 1 0.104 7124.2 2499.7
##
## Step: AIC=2454.79
## story_readtime ~ story_views + focal_page
##
## Df Sum of Sq RSS AIC
## + pitch_contributors 1 29.7856 6923.5 2448.9
## + tags 1 25.3760 6927.9 2450.0
## + video 1 16.6857 6936.6 2452.3
## + pitch_budget 1 15.4535 6937.8 2452.7
## + pitch_views 1 12.3997 6940.8 2453.5
## + story_length 1 9.0272 6944.2 2454.4
## <none> 6953.2 2454.8
## + arindex 1 7.5153 6945.7 2454.8
## + story_id 1 6.8510 6946.4 2455.0
## + insights 1 2.5903 6950.7 2456.1
## + abs_week 1 1.8579 6951.4 2456.3
## + rel_week 1 1.5263 6951.7 2456.4
## + story_funding_duration 1 1.2593 6952.0 2456.5
##
## Step: AIC=2448.86
## story_readtime ~ story_views + focal_page + pitch_contributors
##
## Df Sum of Sq RSS AIC
## + tags 1 23.0897 6900.4 2444.7
## + video 1 15.2752 6908.2 2446.8
## <none> 6923.5 2448.9
## + story_length 1 3.1803 6920.3 2450.0
## + abs_week 1 2.2953 6921.2 2450.2
## + rel_week 1 1.6443 6921.8 2450.4
## + story_id 1 1.4273 6922.0 2450.5
## + pitch_views 1 0.8110 6922.6 2450.6
## + story_funding_duration 1 0.6911 6922.8 2450.7
## + arindex 1 0.4811 6923.0 2450.7
## + insights 1 0.1212 6923.3 2450.8
## + pitch_budget 1 0.1042 6923.4 2450.8
##
## Step: AIC=2444.69
## story_readtime ~ story_views + focal_page + pitch_contributors +
## tags
##
## Df Sum of Sq RSS AIC
## + video 1 9.2964 6891.1 2444.2
## <none> 6900.4 2444.7
## + story_length 1 4.4740 6895.9 2445.5
## + abs_week 1 1.5538 6898.8 2446.3
## + pitch_views 1 1.5439 6898.8 2446.3
## + pitch_budget 1 1.2535 6899.1 2446.3
## + rel_week 1 1.0376 6899.3 2446.4
## + story_id 1 0.8408 6899.5 2446.5
## + insights 1 0.5817 6899.8 2446.5
## + story_funding_duration 1 0.4762 6899.9 2446.6
## + arindex 1 0.0130 6900.4 2446.7
##
## Step: AIC=2444.19
## story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video
##
## Df Sum of Sq RSS AIC
## <none> 6891.1 2444.2
## + pitch_views 1 3.13704 6887.9 2445.3
## + story_length 1 1.74602 6889.3 2445.7
## + abs_week 1 1.33320 6889.7 2445.8
## + story_id 1 1.18721 6889.9 2445.9
## + rel_week 1 1.11720 6890.0 2445.9
## + arindex 1 0.77485 6890.3 2446.0
## + pitch_budget 1 0.37768 6890.7 2446.1
## + story_funding_duration 1 0.32249 6890.7 2446.1
## + insights 1 0.26195 6890.8 2446.1##
## Call:
## lm(formula = story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video, data = log_crowd)
##
## Coefficients:
## (Intercept) story_views focal_page
## 0.3757 1.9460 1.0885
## pitch_contributors tags video
## 0.1158 -0.2407 -0.4677model_readtime=lm(formula = story_readtime ~ story_views + focal_page + pitch_contributors +
tags + video, data = log_crowd)
summary(model_readtime)##
## Call:
## lm(formula = story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video, data = log_crowd)
##
## Residuals:
## Min 1Q Median 3Q Max
## -6.1951 -1.1916 -0.2045 1.2462 6.4502
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.37567 0.20145 1.865 0.06237 .
## story_views 1.94595 0.04225 46.054 < 2e-16 ***
## focal_page 1.08852 0.15717 6.926 5.96e-12 ***
## pitch_contributors 0.11582 0.04336 2.671 0.00763 **
## tags -0.24073 0.11256 -2.139 0.03260 *
## video -0.46770 0.29669 -1.576 0.11511
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.934 on 1842 degrees of freedom
## Multiple R-squared: 0.6043, Adjusted R-squared: 0.6033
## F-statistic: 562.7 on 5 and 1842 DF, p-value: < 2.2e-16model_readtime=lm(story_readtime ~ story_views+focal_page,log_crowd)
summary(model_readtime)##
## Call:
## lm(formula = story_readtime ~ story_views + focal_page, data = log_crowd)
##
## Residuals:
## Min 1Q Median 3Q Max
## -6.6351 -1.0281 -0.2931 1.2591 6.4763
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 0.29306 0.07333 3.996 6.68e-05 ***
## story_views 1.97028 0.04116 47.870 < 2e-16 ***
## focal_page 1.06042 0.15741 6.737 2.16e-11 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1.941 on 1845 degrees of freedom
## Multiple R-squared: 0.6008, Adjusted R-squared: 0.6003
## F-statistic: 1388 on 2 and 1845 DF, p-value: < 2.2e-16leaps_story_views=regsubsets(story_views~ story_id
+ abs_week
+ rel_week
+ story_readtime
+ story_funding_duration
+ story_length
+ focal_page
+ pitch_contributors
+ tags
+ pitch_views
+ arindex
+ pitch_budget
+ video
+ insights,
data =log_crowd,nbest = 1)
plot(leaps_story_views,scale = 'r2')
leaps_story_views=regsubsets(story_views ~ story_id
+ abs_week
+ rel_week
+ story_readtime
+ story_funding_duration
+ story_length
+ focal_page
+ pitch_contributors
+ tags
+ pitch_views
+ arindex
+ pitch_budget
+ video
+ insights,
data =log_crowd,nbest = 2)
plot(leaps_story_views,scale = 'r2')
leaps_readtime## Subset selection object
## Call: regsubsets.formula(story_readtime ~ story_id + abs_week + rel_week +
## story_views + story_funding_duration + story_length + focal_page +
## pitch_contributors + tags + pitch_views + arindex + pitch_budget +
## video + insights, data = log_crowd, nbest = 2)
## 14 Variables (and intercept)
## Forced in Forced out
## story_id FALSE FALSE
## abs_week FALSE FALSE
## rel_week FALSE FALSE
## story_views FALSE FALSE
## story_funding_duration FALSE FALSE
## story_length FALSE FALSE
## focal_page FALSE FALSE
## pitch_contributors FALSE FALSE
## tags FALSE FALSE
## pitch_views FALSE FALSE
## arindex FALSE FALSE
## pitch_budget FALSE FALSE
## video FALSE FALSE
## insights FALSE FALSE
## 2 subsets of each size up to 8
## Selection Algorithm: exhaustivemodel_story_views=lm(formula = story_views ~ story_readtime + story_length + pitch_views , data = log_crowd)
summary(model_story_views)##
## Call:
## lm(formula = story_views ~ story_readtime + story_length + pitch_views,
## data = log_crowd)
##
## Residuals:
## Min 1Q Median 3Q Max
## -2.24218 -0.51120 -0.07415 0.46572 2.78435
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -1.515819 0.202950 -7.469 1.24e-13 ***
## story_readtime 0.270253 0.005647 47.861 < 2e-16 ***
## story_length 0.131664 0.019723 6.676 3.25e-11 ***
## pitch_views 0.146182 0.016639 8.786 < 2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 0.7128 on 1844 degrees of freedom
## Multiple R-squared: 0.6163, Adjusted R-squared: 0.6157
## F-statistic: 987.2 on 3 and 1844 DF, p-value: < 2.2e-16null=lm(story_views~1,data=log_crowd)
full=lm(story_views~story_id+ abs_week+ rel_week+ story_readtime+ story_funding_duration+ story_length + focal_page+ pitch_contributors+ tags+ pitch_views + arindex+ pitch_budget+ video+ insights,data=log_crowd)
step(null, scope=list(lower=null,upper=full),direction='forward')## Start: AIC=517.04
## story_views ~ 1
##
## Df Sum of Sq RSS AIC
## + story_readtime 1 1443.09 998.89 -1132.92
## + rel_week 1 292.91 2149.06 282.91
## + pitch_views 1 265.51 2176.47 306.33
## + focal_page 1 217.32 2224.65 346.80
## + pitch_contributors 1 129.04 2312.93 418.71
## + story_length 1 84.65 2357.32 453.84
## + story_funding_duration 1 70.52 2371.45 464.89
## + abs_week 1 51.54 2390.43 479.62
## + pitch_budget 1 19.64 2422.33 504.12
## + story_id 1 13.15 2428.82 509.06
## + arindex 1 12.96 2429.01 509.21
## + insights 1 6.25 2435.72 514.30
## <none> 2441.97 517.04
## + tags 1 2.48 2439.50 517.17
## + video 1 0.00 2441.97 519.04
##
## Step: AIC=-1132.92
## story_views ~ story_readtime
##
## Df Sum of Sq RSS AIC
## + pitch_views 1 39.225 959.66 -1205.0
## + rel_week 1 22.689 976.20 -1173.4
## + story_length 1 22.649 976.24 -1173.3
## + pitch_contributors 1 11.742 987.15 -1152.8
## + story_funding_duration 1 11.381 987.51 -1152.1
## + focal_page 1 6.636 992.25 -1143.2
## + story_id 1 5.225 993.66 -1140.6
## + tags 1 4.483 994.40 -1139.2
## + video 1 1.188 997.70 -1133.1
## <none> 998.89 -1132.9
## + arindex 1 0.738 998.15 -1132.3
## + pitch_budget 1 0.618 998.27 -1132.1
## + insights 1 0.432 998.46 -1131.7
## + abs_week 1 0.029 998.86 -1131.0
##
## Step: AIC=-1204.95
## story_views ~ story_readtime + pitch_views
##
## Df Sum of Sq RSS AIC
## + story_length 1 22.6453 937.02 -1247.1
## + rel_week 1 19.7107 939.95 -1241.3
## + focal_page 1 9.3923 950.27 -1221.1
## + story_funding_duration 1 4.2496 955.41 -1211.2
## + abs_week 1 3.9089 955.75 -1210.5
## + pitch_budget 1 3.5357 956.13 -1209.8
## + tags 1 3.1817 956.48 -1209.1
## <none> 959.66 -1205.0
## + story_id 1 0.3136 959.35 -1203.6
## + arindex 1 0.2491 959.41 -1203.4
## + insights 1 0.0974 959.56 -1203.1
## + pitch_contributors 1 0.0614 959.60 -1203.1
## + video 1 0.0499 959.61 -1203.0
##
## Step: AIC=-1247.08
## story_views ~ story_readtime + pitch_views + story_length
##
## Df Sum of Sq RSS AIC
## + rel_week 1 19.0254 917.99 -1283.0
## + focal_page 1 9.7484 927.27 -1264.4
## + story_funding_duration 1 8.1825 928.83 -1261.3
## + abs_week 1 6.3885 930.63 -1257.7
## + tags 1 4.0498 932.97 -1253.1
## + pitch_contributors 1 2.0916 934.92 -1249.2
## + arindex 1 1.3625 935.65 -1247.8
## + video 1 1.1208 935.90 -1247.3
## <none> 937.02 -1247.1
## + pitch_budget 1 0.4636 936.55 -1246.0
## + story_id 1 0.1017 936.91 -1245.3
## + insights 1 0.0558 936.96 -1245.2
##
## Step: AIC=-1282.99
## story_views ~ story_readtime + pitch_views + story_length + rel_week
##
## Df Sum of Sq RSS AIC
## + story_funding_duration 1 7.2696 910.72 -1295.7
## + tags 1 3.3091 914.68 -1287.7
## + pitch_contributors 1 3.0316 914.96 -1287.1
## + arindex 1 2.7421 915.25 -1286.5
## + story_id 1 1.3780 916.61 -1283.8
## + video 1 1.2152 916.78 -1283.4
## <none> 917.99 -1283.0
## + abs_week 1 0.4423 917.55 -1281.9
## + pitch_budget 1 0.3454 917.65 -1281.7
## + focal_page 1 0.1732 917.82 -1281.3
## + insights 1 0.0107 917.98 -1281.0
##
## Step: AIC=-1295.69
## story_views ~ story_readtime + pitch_views + story_length + rel_week +
## story_funding_duration
##
## Df Sum of Sq RSS AIC
## + tags 1 3.3152 907.41 -1300.4
## + pitch_budget 1 2.7968 907.92 -1299.4
## + arindex 1 2.3790 908.34 -1298.5
## + video 1 1.5159 909.21 -1296.8
## + pitch_contributors 1 1.1029 909.62 -1295.9
## <none> 910.72 -1295.7
## + insights 1 0.1195 910.60 -1293.9
## + abs_week 1 0.0753 910.65 -1293.8
## + story_id 1 0.0297 910.69 -1293.8
## + focal_page 1 0.0144 910.71 -1293.7
##
## Step: AIC=-1300.42
## story_views ~ story_readtime + pitch_views + story_length + rel_week +
## story_funding_duration + tags
##
## Df Sum of Sq RSS AIC
## + pitch_budget 1 3.3027 904.10 -1305.2
## + arindex 1 3.2334 904.17 -1305.0
## + video 1 2.6908 904.72 -1303.9
## + pitch_contributors 1 1.4578 905.95 -1301.4
## <none> 907.41 -1300.4
## + insights 1 0.0467 907.36 -1298.5
## + abs_week 1 0.0144 907.39 -1298.5
## + focal_page 1 0.0029 907.40 -1298.4
## + story_id 1 0.0022 907.40 -1298.4
##
## Step: AIC=-1305.16
## story_views ~ story_readtime + pitch_views + story_length + rel_week +
## story_funding_duration + tags + pitch_budget
##
## Df Sum of Sq RSS AIC
## + pitch_contributors 1 6.6680 897.44 -1316.8
## + arindex 1 5.7593 898.34 -1315.0
## + video 1 3.9993 900.10 -1311.4
## <none> 904.10 -1305.2
## + insights 1 0.2952 903.81 -1303.8
## + story_id 1 0.1406 903.96 -1303.5
## + abs_week 1 0.0272 904.08 -1303.2
## + focal_page 1 0.0050 904.10 -1303.2
##
## Step: AIC=-1316.84
## story_views ~ story_readtime + pitch_views + story_length + rel_week +
## story_funding_duration + tags + pitch_budget + pitch_contributors
##
## Df Sum of Sq RSS AIC
## + video 1 4.5420 892.89 -1324.2
## + arindex 1 2.9071 894.53 -1320.8
## <none> 897.44 -1316.8
## + story_id 1 0.2248 897.21 -1315.3
## + abs_week 1 0.0346 897.40 -1314.9
## + insights 1 0.0229 897.41 -1314.9
## + focal_page 1 0.0001 897.44 -1314.8
##
## Step: AIC=-1324.22
## story_views ~ story_readtime + pitch_views + story_length + rel_week +
## story_funding_duration + tags + pitch_budget + pitch_contributors +
## video
##
## Df Sum of Sq RSS AIC
## + arindex 1 1.34263 891.55 -1325.0
## <none> 892.89 -1324.2
## + focal_page 1 0.02676 892.87 -1322.3
## + abs_week 1 0.00636 892.89 -1322.2
## + story_id 1 0.00558 892.89 -1322.2
## + insights 1 0.00082 892.89 -1322.2
##
## Step: AIC=-1325
## story_views ~ story_readtime + pitch_views + story_length + rel_week +
## story_funding_duration + tags + pitch_budget + pitch_contributors +
## video + arindex
##
## Df Sum of Sq RSS AIC
## <none> 891.55 -1325.0
## + story_id 1 0.079948 891.47 -1323.2
## + abs_week 1 0.031668 891.52 -1323.1
## + focal_page 1 0.007846 891.54 -1323.0
## + insights 1 0.001343 891.55 -1323.0##
## Call:
## lm(formula = story_views ~ story_readtime + pitch_views + story_length +
## rel_week + story_funding_duration + tags + pitch_budget +
## pitch_contributors + video + arindex, data = log_crowd)
##
## Coefficients:
## (Intercept) story_readtime pitch_views
## -0.78044 0.25286 0.12746
## story_length rel_week story_funding_duration
## 0.15670 -0.11607 0.07567
## tags pitch_budget pitch_contributors
## 0.16683 -0.12816 0.07582
## video arindex
## -0.29460 0.12373step(lm(story_views~story_id+ abs_week+ rel_week+ story_readtime+ story_funding_duration+ story_length + focal_page+ pitch_contributors+ tags+ pitch_views + arindex+ pitch_budget+ video+ insights,data=log_crowd),direction = "backward")## Start: AIC=-1317.23
## story_views ~ story_id + abs_week + rel_week + story_readtime +
## story_funding_duration + story_length + focal_page + pitch_contributors +
## tags + pitch_views + arindex + pitch_budget + video + insights
##
## Df Sum of Sq RSS AIC
## - abs_week 1 0.00 891.44 -1319.23
## - insights 1 0.00 891.44 -1319.23
## - focal_page 1 0.03 891.47 -1319.17
## - story_id 1 0.06 891.50 -1319.11
## <none> 891.44 -1317.23
## - arindex 1 1.39 892.83 -1316.36
## - video 1 2.61 894.05 -1313.83
## - rel_week 1 3.30 894.74 -1312.41
## - pitch_contributors 1 4.58 896.02 -1309.76
## - story_funding_duration 1 6.72 898.16 -1305.35
## - tags 1 7.59 899.03 -1303.57
## - pitch_budget 1 10.67 902.11 -1297.25
## - pitch_views 1 13.20 904.64 -1292.06
## - story_length 1 26.35 917.79 -1265.40
## - story_readtime 1 866.83 1758.27 -63.98
##
## Step: AIC=-1319.23
## story_views ~ story_id + rel_week + story_readtime + story_funding_duration +
## story_length + focal_page + pitch_contributors + tags + pitch_views +
## arindex + pitch_budget + video + insights
##
## Df Sum of Sq RSS AIC
## - insights 1 0.00 891.44 -1321.23
## - focal_page 1 0.03 891.47 -1321.17
## - story_id 1 0.10 891.54 -1321.02
## <none> 891.44 -1319.23
## - arindex 1 1.41 892.85 -1318.31
## - video 1 2.62 894.05 -1315.82
## - pitch_contributors 1 4.66 896.10 -1311.59
## - rel_week 1 5.48 896.92 -1309.91
## - tags 1 7.61 899.05 -1305.52
## - story_funding_duration 1 8.87 900.31 -1302.93
## - pitch_budget 1 10.70 902.14 -1299.18
## - pitch_views 1 13.25 904.69 -1293.96
## - story_length 1 27.04 918.48 -1266.01
## - story_readtime 1 867.14 1758.58 -65.65
##
## Step: AIC=-1321.23
## story_views ~ story_id + rel_week + story_readtime + story_funding_duration +
## story_length + focal_page + pitch_contributors + tags + pitch_views +
## arindex + pitch_budget + video
##
## Df Sum of Sq RSS AIC
## - focal_page 1 0.03 891.47 -1323.17
## - story_id 1 0.10 891.54 -1323.02
## <none> 891.44 -1321.23
## - arindex 1 1.41 892.85 -1320.31
## - video 1 2.62 894.06 -1317.80
## - pitch_contributors 1 4.73 896.17 -1313.44
## - rel_week 1 5.53 896.98 -1311.79
## - tags 1 7.67 899.11 -1307.40
## - story_funding_duration 1 9.05 900.49 -1304.57
## - pitch_budget 1 10.75 902.19 -1301.09
## - pitch_views 1 13.27 904.71 -1295.93
## - story_length 1 27.09 918.53 -1267.90
## - story_readtime 1 867.15 1758.59 -67.65
##
## Step: AIC=-1323.17
## story_views ~ story_id + rel_week + story_readtime + story_funding_duration +
## story_length + pitch_contributors + tags + pitch_views +
## arindex + pitch_budget + video
##
## Df Sum of Sq RSS AIC
## - story_id 1 0.08 891.55 -1325.00
## <none> 891.47 -1323.17
## - arindex 1 1.42 892.89 -1322.23
## - video 1 2.61 894.08 -1319.77
## - pitch_contributors 1 4.70 896.18 -1315.44
## - tags 1 7.65 899.12 -1309.39
## - story_funding_duration 1 9.33 900.81 -1305.92
## - pitch_budget 1 10.72 902.19 -1303.08
## - pitch_views 1 13.27 904.74 -1297.86
## - rel_week 1 17.33 908.80 -1289.59
## - story_length 1 27.06 918.53 -1269.90
## - story_readtime 1 887.08 1778.55 -48.79
##
## Step: AIC=-1325
## story_views ~ rel_week + story_readtime + story_funding_duration +
## story_length + pitch_contributors + tags + pitch_views +
## arindex + pitch_budget + video
##
## Df Sum of Sq RSS AIC
## <none> 891.55 -1325.00
## - arindex 1 1.34 892.89 -1324.22
## - video 1 2.98 894.53 -1320.84
## - pitch_contributors 1 4.70 896.25 -1317.28
## - tags 1 7.81 899.36 -1310.88
## - story_funding_duration 1 10.42 901.97 -1305.53
## - pitch_budget 1 10.85 902.40 -1304.64
## - rel_week 1 18.70 910.25 -1288.65
## - pitch_views 1 20.34 911.90 -1285.30
## - story_length 1 27.58 919.13 -1270.70
## - story_readtime 1 890.96 1782.51 -46.67##
## Call:
## lm(formula = story_views ~ rel_week + story_readtime + story_funding_duration +
## story_length + pitch_contributors + tags + pitch_views +
## arindex + pitch_budget + video, data = log_crowd)
##
## Coefficients:
## (Intercept) rel_week story_readtime
## -0.78044 -0.11607 0.25286
## story_funding_duration story_length pitch_contributors
## 0.07567 0.15670 0.07582
## tags pitch_views arindex
## 0.16683 0.12746 0.12373
## pitch_budget video
## -0.12816 -0.29460attach(crowdfunding)## The following object is masked from log_story (pos = 3):
##
## story_id## The following object is masked from log_story (pos = 4):
##
## story_idmodel_readtime=lm(story_readtime ~ rel_week
+ story_views
+ focal_page
+ pitch_contributors
+ arindex
+ pitch_budget)
summary(model_readtime)##
## Call:
## lm(formula = story_readtime ~ rel_week + story_views + focal_page +
## pitch_contributors + arindex + pitch_budget)
##
## Residuals:
## Min 1Q Median 3Q Max
## -15469.4 -228.2 39.1 240.9 31401.2
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) -3.840e+02 1.606e+02 -2.392 0.016861 *
## rel_week 9.725e+00 2.585e+00 3.762 0.000174 ***
## story_views 9.929e+01 8.651e-01 114.780 < 2e-16 ***
## focal_page 3.013e+02 1.047e+02 2.878 0.004051 **
## pitch_contributors -8.911e+00 2.234e+00 -3.989 6.89e-05 ***
## arindex -1.964e+01 1.252e+01 -1.568 0.116947
## pitch_budget 1.995e-03 3.702e-04 5.387 8.07e-08 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 1434 on 1841 degrees of freedom
## Multiple R-squared: 0.8882, Adjusted R-squared: 0.8879
## F-statistic: 2438 on 6 and 1841 DF, p-value: < 2.2e-16leaps_log=regsubsets(story_readtime ~ rel_week
+ story_views
+ focal_page
+ pitch_contributors
+ arindex
+ pitch_budget,
data =crowdfunding,nbest = 2)
plot(leaps_log,scale = 'r2')
leaps_log## Subset selection object
## Call: regsubsets.formula(story_readtime ~ rel_week + story_views +
## focal_page + pitch_contributors + arindex + pitch_budget,
## data = crowdfunding, nbest = 2)
## 6 Variables (and intercept)
## Forced in Forced out
## rel_week FALSE FALSE
## story_views FALSE FALSE
## focal_page FALSE FALSE
## pitch_contributors FALSE FALSE
## arindex FALSE FALSE
## pitch_budget FALSE FALSE
## 2 subsets of each size up to 6
## Selection Algorithm: exhaustivehist(crowdfunding$story_views)
hist(crowdfunding$story_views,breaks = "Sturges",xlab='story_views',main='frequency by story_views')
leaps_log=regsubsets(story_readtime ~ abs_week
+ rel_week
+ story_funding_duration
+ story_length
+ focal_page
+ pitch_contributors
+ tags
+ pitch_views
+ arindex
+ pitch_budget
+ video
+ insights,
data =crowdfunding,nbest = 2)
plot(leaps_log,scale = 'r2')
leaps_log## Subset selection object
## Call: regsubsets.formula(story_readtime ~ abs_week + rel_week + story_funding_duration +
## story_length + focal_page + pitch_contributors + tags + pitch_views +
## arindex + pitch_budget + video + insights, data = crowdfunding,
## nbest = 2)
## 12 Variables (and intercept)
## Forced in Forced out
## abs_week FALSE FALSE
## rel_week FALSE FALSE
## story_funding_duration FALSE FALSE
## story_length FALSE FALSE
## focal_page FALSE FALSE
## pitch_contributors FALSE FALSE
## tags FALSE FALSE
## pitch_views FALSE FALSE
## arindex FALSE FALSE
## pitch_budget FALSE FALSE
## video FALSE FALSE
## insights FALSE FALSE
## 2 subsets of each size up to 8
## Selection Algorithm: exhaustivenames(log_story)## [1] "story_id" "abs_week"
## [3] "rel_week" "story_readtime"
## [5] "story_views" "story_funding_duration"
## [7] "story_length" "focal_page"
## [9] "pitch_contributors" "tags"
## [11] "pitch_views" "arindex"
## [13] "pitch_budget" "video"
## [15] "insights" "pitch_conversion"
## [17] "amount_per_contributor"leaps_log=regsubsets(log_story_readtime ~ log_rel_week
+ log_story_funding_duration
+ log_story_views_mean
+ log_story_length
+ log_focal_page
+ log_pitch_contributors
+ log_tags
+ log_pitch_views
+ log_arindex
+ log_pitch_budget
+ log_video_mean
+ log_insights,
data =crowdfunding,nbest = 2)
plot(leaps_log,scale = 'r2')
leaps_log## Subset selection object
## Call: regsubsets.formula(log_story_readtime ~ log_rel_week + log_story_funding_duration +
## log_story_views_mean + log_story_length + log_focal_page +
## log_pitch_contributors + log_tags + log_pitch_views + log_arindex +
## log_pitch_budget + log_video_mean + log_insights, data = crowdfunding,
## nbest = 2)
## 12 Variables (and intercept)
## Forced in Forced out
## log_rel_week FALSE FALSE
## log_story_funding_duration FALSE FALSE
## log_story_views_mean FALSE FALSE
## log_story_length FALSE FALSE
## log_focal_page FALSE FALSE
## log_pitch_contributors FALSE FALSE
## log_tags FALSE FALSE
## log_pitch_views FALSE FALSE
## log_arindex FALSE FALSE
## log_pitch_budget FALSE FALSE
## log_video_mean FALSE FALSE
## log_insights FALSE FALSE
## 2 subsets of each size up to 8
## Selection Algorithm: exhaustivenull=lm(story_readtime~1,data=log_story)
full=lm(story_readtime~.,data=log_story)
step(null,scope=list(lower=null,upper=full),direction="forward")## Start: AIC=4147.66
## story_readtime ~ 1
##
## Df Sum of Sq RSS AIC
## + story_views 1 10292.4 7124.3 2497.7
## + rel_week 1 1922.8 15493.9 3933.5
## + focal_page 1 1827.4 15589.3 3944.8
## + pitch_views 1 1271.5 16145.1 4009.6
## + pitch_contributors 1 774.4 16642.3 4065.6
## + abs_week 1 593.5 16823.1 4085.6
## + amount_per_contributor 1 538.5 16878.2 4091.6
## + story_funding_duration 1 308.3 17108.4 4116.7
## + story_length 1 241.7 17175.0 4123.8
## + pitch_budget 1 160.7 17256.0 4132.5
## + arindex 1 90.8 17325.9 4140.0
## + pitch_conversion 1 50.0 17366.6 4144.3
## + insights 1 41.0 17375.6 4145.3
## + story_id 1 21.7 17394.9 4147.4
## <none> 17416.7 4147.7
## + video 1 16.1 17400.6 4148.0
## + tags 1 3.6 17413.1 4149.3
##
## Step: AIC=2497.7
## story_readtime ~ story_views
##
## Df Sum of Sq RSS AIC
## + focal_page 1 171.034 6953.2 2454.8
## + abs_week 1 94.609 7029.7 2475.0
## + rel_week 1 86.269 7038.0 2477.2
## + tags 1 26.217 7098.1 2492.9
## + pitch_contributors 1 21.438 7102.8 2494.1
## + video 1 15.025 7109.3 2495.8
## + pitch_budget 1 12.906 7111.4 2496.3
## + story_length 1 11.581 7112.7 2496.7
## + story_id 1 7.787 7116.5 2497.7
## <none> 7124.3 2497.7
## + pitch_conversion 1 6.363 7117.9 2498.1
## + pitch_views 1 5.463 7118.8 2498.3
## + arindex 1 4.600 7119.7 2498.5
## + amount_per_contributor 1 4.557 7119.7 2498.5
## + insights 1 1.623 7122.7 2499.3
## + story_funding_duration 1 0.104 7124.2 2499.7
##
## Step: AIC=2454.79
## story_readtime ~ story_views + focal_page
##
## Df Sum of Sq RSS AIC
## + pitch_contributors 1 29.7856 6923.5 2448.9
## + tags 1 25.3760 6927.9 2450.0
## + video 1 16.6857 6936.6 2452.3
## + pitch_budget 1 15.4535 6937.8 2452.7
## + pitch_views 1 12.3997 6940.8 2453.5
## + story_length 1 9.0272 6944.2 2454.4
## + amount_per_contributor 1 8.0996 6945.1 2454.6
## <none> 6953.2 2454.8
## + arindex 1 7.5153 6945.7 2454.8
## + story_id 1 6.8510 6946.4 2455.0
## + pitch_conversion 1 4.9801 6948.3 2455.5
## + insights 1 2.5903 6950.7 2456.1
## + abs_week 1 1.8579 6951.4 2456.3
## + rel_week 1 1.5263 6951.7 2456.4
## + story_funding_duration 1 1.2593 6952.0 2456.5
##
## Step: AIC=2448.86
## story_readtime ~ story_views + focal_page + pitch_contributors
##
## Df Sum of Sq RSS AIC
## + tags 1 23.0897 6900.4 2444.7
## + video 1 15.2752 6908.2 2446.8
## <none> 6923.5 2448.9
## + story_length 1 3.1803 6920.3 2450.0
## + abs_week 1 2.2953 6921.2 2450.2
## + rel_week 1 1.6443 6921.8 2450.4
## + story_id 1 1.4273 6922.0 2450.5
## + pitch_views 1 0.8110 6922.6 2450.6
## + pitch_conversion 1 0.8110 6922.6 2450.6
## + story_funding_duration 1 0.6911 6922.8 2450.7
## + arindex 1 0.4811 6923.0 2450.7
## + insights 1 0.1212 6923.3 2450.8
## + pitch_budget 1 0.1042 6923.4 2450.8
## + amount_per_contributor 1 0.1042 6923.4 2450.8
##
## Step: AIC=2444.69
## story_readtime ~ story_views + focal_page + pitch_contributors +
## tags
##
## Df Sum of Sq RSS AIC
## + video 1 9.2964 6891.1 2444.2
## <none> 6900.4 2444.7
## + story_length 1 4.4740 6895.9 2445.5
## + abs_week 1 1.5538 6898.8 2446.3
## + pitch_views 1 1.5439 6898.8 2446.3
## + pitch_conversion 1 1.5439 6898.8 2446.3
## + pitch_budget 1 1.2535 6899.1 2446.3
## + amount_per_contributor 1 1.2535 6899.1 2446.3
## + rel_week 1 1.0376 6899.3 2446.4
## + story_id 1 0.8408 6899.5 2446.5
## + insights 1 0.5817 6899.8 2446.5
## + story_funding_duration 1 0.4762 6899.9 2446.6
## + arindex 1 0.0130 6900.4 2446.7
##
## Step: AIC=2444.19
## story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video
##
## Df Sum of Sq RSS AIC
## <none> 6891.1 2444.2
## + pitch_views 1 3.13704 6887.9 2445.3
## + pitch_conversion 1 3.13704 6887.9 2445.3
## + story_length 1 1.74602 6889.3 2445.7
## + abs_week 1 1.33320 6889.7 2445.8
## + story_id 1 1.18721 6889.9 2445.9
## + rel_week 1 1.11720 6890.0 2445.9
## + arindex 1 0.77485 6890.3 2446.0
## + pitch_budget 1 0.37768 6890.7 2446.1
## + amount_per_contributor 1 0.37768 6890.7 2446.1
## + story_funding_duration 1 0.32249 6890.7 2446.1
## + insights 1 0.26195 6890.8 2446.1##
## Call:
## lm(formula = story_readtime ~ story_views + focal_page + pitch_contributors +
## tags + video, data = log_story)
##
## Coefficients:
## (Intercept) story_views focal_page
## 0.3757 1.9460 1.0885
## pitch_contributors tags video
## 0.1158 -0.2407 -0.4677####p19 reference
corrplot(cor(crowdfunding))
Q3
Note that the dependent variable above is a count of number of seconds people took to read a story or a count of number of views for a given story. Would estimating an OLS regression, even with panel data models, give you precise estimates? If not, what kind of model would you want to run to get estimates that are more precise and less biased? Show the output of the final model in STATA or R. Provide in a few sentences on your main takeaways from theanalyses.
model_story_views=glm(formula = story_views ~ story_readtime + story_length + pitch_views , data = log_crowd)psych::describe(log_crowd)## vars n mean sd median trimmed mad
## story_id 1 1848 1003.88 61.54 1007.00 1007.74 57.82
## abs_week 2 1848 3.74 0.52 3.89 3.83 0.42
## rel_week 3 1848 3.02 0.93 3.26 3.15 0.78
## story_readtime 4 1848 3.34 3.07 3.56 3.14 5.27
## story_views 5 1848 1.45 1.15 1.39 1.34 1.03
## story_funding_duration 6 1848 3.98 1.13 4.22 4.06 1.02
## story_length 7 1848 9.19 0.85 9.39 9.23 0.79
## focal_page 8 1848 0.17 0.30 0.00 0.13 0.00
## pitch_contributors 9 1848 2.61 1.07 2.40 2.58 0.90
## tags 10 1848 1.40 0.41 1.39 1.40 0.43
## pitch_views 11 1848 5.85 1.04 5.90 5.85 1.06
## arindex 12 1848 2.47 0.25 2.47 2.47 0.17
## pitch_budget 13 1848 11.51 0.88 11.29 11.43 0.85
## video 14 1848 0.04 0.15 0.00 0.00 0.00
## insights 15 1848 3.63 1.14 4.04 3.89 0.47
## min max range skew kurtosis se
## story_id 860.00 1110.00 250.00 -0.49 -0.25 1.43
## abs_week 0.69 4.30 3.61 -1.73 3.86 0.01
## rel_week 0.00 4.29 4.29 -1.20 1.18 0.02
## story_readtime 0.00 11.76 11.76 0.20 -1.40 0.07
## story_views 0.00 6.87 6.87 0.81 0.82 0.03
## story_funding_duration 1.39 5.70 4.32 -0.65 -0.36 0.03
## story_length 7.52 11.18 3.66 -0.40 -0.57 0.02
## focal_page 0.00 0.69 0.69 1.15 -0.68 0.01
## pitch_contributors 0.00 4.97 4.97 0.22 -0.05 0.02
## tags 0.69 2.56 1.87 0.08 -0.20 0.01
## pitch_views 3.50 8.61 5.11 0.12 0.42 0.02
## arindex 1.76 2.98 1.22 -0.24 0.53 0.01
## pitch_budget 10.13 13.82 3.69 0.72 -0.14 0.02
## video 0.00 0.69 0.69 4.01 14.09 0.00
## insights 0.00 4.62 4.62 -2.13 3.78 0.03model_glm=glm(story_readtime ~ story_views +
pitch_contributors + pitch_budget,data=log_crowd,family = poisson)## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.445418## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.683404## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.383368## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.788212## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.375278## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.065613## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.043425## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.011214## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.666957## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.289716## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.808142## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.566672## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.438079## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.042633## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.883322## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.379897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.634790## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.655992## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.228511## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.945051## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.779123## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.945421## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.660585## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.035481## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.899731## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.886833## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.942157## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.021256## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.467942## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.883322## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.027315## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.568078## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.847372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.564238## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.787492## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.669881## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.560080## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.241747## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.631212## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.715383## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.248118## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.920810## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.786897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.549076## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.120444## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.218177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.533389## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.837333## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.267201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.424950## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.492240## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.749393## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.360740## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.273000## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.976734## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.695758## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.283204## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.700480## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.259116## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.541030## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.723719## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.999002## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.134174## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.561122## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.367300## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.751045## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.473069## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.537430## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.166266## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.908083## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.528869## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.666957## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.028201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.648974## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.605802## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.107023## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.251904## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.599870## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.099866## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.338594## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.753590## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.648974## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.082219## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.008813## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.566672## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.099866## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.488636## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.262690## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.062595## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438
## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.367077## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.948760## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.812184## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.962845## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.049733## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.924256## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.094235## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.289611## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.676754## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.954021## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.545918## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.214936## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.040255## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.465908## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.174387## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.845880## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.869019## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.735780## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.084499## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.820282## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.765191## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.117994## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.229114## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.634729## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.954021## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.511745## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.810142## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.303305## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.922644## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.613325## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.690359## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.455321## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.406719## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.332719## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.665684## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.411646## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.347944## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.839476## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.546785## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.180070## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.629004## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.673223## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.135565## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.100319## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.308268## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.419995## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.315358## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.931826## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.546785## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.225747## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.366470## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.770685## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.723585## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.125109## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.070503## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.318498## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.304742## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.085064## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.223359## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.314553## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.210124## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.388561## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.053887## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.426549## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.505492## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.377759## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.730100## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.624973## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.102559## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.754604## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.158883## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.797291## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.384610## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.369901## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.477337## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.432940## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.694562## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.376727## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.234107## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.525453## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.452049## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.942799## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.857933## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.817831## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.356108## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.127694## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.127134## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.812184## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.212606## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.970292## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.028279## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.276643## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.146329## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.211557## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.466145## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.317165## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.732211## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.204558## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.347108## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.363028## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.996452## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.257495## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.028279## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.802118## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.579168## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.545177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.348710## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.452982## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.484797## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.575949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.354362## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.787492## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.408529## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.962845## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.419381## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.356790## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.309918## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.142037## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.765191## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.218177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.849325## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.565265## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.049856## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.635947## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.499810## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.126087## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.886081## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.054439## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.367709## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.234107## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.950643## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.156979## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.159055## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.553287## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.988961## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.513429## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.170888## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.371489## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.386471## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.104793## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.222576## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.400010## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.442418## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.446737## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.925595## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.242223## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.858565## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.111988## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.475339## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.732211## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.666427## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.129050## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.880048## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.056246## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.020191## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.521461## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.308268## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.502489## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.124020## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.698347## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.190676## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.015658## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.486734## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.364508## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.331715## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.723562## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.302496## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.396606## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.997596## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.432484## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.147494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.407172## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.802118## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.663439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.744932## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.213768## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.033086## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.082219## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.933423## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.381502## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.811141## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.753590## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.183112## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.339538## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.154858## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.843750## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.741701## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.834109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.360740## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.793014## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.086775## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.997212## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.818924## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.491645## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.236370## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.874931## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.565793## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.093750## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.420579## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.186069## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.171034## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.982075## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.883086## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.683404## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.580639## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.095825## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.748460## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.179308## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.167516## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.298949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.301148## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.420535## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.834811## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.556828## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.322565## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.882802## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.278115## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.293305## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.535241## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.980076## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.082549## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.124478## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.979039## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.793587## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.917706## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.652546## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.550135## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.207119## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.768321## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.733684## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.420535## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.383507## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.033506## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.444131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.126869## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.411556## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.680855## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.905362## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.385194## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.743003## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.302619## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.713572## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.618739## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.905275## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.340359## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.439350## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.370231## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.458763## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.852202## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.893199## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.615121## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.293419## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.663562## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.369479## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.089243## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.662468## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.265301## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.003946## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.444833## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.398786## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.937536## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.573017## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.407924## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.439350## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.060443## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.516193## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.680173## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.105945## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.321189## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.238065## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.680173## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.465736## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.147578## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.552237## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.332789## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.967909## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.432484## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.198497## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.465908## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.530878## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.943122## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.264030## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.774552## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.590987## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.398163## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.426488## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.498282## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.167516## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.737670## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.158514## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.045005## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.713572## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.293305## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.356918## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.457609## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.970292## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.496775## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.519147## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.464588## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.429454## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.678326## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.774856## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.323010## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.859812## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.831882## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.945910## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.320205## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.749931## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.683361## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.295056## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.703008## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.953243## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.110696## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.594413## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.231109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.416980## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.497168## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.310169## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.963190## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.790696## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.497168## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.478510## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.875197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.386401## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.369448## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.412764## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.897872## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.061457## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.909753## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.641564## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.257668## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.250636## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.605298## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.944087## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.919684## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.899897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.929589## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.247081## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.389072## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.031741## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.505784## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.530878## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.074117## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.357842## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.361475## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.458763## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.134891## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.991931## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.720905## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.937536## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.989221## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.762174## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.992096## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.886104## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.480639## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.079933## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.686975## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.828641## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.228511## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.520776## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.081404## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.059618## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.356709## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.035481## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.308555## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.699389## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.321422## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.141190## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.833032## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.454347## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.733341## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.035269## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.428105## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.004032## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.526495## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.257495## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.752270## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.365976## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.926926## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.002156## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.541152## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.230481## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.849066## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.127134## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.131699## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.798187## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.403519## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.661056## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.488853## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.329750## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.188413## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.037871## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.620073## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.082402## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.152774## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.504392## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.734121## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.064007## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.226841## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.409742## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.587249## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.869297## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.981050## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.317278## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.700748## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.061457## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.773174## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.529429## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.568345## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.287561## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.378426## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.135687## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.754604## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.628518## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.104144## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.225747## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.680855## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.297109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.003974## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.996452## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.049350## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.376727## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.723120## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.083388## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.432942## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.254269## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.181720## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.144969## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.597146## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.042633## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.831882## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.445720## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.186209## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.337538## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.049733## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.762174## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.473891## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.859812## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.541264## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.905275## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.718499## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.379897## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.003065## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.129050## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.323010## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.910797## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.945421## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.401917## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.003946## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.322565## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.263398## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.501258## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.318968## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.175867## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.809116## Warning in dpois(y, mu, log = TRUE): non-integer x = 11.755526## Warning in dpois(y, mu, log = TRUE): non-integer x = 11.255604## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.489384## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.379691## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.456263## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.630879## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.376781## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.541441## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.335827## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.017847## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.012011## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.126518## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.858226## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.933080## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.442685## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.157944## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.030855## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.458292## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.593045## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.122492## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.414274## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.568078## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.965080## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.069023## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.240276## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.407172## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.060443## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.227662## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.059123## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.007601## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.998937## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.537334## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.065613## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.135054## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.412383## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.621195## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.934719## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.777652## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.351847## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.665285## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.755339## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.897705## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.837333## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.062595## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.850126## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.147494## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.009409## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.356586## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.465736## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.158883## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.411646## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.799360## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.837826## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.296413## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.700748## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.075894## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.813445## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.125283## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.081404## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.841615## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.818924## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.610918## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.021023## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.295735## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.469084## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.347108## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.616771## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.706862## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.700480## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.784457## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.324359## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.373320## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.318540## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.882802## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.075174## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.559559## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.713733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.733402## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.268988## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.093750## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.457032## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.516193## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.332205## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.780744## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.225481## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.676754## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.971669## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.262690## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.945910## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.327937## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.790097## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.001415## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.663439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.983936## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.267858## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.508239## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.777374## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.774552## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.934894## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.366404## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.725771## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.269096## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.434547## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.718499## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.510860## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.626718## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.049856## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.788972## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.661527## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.488636## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.823648## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.295049## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.300786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.163315## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.393628## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.659482## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.797702## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.756932## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.510860## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.875197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.332205## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.141664## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.103608## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.304468## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.319474## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.970686## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.564268## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.002156## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.679599## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.493317## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.461066## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.221836## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.472346## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.502790## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.355002## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.571474## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.584791## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.610918## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.126891## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.532334## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.268223## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.226537## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.442418## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.463029## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.628041## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.453625## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.144186## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.682109## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.618742## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.961370## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.967280## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.240650## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.152269## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.752573## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.584967## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.084254## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.406932## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.676474## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.375278## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.908755## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.363028## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.013715## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.897705## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841summary(model_glm)##
## Call:
## glm(formula = story_readtime ~ story_views + pitch_contributors +
## pitch_budget, family = poisson, data = log_crowd)
##
## Deviance Residuals:
## Min 1Q Median 3Q Max
## -4.8090 -1.6804 -0.0447 0.9184 3.3820
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) 0.800109 0.193079 4.144 3.41e-05 ***
## story_views 0.476792 0.009213 51.750 < 2e-16 ***
## pitch_contributors 0.057798 0.017233 3.354 0.000797 ***
## pitch_budget -0.053968 0.019281 -2.799 0.005125 **
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for poisson family taken to be 1)
##
## Null deviance: 6950.4 on 1847 degrees of freedom
## Residual deviance: 4327.7 on 1844 degrees of freedom
## AIC: Inf
##
## Number of Fisher Scoring iterations: 5library(MASS)##
## Attaching package: 'MASS'## The following object is masked from 'package:dplyr':
##
## selectreadtime_glm_poisson=glm(story_readtime ~ story_views +
pitch_contributors + pitch_budget,data=crowdfunding,family = poisson)
readtime_glm_nb=glm.nb(story_readtime ~ story_views +
pitch_contributors + pitch_budget,data=crowdfunding)## Warning: glm.fit: algorithm did not converge## Warning: glm.fit: algorithm did not converge
## Warning: glm.fit: algorithm did not converge
## Warning: glm.fit: algorithm did not converge## Warning in glm.nb(story_readtime ~ story_views + pitch_contributors +
## pitch_budget, : alternation limit reachedsummary(readtime_glm_nb)##
## Call:
## glm.nb(formula = story_readtime ~ story_views + pitch_contributors +
## pitch_budget, data = crowdfunding, init.theta = 0.1472556191,
## link = log)
##
## Deviance Residuals:
## Min 1Q Median 3Q Max
## -4.2526 -1.4276 -0.5937 0.0433 2.4447
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) 4.925e+00 7.935e-02 62.072 <2e-16 ***
## story_views 7.162e-02 1.534e-03 46.675 <2e-16 ***
## pitch_contributors 5.738e-03 3.949e-03 1.453 0.146
## pitch_budget -1.690e-07 6.706e-07 -0.252 0.801
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for Negative Binomial(0.1473) family taken to be 1)
##
## Null deviance: 2451.4 on 1847 degrees of freedom
## Residual deviance: 1943.2 on 1844 degrees of freedom
## AIC: 19349
##
## Number of Fisher Scoring iterations: 1
##
##
## Theta: 0.14726
## Std. Err.: 0.00495
## Warning while fitting theta: alternation limit reached
##
## 2 x log-likelihood: -19339.14300model_glm_nb=glm.nb(story_readtime ~ story_views +
pitch_contributors + pitch_budget,data=log_crowd)## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.445418## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.683404## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.383368## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.788212## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.375278## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.065613## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.043425## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.011214## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.666957## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.289716## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.808142## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.566672## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.438079## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.042633## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.883322## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.379897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.634790## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.655992## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.228511## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.945051## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.779123## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.945421## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.660585## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.035481## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.899731## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.886833## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.942157## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.021256## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.467942## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.883322## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.027315## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.568078## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.847372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.564238## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.787492## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.669881## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.560080## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.241747## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.631212## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.715383## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.248118## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.920810## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.786897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.549076## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.120444## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.218177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.533389## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.837333## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.267201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.424950## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.492240## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.749393## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.360740## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.273000## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.976734## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.695758## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.283204## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.700480## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.259116## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.541030## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.723719## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.999002## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.134174## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.561122## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.367300## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.751045## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.473069## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.537430## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.166266## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.908083## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.528869## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.666957## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.028201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.648974## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.605802## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.107023## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.251904## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.599870## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.099866## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.338594## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.753590## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.648974## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.082219## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.008813## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.566672## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.099866## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.488636## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.262690## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.062595## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438
## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.367077## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.948760## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.812184## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.962845## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.049733## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.924256## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.094235## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.289611## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.676754## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.954021## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.545918## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.214936## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.040255## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.465908## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.174387## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.845880## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.869019## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.735780## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.084499## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.820282## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.765191## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.117994## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.229114## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.634729## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.954021## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.511745## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.810142## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.303305## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.922644## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.613325## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.690359## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.455321## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.406719## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.332719## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.665684## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.411646## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.347944## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.839476## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.546785## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.180070## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.629004## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.673223## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.135565## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.100319## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.308268## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.419995## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.315358## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.931826## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.546785## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.225747## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.366470## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.770685## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.723585## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.125109## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.070503## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.318498## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.304742## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.085064## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.223359## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.314553## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.210124## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.388561## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.053887## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.426549## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.505492## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.377759## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.730100## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.624973## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.102559## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.754604## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.158883## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.797291## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.384610## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.369901## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.477337## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.432940## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.694562## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.376727## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.234107## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.525453## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.452049## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.942799## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.857933## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.817831## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.356108## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.127694## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.127134## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.812184## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.212606## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.970292## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.028279## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.276643## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.146329## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.211557## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.466145## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.317165## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.732211## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.204558## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.347108## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.363028## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.996452## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.257495## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.028279## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.802118## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.579168## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.545177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.348710## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.452982## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.484797## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.575949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.354362## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.787492## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.408529## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.962845## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.419381## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.356790## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.309918## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.142037## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.765191## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.218177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.849325## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.565265## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.049856## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.635947## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.499810## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.126087## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.886081## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.054439## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.367709## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.234107## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.950643## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.156979## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.159055## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.553287## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.988961## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.513429## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.170888## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.371489## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.386471## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.104793## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.222576## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.400010## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.442418## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.446737## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.925595## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.242223## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.858565## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.111988## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.475339## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.732211## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.666427## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.129050## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.880048## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.056246## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.020191## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.521461## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.308268## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.502489## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.124020## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.698347## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.190676## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.015658## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.486734## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.364508## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.331715## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.723562## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.302496## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.396606## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.997596## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.432484## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.147494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.407172## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.802118## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.663439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.744932## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.213768## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.033086## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.082219## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.933423## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.381502## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.811141## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.753590## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.183112## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.339538## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.154858## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.843750## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.741701## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.834109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.360740## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.793014## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.086775## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.997212## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.818924## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.491645## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.236370## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.874931## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.565793## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.093750## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.420579## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.186069## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.171034## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.982075## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.883086## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.683404## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.580639## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.095825## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.748460## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.179308## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.167516## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.298949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.301148## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.420535## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.834811## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.556828## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.322565## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.882802## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.278115## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.293305## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.535241## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.980076## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.082549## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.124478## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.979039## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.793587## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.917706## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.652546## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.550135## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.207119## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.768321## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.733684## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.420535## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.383507## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.033506## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.444131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.126869## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.411556## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.680855## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.905362## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.385194## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.743003## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.302619## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.713572## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.618739## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.905275## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.340359## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.439350## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.370231## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.458763## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.852202## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.893199## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.615121## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.293419## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.663562## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.369479## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.089243## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.662468## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.265301## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.003946## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.444833## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.398786## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.937536## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.573017## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.407924## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.439350## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.060443## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.516193## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.680173## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.105945## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.321189## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.238065## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.680173## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.465736## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.147578## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.552237## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.332789## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.967909## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.432484## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.198497## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.465908## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.530878## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.943122## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.264030## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.774552## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.590987## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.398163## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.426488## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.498282## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.167516## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.737670## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.158514## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.045005## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.713572## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.293305## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.356918## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.457609## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.970292## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.496775## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.519147## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.464588## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.429454## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.678326## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.774856## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.323010## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.859812## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.831882## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.945910## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.320205## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.749931## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.683361## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.295056## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.703008## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.953243## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.110696## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.594413## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.231109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.416980## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.497168## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.310169## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.963190## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.790696## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.497168## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.478510## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.875197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.386401## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.369448## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.412764## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.897872## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.061457## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.909753## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.641564## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.257668## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.250636## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.605298## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.944087## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.919684## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.899897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.929589## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.247081## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.389072## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.031741## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.505784## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.530878## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.074117## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.357842## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.361475## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.458763## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.134891## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.991931## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.720905## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.937536## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.989221## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.762174## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.992096## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.886104## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.480639## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.079933## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.686975## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.828641## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.228511## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.520776## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.081404## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.059618## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.356709## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.035481## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.308555## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.699389## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.321422## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.141190## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.833032## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.454347## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.733341## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.035269## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.428105## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.004032## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.526495## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.257495## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.752270## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.365976## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.926926## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.002156## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.541152## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.230481## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.849066## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.127134## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.131699## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.798187## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.403519## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.661056## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.488853## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.329750## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.188413## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.037871## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.620073## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.082402## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.152774## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.504392## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.734121## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.064007## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.226841## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.409742## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.587249## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.869297## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.981050## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.317278## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.700748## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.061457## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.773174## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.529429## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.568345## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.287561## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.378426## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.135687## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.754604## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.628518## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.104144## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.225747## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.680855## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.297109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.003974## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.996452## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.049350## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.376727## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.723120## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.083388## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.432942## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.254269## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.181720## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.144969## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.597146## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.042633## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.831882## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.445720## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.186209## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.337538## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.049733## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.762174## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.473891## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.859812## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.541264## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.905275## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.718499## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.379897## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.003065## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.129050## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.323010## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.910797## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.945421## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.401917## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.003946## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.322565## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.263398## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.501258## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.318968## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.175867## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.809116## Warning in dpois(y, mu, log = TRUE): non-integer x = 11.755526## Warning in dpois(y, mu, log = TRUE): non-integer x = 11.255604## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.489384## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.379691## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.456263## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.630879## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.376781## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.541441## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.335827## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.017847## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.012011## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.126518## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.858226## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.933080## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.442685## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.157944## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.030855## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.458292## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.593045## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.122492## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.414274## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.568078## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.965080## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.069023## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.240276## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.407172## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.060443## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.227662## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.059123## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.007601## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.998937## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.537334## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.065613## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.135054## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.412383## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.621195## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.934719## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.777652## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.351847## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.665285## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.755339## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.897705## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.837333## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.062595## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.850126## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.147494## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.009409## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.356586## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.465736## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.158883## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.411646## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.799360## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.837826## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.296413## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.700748## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.075894## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.813445## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.125283## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.081404## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.841615## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.818924## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.610918## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.021023## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.295735## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.469084## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.347108## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.616771## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.706862## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.700480## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.784457## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.324359## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.373320## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.318540## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.882802## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.075174## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.559559## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.713733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.733402## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.268988## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.093750## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.457032## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.516193## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.332205## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.780744## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.225481## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.676754## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.971669## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.262690## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.945910## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.327937## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.790097## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.001415## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.663439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.983936## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.267858## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.508239## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.777374## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.774552## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.934894## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.366404## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.725771## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.269096## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.434547## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.718499## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.510860## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.626718## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.049856## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.788972## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.661527## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.488636## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.823648## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.295049## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.300786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.163315## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.393628## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.659482## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.797702## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.756932## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.510860## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.875197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.332205## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.141664## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.103608## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.304468## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.319474## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.970686## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.564268## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.002156## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.679599## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.493317## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.461066## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.221836## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.472346## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.502790## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.355002## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.571474## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.584791## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.610918## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.126891## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.532334## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.268223## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.226537## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.442418## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.463029## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.628041## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.453625## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.144186## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.682109## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.618742## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.961370## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.967280## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.240650## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.152269## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.752573## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.584967## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.084254## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.406932## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.676474## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.375278## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.908755## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.363028## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.013715## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.897705## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841summary(model_glm_nb)##
## Call:
## glm.nb(formula = story_readtime ~ story_views + pitch_contributors +
## pitch_budget, data = log_crowd, init.theta = 2.113418464,
## link = log)
##
## Deviance Residuals:
## Min 1Q Median 3Q Max
## -2.6098 -1.2589 -0.2567 0.5590 2.5251
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) 0.06782 0.34341 0.197 0.843
## story_views 0.68105 0.01877 36.276 <2e-16 ***
## pitch_contributors 0.04699 0.02868 1.638 0.101
## pitch_budget -0.02039 0.03368 -0.606 0.545
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for Negative Binomial(2.1134) family taken to be 1)
##
## Null deviance: 3606.9 on 1847 degrees of freedom
## Residual deviance: 2374.2 on 1844 degrees of freedom
## AIC: 7769.4
##
## Number of Fisher Scoring iterations: 1
##
##
## Theta: 2.113
## Std. Err.: 0.166
##
## 2 x log-likelihood: -7759.374glm_readtime=glm.nb(story_readtime ~ story_views+focal_page,log_crowd)## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.445418## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.683404## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.383368## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.788212## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.375278## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.065613## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.043425## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.011214## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.666957## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.289716## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.808142## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.566672## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.438079## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.042633## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.883322## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.379897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.634790## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.655992## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.228511## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.945051## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.779123## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.945421## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.660585## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.035481## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.899731## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.886833## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.942157## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.021256## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.467942## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.883322## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.027315## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.568078## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.847372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.564238## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.787492## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.669881## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.560080## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.241747## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.631212## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.715383## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.248118## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.920810## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.786897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.549076## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.120444## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.218177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.533389## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.837333## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.267201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.424950## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.492240## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.749393## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.360740## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.273000## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.976734## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.695758## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.283204## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.700480## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.259116## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.541030## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.723719## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.999002## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.134174## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.561122## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.367300## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.751045## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.473069## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.537430## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.166266## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.908083## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.528869## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.666957## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.028201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.648974## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.605802## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.107023## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.251904## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.599870## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.099866## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.338594## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.753590## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.648974## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.082219## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.008813## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.566672## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.099866## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.488636## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.262690## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.062595## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438
## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.367077## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.948760## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.812184## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.962845## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.049733## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.924256## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.094235## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.289611## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.676754## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.954021## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.545918## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.214936## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.040255## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.465908## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.174387## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.845880## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.869019## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.735780## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.084499## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.820282## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.765191## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.117994## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.229114## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.634729## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.954021## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.511745## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.810142## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.303305## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.922644## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.613325## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.690359## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.455321## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.406719## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.332719## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.665684## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.411646## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.347944## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.839476## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.546785## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.180070## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.629004## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.673223## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.135565## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.100319## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.308268## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.419995## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.315358## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.931826## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.546785## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.225747## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.366470## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.770685## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.723585## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.125109## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.070503## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.318498## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.304742## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.085064## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.223359## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.314553## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.210124## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.388561## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.053887## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.426549## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.505492## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.377759## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.730100## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.624973## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.102559## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.754604## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.158883## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.797291## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.384610## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.110874## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.369901## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.477337## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.432940## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.694562## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.376727## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.234107## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.525453## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.452049## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.942799## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.857933## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.817831## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.356108## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.127694## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.127134## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.812184## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.212606## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.970292## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.028279## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.276643## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.146329## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.211557## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.466145## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.317165## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.732211## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.204558## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.347108## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.363028## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.996452## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.257495## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.028279## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.802118## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.579168## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.545177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.348710## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.452982## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.828314## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.484797## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.575949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.354362## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.787492## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.408529## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.962845## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.419381## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.356790## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.309918## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.142037## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.765191## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.218177## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.849325## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.565265## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.049856## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.635947## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.499810## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.126087## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.886081## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.054439## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.367709## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.234107## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.950643## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.156979## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.159055## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.553287## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.988961## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.513429## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.637586## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.170888## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.371489## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.386471## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.104793## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.222576## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.400010## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.442418## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.446737## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.925595## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.242223## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.995732## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.858565## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.111988## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.484907## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.475339## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.732211## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.666427## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.129050## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.880048## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.056246## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.020191## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.521461## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.007333## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.308268## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.502489## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.124020## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.698347## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.190676## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.015658## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.486734## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.364508## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.331715## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.723562## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.302496## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.396606## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.997596## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.432484## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.147494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.407172## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.802118## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.663439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.744932## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.213768## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.033086## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.164786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.082219## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.933423## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.381502## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.811141## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.753590## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.183112## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.339538## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.154858## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.843750## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.741701## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.834109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.360740## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.793014## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.086775## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.997212## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.818924## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.491645## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.236370## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.874931## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.565793## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.093750## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.094345## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.420579## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.186069## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.171034## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.982075## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.883086## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.683404## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.580639## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.095825## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.748460## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.179308## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.167516## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.298949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.301148## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.420535## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.834811## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.556828## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.322565## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.784190## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.882802## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.988984## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.553877## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.278115## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.293305## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.535241## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.980076## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.401197## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.082549## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.124478## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.955827## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.036953## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.979039## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.793587## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.917706## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.652546## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.550135## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.207119## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.768321## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.733684## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.420535## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.383507## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.033506## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.444131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.126869## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.411556## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.680855## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.905362## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.385194## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.743003## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.302619## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.713572## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.618739## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.905275## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.340359## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.439350## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.370231## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.458763## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.852202## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.893199## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.615121## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.293419## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.663562## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.369479## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.089243## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.662468## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.265301## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.003946## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.444833## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.398786## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.937536## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.573017## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.407924## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.439350## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.060443## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.516193## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.680173## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.105945## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.321189## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.238065## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.680173## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.465736## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.147578## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.552237## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.332789## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.967909## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.432484## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.198497## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.465908## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.530878## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.943122## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.264030## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.774552## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.590987## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.398163## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.426488## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.498282## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.167516## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.737670## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.158514## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.304065## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.045005## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.713572## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.293305## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.356918## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.457609## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.290459## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.970292## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.496775## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.519147## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.464588## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.429454## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.678326## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.774856## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.323010## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.859812## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.708050## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.831882## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.945910## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.320205## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.749931## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.683361## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.295056## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.703008## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.953243## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.110696## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.594413## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.231109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.416980## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.497168## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.310169## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.963190## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.790696## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.497168## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.478510## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.875197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.912023## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.386401## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.369448## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.412764## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.442651## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.897872## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.061457## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.909753## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.641564## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.257668## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.250636## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.605298## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.944087## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.919684## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.899897## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.929589## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.247081## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.389072## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.031741## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.505784## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.530878## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.074117## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.357842## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.361475## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.458763## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.134891## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.991931## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.720905## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.937536## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.989221## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.025352## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.762174## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.992096## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.204693## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.886104## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.480639## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.079933## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.686975## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.828641## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.228511## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.520776## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.081404## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.059618## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.356709## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.035481## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.178054## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.397895## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.308555## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.699389## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.321422## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.141190## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.833032## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.454347## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.733341## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.035269## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.795791## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.428105## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.004032## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.526495## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.276666## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.257495## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.752270## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.951244## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.365976## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.926926## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.002156## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.541152## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.230481## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.849066## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.127134## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.131699## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.798187## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.403519## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.661056## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.488853## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.329750## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.188413## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.037871## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.620073## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.082402## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.152774## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.504392## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.734121## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.064007## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.226841## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.409742## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.587249## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.869297## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.981050## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.317278## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.700748## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.944439## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.061457## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.773174## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.529429## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.568345## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.287561## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.378426## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.135687## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.754604## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.628518## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.104144## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.225747## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.680855## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.343805## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.297109## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.003974## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.996452## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.049350## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.376727## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.723120## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.083388## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.432942## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.254269## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.181720## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.144969## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.597146## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.042633## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.831882## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.445720## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.186209## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.337538## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.049733## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.762174## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.473891## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.891820## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.859812## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.541264## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.905275## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.941642## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.718499## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.433722## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.379897## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.003065## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.129050## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.323010## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.910797## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.945421## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.401917## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.003946## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.322565## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.263398## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.501258## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.318968## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.496508## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.175867## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.809116## Warning in dpois(y, mu, log = TRUE): non-integer x = 11.755526## Warning in dpois(y, mu, log = TRUE): non-integer x = 11.255604## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.489384## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.379691## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.456263## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.630879## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.376781## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.541441## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.335827## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.017847## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.012011## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.126518## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.858226## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.933080## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.442685## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.157944## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.030855## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.458292## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.593045## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.122492## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.414274## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.568078## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.965080## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.069023## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.240276## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.407172## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.060443## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.227662## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.709530## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.059123## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.098612## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.007601## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.998937## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.537334## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.065613## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.197225## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.433987## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.135054## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.412383## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.621195## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.934719## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.852030## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.777652## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.351847## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.665285## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.755339## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.897705## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.837333## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.564348## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.062595## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.850126## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.147494## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.009409## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.356586## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.465736## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.143135## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.158883## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.411646## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.799360## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.837826## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.296413## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.700748## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.075894## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.813445## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.044522## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.125283## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.081404## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.262680## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.841615## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.688879## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.818924## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.610918## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.298317## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.021023## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.543295## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.295735## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.469084## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.583519## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.347108## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.616771## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.706862## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.700480## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.784457## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.324359## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.373320## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.919981## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.318540## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.555348## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.882802## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.075174## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.559559## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.713733## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.733402## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.268988## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.093750## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.457032## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.969813## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.516193## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.135494## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.332205## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.043051## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.780744## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.225481## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.676754## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.394449## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.871201## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.971669## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.220356## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.262690## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.189655## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.595120## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.945910## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.791759## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.327937## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.736198## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.790097## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.001415## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.663439## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.672829## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.367296## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.983936## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.267858## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.609438## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.508239## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.777374## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.774552## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.934894## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.366404## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.725771## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.269096## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.806662## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.434547## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.718499## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.510860## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.626718## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.049856## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.788972## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.574711## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.661527## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.488636## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.823648## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.295049## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.300786## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.163315## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.393628## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.330733## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.659482## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.797702## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.756932## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.624018## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.295837## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.521789## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.833213## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.510860## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.850148## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.875197## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.332205## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.253829## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.141664## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.804021## Warning in dpois(y, mu, log = TRUE): non-integer x = 10.103608## Warning in dpois(y, mu, log = TRUE): non-integer x = 9.304468## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.319474## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.970686## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.564268## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.002156## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.679599## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.493317## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.461066## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.221836## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.472346## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.502790## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.355002## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.571474## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.123964## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.584791## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.610918## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.126891## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.532334## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.526361## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.268223## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.226537## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.442418## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.463029## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.628041## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.453625## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.890372## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.079442## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.144186## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.682109## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.091042## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.618742## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.961370## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.967280## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.240650## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.152269## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.752573## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.772589## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.584967## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.890349## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.084254## Warning in dpois(y, mu, log = TRUE): non-integer x = 8.406932## Warning in dpois(y, mu, log = TRUE): non-integer x = 7.676474## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.375278## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.908755## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.258097## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.181784## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.317488## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.639057## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.248495## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.302585## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.682131## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.363028## Warning in dpois(y, mu, log = TRUE): non-integer x = 5.129899## Warning in dpois(y, mu, log = TRUE): non-integer x = 2.564949## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.013715## Warning in dpois(y, mu, log = TRUE): non-integer x = 3.218876## Warning in dpois(y, mu, log = TRUE): non-integer x = 6.897705## Warning in dpois(y, mu, log = TRUE): non-integer x = 1.386294## Warning in dpois(y, mu, log = TRUE): non-integer x = 0.693147## Warning in dpois(y, mu, log = TRUE): non-integer x = 4.418841summary(glm_readtime)##
## Call:
## glm.nb(formula = story_readtime ~ story_views + focal_page, data = log_crowd,
## init.theta = 2.116776822, link = log)
##
## Deviance Residuals:
## Min 1Q Median 3Q Max
## -2.6094 -1.2497 -0.2444 0.5505 2.4644
##
## Coefficients:
## Estimate Std. Error z value Pr(>|z|)
## (Intercept) -0.05720 0.03950 -1.448 0.148
## story_views 0.68101 0.01938 35.148 <2e-16 ***
## focal_page 0.08209 0.07366 1.114 0.265
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## (Dispersion parameter for Negative Binomial(2.1168) family taken to be 1)
##
## Null deviance: 3609.3 on 1847 degrees of freedom
## Residual deviance: 2377.6 on 1845 degrees of freedom
## AIC: 7769.4
##
## Number of Fisher Scoring iterations: 1
##
##
## Theta: 2.117
## Std. Err.: 0.166
##
## 2 x log-likelihood: -7761.403