いつ、なぜprofvis（）は "ソースが利用できません"と表示しますか？

Question

私はRコードを多くプロファイリングしており、profvis（）を多用しています。

一部の機能では、ブラウザウィンドウの上半分にソースが表示され、時には表示されないことがあります。私はそれが事実であるときにそれを作ることができません、それは私にランダムなようです。

誰でも、なぜprofvisがトップウィンドウにコードを表示できないのか知っていますか？

simulation <- function(p=1e4, n=100){ 
    df <- list() 
    for(i in 1:p){ # simulate p columns of data 
    df[[paste0("Var", i)]] <- rnorm(n) 
    } 
    df <- as.data.fame(df) 

    return(apply(df, 2, mean)) 
} 

profvis(simulation()) 

Answer 1

一つだけfunction()profvis()であり、何もフレームグラフの上部にありません：それが起こる一つの状況は、コードのこの部分です。なぜなら、グラフの底にあるバーを強調表示する機能は不要だと思います。

例コード：

library(profvis) 

simulation <- function(p=1e4, n=100){ 
    df <- list() 
    for(i in 1:p){ # simulate p columns of data 
    df[[paste0("Var", i)]] <- rnorm(n) 
    } 
    df <- as.data.frame(df) 
    return(apply(df, 2, mean)) 
} 

profvis(simulation()) # When only one function() is, the source isn't shown. 

profvis({    # When there are more than two function(), source is shown. 
    simulation() 
    sum(iris[,1]) 
})