error de tiempo de ejecución visual personalizado de R (acceso denegado a la URL local)

Un usuario Pregunto ✅

Chriswalz

Hola,

He creado un objeto visual de Power BI personalizado usando este http://radacad.com/interactive-map-using-r-and-power-bi-create-custom-visual-part-1 tutorial. Estoy usando Plotly para crear un gráfico interactivo en este objeto visual.

Puedo usar este objeto visual personalizado sin ningún problema en el escritorio de Power BI, pero cuando lo publico en powerbi.com, recibo el siguiente error «Error de tiempo de ejecución del script»:

Error en shell.exec (url): acceso a ‘C: Users Client Temp RtmpOsE2VBviewhtml1c717b3ce9 / index.html’ denegado

¿Alguien tiene una idea de qué está causando este error?

Se ha utilizado el siguiente código R para crear el objeto visual:

source('./r_files/flatten_HTML.r')

############### Library Declarations ###############library(ggplot2)library(plotly)library(lubridate)
####################################################

################### Actual code ####################x <- data.frame(as.POSIXct(substr(Values$SendLocalTime,0,19),format = "%Y-%m-%dT%H:%M:%S"), as.numeric(as.character(sub(",", ".", Values$AvgBeltTemperature, fixed = TRUE))))colnames(x) <- c("Date", "Value")x <- data.frame(as.POSIXct(substr(Values$SendLocalTime,0,19),format = "%Y-%m-%dT%H:%M:%S"), 
                as.numeric(as.character(sub(",", ".", Values$AvgBeltTemperature, fixed = TRUE))),                as.numeric(as.character(sub(",", ".", Values$MinBeltTemperature, fixed = TRUE))),                as.numeric(as.character(sub(",", ".", Values$MaxBeltTemperature, fixed = TRUE))))colnames(x) <- c("Date", "Average","Minimum", "Maximum")

#Labels for axisf <- list(  family = "Arial, monospace",  size = 16,  color = "#7f7f7f"
)label_x <- list(  title = "Date",  titlefont = f)label_y <- list(  title = "Temperate (Celsius)",  titlefont = f)g<-plot_ly(x= ~x$Date, y = ~x$Average, type = 'scatter', name="Average", mode='markers') %>%  add_trace(x= ~x$Date, y = ~x$Minimum, name = 'Minimum', mode = 'markers') %>%  add_trace(x= ~x$Date, y = ~x$Maximum, name = 'Maximum', mode = 'markers') %>%  layout(title = "Temperature", xaxis = label_x, yaxis = label_y)

(gg <- ggplotly(g))internalSaveWidget(gg, 'out.html');
####################################################

Chriswalz

En respuesta a Jole

Recibí la solución del soporte de Microsoft que funcionó para mí.

Simplemente elimine la conversión plot_ly al final:

(gg <- ggplotly(g))

y use ‘g’ como entrada para internalsavewidget porque ‘g’ ya es un objeto plot_ly.

No estoy seguro de por qué esto conduce a un error en el servicio PowerBI porque convertir un objeto plot_ly en un objeto plot_ly no debería ser un problema.

gomezepor

Experimenté el mismo problema.

¿Alguien sabe la solución?

Gracias

Josephderrick

Hola chriswalz,

Tengo el mismo problema y la sugerencia marcada como la solución a continuación no me funciona.

¿Has solucionado tu problema?

Hola @chriswalz,

En su declaración, usa fuente (‘./ r_files / flatten_HTML.r’) para citar otra declaración R, use la R detallada en la declaración del archivo .r para reemplazar la «fuente (‘./ r_files / flatten_HTML.r’ ) «y compruebe si funciona bien. Y siga este blog para comprobar si no hay soporte paquetes en su archivo .r.

Atentamente,
Angelia

Chriswalz

En respuesta a v-huizhn-msft

Hola @ v-huizhn-msft,

gracias por tu respuesta. Lamentablemente, no resolvieron este problema. Sigue obteniendo el error de tiempo de ejecución de acceso denegado. También verifiqué los paquetes, pero todos los paquetes que estoy usando están en la lista de paquetes compatibles.

Atentamente,

Chris

Jole

En respuesta a Chriswalz

Experimenté el mismo problema.

¿Alguien sabe la solución?

Gracias

Chriswalz

En respuesta a Jole

Recibí la solución del soporte de Microsoft que funcionó para mí.

Simplemente elimine la conversión plot_ly al final:

(gg <- ggplotly(g))

y use ‘g’ como entrada para internalsavewidget porque ‘g’ ya es un objeto plot_ly.

No estoy seguro de por qué esto conduce a un error en el servicio PowerBI porque convertir un objeto plot_ly en un objeto plot_ly no debería ser un problema.

Jole

En respuesta a Chriswalz

Experimenté el mismo problema.

¿Alguien sabe la solución?

Gracias

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *