Forum Discussion
El objeto visual del script de R no se muestra correctamente después de publicar el informe de PowerBI
Hola, @marta1706
Puedes visitar el siguiente enlace y descargar la versión 4.4.1 para instalar el tidyverse correctamente en Rstudio.
Descargar R-4.4.1 para Windows. El proyecto R para la computación estadística.
Saludos
Yang
Equipo de apoyo a la comunidad
Si hay algún post Ayuda, entonces por favor considere Acéptalo como la solución para ayudar a los demás miembros a encontrarlo más rápidamente.
Si no entiendo sus necesidades o aún tiene problemas con él, no dude en hacérnoslo saber. ¡Muchas gracias!
Cómo obtener respuestas rápidas a sus preguntas -- Cómo proporcionar datos de ejemplo en el foro de Power BI
- Syndicate_Admin2 years ago
Administrator
Hola @v-yaningy-msft ,
Gracias. Sé que puedo hacerlo, es lo que resultó en el mensaje de error que hice una captura de pantalla en mi publicación. Solo probé R 3.4.4 más tarde, porque Microsoft dice que esta es la versión más alta de R compatible con PowerBI: ver aquí.
¿Hay algo más que pueda hacer? ¿Alguien más ha tenido este problema?
- Syndicate_Admin2 years ago
Administrator
Hola, @marta1706
Ok, lo sé, qué código R usaste en PBI Desktop, puedes compartirlo y lo probaremos para encontrar soluciones adecuadas.
Saludos
Yang
Equipo de apoyo a la comunidad- Syndicate_Admin2 years ago
Administrator
Hola @v-yaningy-msft ,
Hice algunas imágenes, aquí hay un ejemplo. Como dije, todo funciona bien en Desktop y solo genera un error después de publicar en mi espacio de trabajo.
# El siguiente código para crear un marco de datos y eliminar filas duplicadas siempre se ejecuta y actúa como un preámbulo para su script:# conjunto de datos <- data.frame(indefinido, indefinido.1, indefinido.2, indefinido.3, indefinido.4)# conjunto de datos <- único(conjunto de datos)# Pega o escribe tu código de script aquí:biblioteca(tidyverse)conjunto de datos<-conjunto de datos%>%rebautizar(Categoría=`Partidario Dadivoso categoría`)%>%rebautizar(Fecha=`Recibido Fecha`)%>%filtro(Importe>0)conjunto de datos$Fecha2<-str_sub(conjunto de datos$Fecha, fin=10)conjunto de datos$Fecha2<-YMD(conjunto de datos$Fecha2)conjunto de datos$contar<-1donors_donation_count<-conjunto de datos%>%group_by(py3_customer)%>%resumir(contar=suma(contar))conjunto de datos<-left_join(conjunto de datos, donors_donation_count, por="py3_customer")%>%rebautizar(contar=contar.x)%>%rebautizar(donations_per_donor=contar.y)conjunto de datos$mes<-como.carácter(mes(conjunto de datos$Fecha2))conjunto de datos<-conjunto de datos%>%mutar(mes = case_when (mes==1 ~"01",mes==2 ~"02",mes==3 ~"03",mes==4 ~"04",mes==5 ~"05",mes==6 ~"06",mes==7 ~"07",mes==8 ~"08",mes==9 ~"09",mes==10 ~"10",mes==11 ~"11",mes==12 ~"12",.predeterminado=EN))conjunto de datos$año<-año(conjunto de datos$Fecha2)conjunto de datos$year_month<-pegar(como.carácter(conjunto de datos$año),"-",conjunto de datos$mes)conjunto de datos2<-conjunto de datos%>%filtro(donations_per_donor>1)conjunto de datos2<-conjunto de datos2%>%escoger(py3_customer, year_month)conjunto de datos2<-único(conjunto de datos2)ggplot(conjunto de datos2)+Aes(x=year_month)+geom_bar(Estadísticas="Conteo", llenar="#ffb500")+Laboratorios(x="Mes de la donación", y="Número de dadores repetidos", título="Donantes repetidos por mes")+geom_text(Aes(etiqueta=..contar..), Estadísticas="Conteo", vjust=1.5, tamaño=6, color="Negro", Tipo de fuente="Audaz")+theme_light(base_size=25)