Columna de datos R utilizada para Slicer en Powerbi

No en el visual R. Sin embargo, podría usar R Script en el Power Query Editor para agregar columnas al modelo de datos y luego usarlo en una segmentación.

data(dataset)

head(dataset)
m <-dataset
nc <-ncol(dataset)
values <- dataset[,3:nc]
values
mean_is_0 <- sapply(values, mean) == 0
values <- values[ ! mean_is_0 ]
is.na(values) <- !values
values

mean_is_0 <- sapply(values, mean) == 0
values


for(i in 1:ncol(values)){
  values[is.na(values[,i]), i] <- mean(values[,i], na.rm = TRUE)
}  
values

test.pca <- prcomp(values,center = TRUE,scale. = TRUE)
plot(test.pca)
predict(test.pca,  newdata=tail(values, 2))
library(devtools)
library(ggbiplot)



sta5 <- test.pca$x[which(m$Obj == 5),]
   sta5[1:2]


sta4 <- test.pca$x[which(m$Obj == 4),]
sta4[1:2]
sta3 <- test.pca$x[which(m$Obj == 3),]
sta3[1:2]
sta2 <- test.pca$x[which(m$Obj == 2),]
sta2[1:2]
sta1 <- test.pca$x[which(m$Obj == 1),]
sta1[1:2]


g <- ggbiplot(test.pca, obs.scale = 1, var.scale = 1, ellipse = TRUE, 
              circle = FALSE) + geom_point(aes(x=sta5[1], y=sta5[2]), col="blue", size=4) + geom_point(aes(x=sta4[1], y=sta4[2]), col="blue", size=4)+ geom_point(aes(x=sta3[1], y=sta3[2]), col="blue", size=4)+ geom_point(aes(x=sta2[1], y=sta2[2]), col="blue", size=4)+ geom_point(aes(x=sta1[1], y=sta1[2]), col="blue", size=4) 


g <- g + scale_color_discrete(name="")
g <- g + theme(legend.direction = 'horizontal', 
               legend.position = 'top')



print(g)

Hola

Tengo el siguiente código R. Ahora quiero presentar una nueva columna «Cinturón». ¿Puedo hacerlo directamente en el RCode para agregar columnas y usarlo como dropdown?

¿Qué comentarios tengo que escribir?

Mi conjunto de datos se ve de esta manera y quiero especificar como nueva información Loc1 y Loc3 Belt1; Loc 2 y Loc4 Correa 2; Loc 5 y 6 Belt3.

Gracias por tu ayuda

Year    Obj Loc1    Loc2    Loc3    Loc4    Loc5    Loc6
17  1   1   5   1   2   1   4
17  2   2   4   3   4   3   3
17  3   3   3   5   3   2   2
17  4   4   2   2   2   4   5
17  5   5   1   4   1   5   1

Hola bml,

Para hacer que el script R use datos en el modelo de datos pbi, pruebe con un patrón como el siguiente:

var <- dataset$column1
your code here
dataset$new_column <- var

Saludos,

jimmy tao