Question

私はPowerBIを初めて使い、RネットワークダイアグラムをPowerBIに表示しようとしています。

Rに望まれるよう

私のスクリプトは、次のコードを使用して動作します。

install.packages("maps", repos='http://cran.us.r-project.org') 
install.packages("geosphere", repos='http://cran.us.r-project.org') 
install.packages("readxl", repos='http://cran.us.r-project.org') 

library("maps") 
library("geosphere") 
library("readxl") 


airports <- read_excel("C:/Users/jeffrey.tackes/Desktop/BASEMAPPING.xlsx", 
sheet="ASI Solo") 
flights <- read_excel("C:/Users/jeffrey.tackes/Desktop/BASEMAPPING.xlsx", 
sheet="edges") 

map("world", col="skyblue", border="gray10", fill=TRUE, bg="black") 
points(x=airports$long, y=airports$lat, pch=19, 
    cex=1, col="orange") 

# Generate edge colors 
col.1 <- adjustcolor("orange red", alpha=0.4) 
col.2 <- adjustcolor("orange", alpha=0.4) 
edge.pal <- colorRampPalette(c(col.1, col.2), alpha = TRUE) 
edge.col <- edge.pal(100) 

# For each path, we will generate the coordinates of an arc that connects 
# its star and end point, using gcIntermediate() from package 'geosphere'. 
# Then we will plot that arc over the map using lines(). 

for(i in 1:nrow(flights)) { 
    node1 <- airports[airports$ID == flights[i,]$from,] 
    node2 <- airports[airports$ID == flights[i,]$to,] 

    arc <- gcIntermediate(c(node1[1,]$long, node1[1,]$lat), 
        c(node2[1,]$long, node2[1,]$lat), 
        n=1000, addStartEnd=TRUE) 
    edge.ind <- round(100) 

    lines(arc, col=edge.col[edge.ind], lwd=edge.ind/30) 
} 

私の質問は、これはPowerBIに表示するために取得する方法ですか？私はRScriptをインポートするとき、私は私が得るこのPowerBI、内部のRビジュアルに行けば は、それは私の4つのテーブル、元のデータソースと2、およびスクリプト（ノード1 &ノード2）

で作成した2つのデータフレームを示しています失われた
Rコードから元の2つのテーブルを追加しようとしましたが、すべてのフィールドを追加してからRコードをPowerBIのRエディタにコピーしましたが、それは動作しません。

助けが必要ですか？

Answer 1

あなたがここにいくつかのより多くの情報を得ることができ、

https://powerbi.microsoft.com/en-us/guided-learning/powerbi-learning-3-11h-r-visual-integration/