archivo II_701_Estadistica_descriptiva_practica_guia – Error en secuencia

El archivo II_701_Estadistica_descriptiva_practica_guia, me da un error cuando ejecuto esta parte del codigo original para hacer tablas de contingencias:

> # Tabla de contingencias:
>
> var_cual_x = «ventas_altas»
> var_cual_y = «ShelveLoc»
>
> categ <- dlookr::target_by(datos, !!name_y) # indico la variable target
> cat_cat <- dlookr::relate(categ, !!name_x) # la tabla de contingencias frecuencias aobsultas
> tabla2D <- as.data.frame.matrix(cat_cat) # tabla a data frame
Error in seq_len(ncols) :
argument must be coercible to non-negative integer
In addition: Warning message:
In seq_len(ncols) : first element used of ‘length.out’ argument
> # Tabla contingencias Frecuencias absolutas:
> print(‘**********************************’)
[1] «**********************************»
> print(‘Frecuencias absolutas:’)
[1] «Frecuencias absolutas:»
> print(‘**********************************’)
[1] «**********************************»
> tabla2D
Error: object ‘tabla2D’ not found

Puedes echarme un cable?

Gracias