Error with ftall

[ViktoriaSpaiser]

Hi Frederik,

Many thanks for sharing the data and script for your exciting paper.

In a class we would like to use your example and replicate your results. But when testing your script with the provided data we encountered some issues.

In line 173 ftall.rds is required (but in README we are told that the analyses need only ft.rds). However, even after reading in the data from ftall.rds and error occurs following allchairmen$seats<-seatvec

The error messages says:

<error/tibble_error_assign_incompatible_size>
Error in $<-:
! Assigned data value must be compatible with existing data.
✖ Existing data has 47 rows.
✖ Assigned data has 49 rows.
ℹ Only vectors of size 1 are recycled.
Caused by error in vectbl_recycle_rhs_rows():
! Can't recycle input of size 49 to size 47.

Backtrace:
▆

1. ├─base::$<-(*tmp*, seats, value = <dbl>)
2. ├─dplyr:::$<-.grouped_df(*tmp*, seats, value = <dbl>)
3. ├─base::NextMethod()
4. └─tibble:::$<-.tbl_df(*tmp*, seats, value = <dbl>)
5. └─tibble:::tbl_subassign(...)

6. └─tibble:::vectbl_recycle_rhs_rows(value, fast_nrow(xo), i_arg = NULL, value_arg, call)
   

Not sure whether this is because ftall actually requires yet a different dataset, not ftall.rds? Or what other issues causes this error, a speedy response would be much appreciated, so we can run this in class on Tuesday (26th March).

Many thanks!