ggvis

    6熱度

    1回答

    我有一個像下面這樣簡單閃亮的應用,你可以運行它。地塊由 ggvis創建,用戶可以從 inputSelect中選擇學生姓名。在情節中,我想改變特定分數範圍內背景的顏色。例如,在每個圖中的 ,分數高於80或低於50的情節背景顏色用藍色突出顯示(請參閱附圖)。我試圖添加圖層並使用layer_rects()將矩形繪製到圖上,但問題是如果選擇不同的學生,則x軸的值會發生變化。任何人之前都做過這些操作,或者有

    1熱度

    1回答

    所以我正在製作喬丹的互動地圖,以顯示每個省的註冊敘利亞難民。添加的交互性非常簡單;使用add_tooltip,一旦你懸停在一個省,它顯示了難民的姓名和總數。但它不顯示名稱。當我使用打印或格式時,它會顯示'NULL'。可能是什麼原因? 一個可重複的代碼可以發現如下: library(choroplethrAdmin1) library(choroplethr) library(ggvis) l

    1熱度

    1回答

    我試圖在懸浮元素中嵌入一個閃亮的ggvis圖,但是它似乎並沒有在閃亮(即懸停元素)中​​呈現。下面是服務器和UI組件: server.R: library(choroplethrAdmin1) library(choroplethr) library(ggvis) library(dplyr) jor<-get_admin1_map("jordan") jor$total <- run

    0熱度

    1回答

    目標: 我希望能夠創建靜態ggvis情節和傳遞一個參數在HTML文件保存的目錄路徑。 模擬數據: require(ggvis) # Create mock data to work with dfa <- data.frame( date_a = seq(from= as.Date("2015-06-10"), to= as.Date("2015-07-01"), by= 1),

    0熱度

    1回答

    我相信這是一個簡單的問題,但我發現只有困難的答案... 我剛開始做一些R編程,我真的很喜歡dplyr和ggvis包..但是我可以不知道如何在一個圖中組合多個線圖。我測得不同樣品隨着時間的推移,我的數據看起來是這樣的: time <-1:10 m = matrix(c(2, 4, 3, 1, 5, 7),nrow=10,ncol=3,byrow = FALSE) colnames

    1熱度

    2回答

    我正在學習使用ggvis,並且想要了解如何創建由hist生成的等效直方圖。具體來說,如何設置ggvis直方圖中x的bin寬度和上下限?我錯過了什麼? 問題:如何獲得ggvis直方圖輸出以匹配hist輸出? 讓我提供了一個例子: require(psych) require(RCurl) require(ggvis) if (!exists("impact")) { url <-

    1熱度

    1回答

    很簡單: 這不起作用 iris %>% ggvis(x= ~Sepal.Length, y = ~Sepal.Width, fill=~Sepal.Length) %>% layer_bars() 這確實 iris %>% ggvis(x= ~Sepal.Length, y = ~Sepal.Width, fill=~Sepal.Length) %>% layer_points()

    0熱度

    1回答

    我知道如何希臘符號融入在ggvis地塊軸標題的問題是由托馬斯·K的 Special symbols in ggvis library(ggvis) title <- "CH\u2084 (\u03BC mol)" mtcars %>% ggvis(~wt, ~mpg) %>% layer_points() %>% add_axis('x', orient =

    0熱度

    1回答

    我想使用動態接口使用selectInput小工具更改ggvis陰謀的圖層。問題是,當我在創建繪圖後選擇不同的圖層時,它會發生變化,但它會很快消失。以下是代碼的簡化版本,以顯示省略所有額外動態內容的問題。我只是從數據集中繪製一些數值。我添加了幾個selectInput小部件,讓用戶選擇什麼類型的情節以及何時顯示情節。請注意,我需要包含renderUI中的所有元素。 library(shiny) l

    2熱度

    1回答

    我試圖將一個參數作爲字符傳遞給ggvis,但是我得到一個空的圖。 重複的例子: library(ggvis) y <- c("mpg", "cyl") ing <- paste0("x = ~ ", y[1], ", y = ~ ", y[2]) #works as intended mtcars %>% ggvis(x = ~ mpg, y = ~ cyl) %>% la