ggplot2

    0

    1답변

    으로 매주 데이터를 플로팅 : DF : 여기 오류로 실행하고 ID DAY STORE PRODid QTY GBP PROD 2 8042899 1584 70470 1372 6 9.54 Yogurt 3 8042899 1586 70470 1372 2 3.18 Yogurt 4 8042899 1589 70470 1372 2 3.18 Yogurt 5 804

    1

    1답변

    두 개의 치수를 따라 변수를 합한 막대 차트를 플롯하려는 경우, 하나는 x에 따라 펼쳐지고 다른 하나는 세로로 쌓입니다. 다음 두 명령은 동일한 작업을 수행 할 것으로 예상되지만 두 번째 명령은 원하는 결과를 제공합니다 (여기서 직접 데이터를 집계합니다). 첫 번째 경우에서 어떤 일이 벌어지고 있는지 이해하고 싶습니다. ggplot2의 기본 집계 기능을 사

    -1

    1답변

    ggplot2에서 5 개의 transect로 5 가지 값의 다중 오류 막대 (평균 및 표준 편차)를 플롯하려고합니다. 나는 시도했지만 적절한 전략을 찾지 못했습니다. 값을 가로로 쪼개다 종의 샘플 코드는 다음을 포함한다 : value<-as.integer(runif(1000, min = 0, max = 5)) ## values of 1000 observat

    1

    1답변

    헤더에서 말했듯이 히트 맵에 1 개의 시각적 레이어를 추가하고 싶습니다. 샘플 데이터는 mpg입니다. library(tidyverse) # for dplyr and ggplot2 data <- mpg %>% mutate(quantity = 1, isnew = ifelse(year == 2008, 1, 0)) %>% group_by(dr

    1

    1답변

    나는 다음과 같은 다각형을 사용하여 choropleth지도를 그릴 싶습니다 : library(sp) library(sf) library(spatialEco) library(tigris) br_tracts <- tracts(state = 'LA', county = 'East Baton Rouge', cb = T, year = 2016) plot(b

    3

    1답변

    스플라인 굴림 값을 사용하여 ggplot을 생성했지만 아래 그림에서와 같이 0에 가까운 값은 음수가 아닙니다. 음수 일 때 splinefun의 값을 강제로 0으로 만드는 방법이 궁금합니다. 고맙습니다! sigma <- c(0,1,2,3,4,5,6,7,8,9,10,11,12) sigma=matrix(sigma,ncol=1) myFunc_sig <- fun

    2

    1답변

    작은 질문이 있습니다. ggplot을 사용하여 극좌표의 구석에 레이블을 추가하는 방법은 무엇입니까? 일부 가짜 데이터가있는 재현 예 :이 나에게 음모의 bottomright 구석에 레이블을 제공 lab <- data.frame(lab="text") df2 <- data.frame(x=1:24) pl <- ggplot(df2, aes(x=x, y=1))+

    1

    1답변

    다음 플롯은 ggplot2 및 ggpubr로 작성했습니다. VaD +와 HC 사이의 중요성을 나타내려고합니다. p- 값을 별표로 변경하고 싶습니다. 나는 symnum.args를 사용해야한다고 생각하지만, 시도 할 때 나는 변화가 없다. myplot <- ggplot(my.data, aes(x = DX, y = CC, fill=DX)) + geom_boxpl

    0

    2답변

    여러 데이터 프레임에서 여러 ggplot 차트를 만들려고합니다. 아래 코드를 개발했지만 최종 루프가 작동하지 않습니다. df1 <- tibble( a = rnorm(10), b = rnorm(10) ) df2 <- tibble( a = rnorm(20), b = rnorm(20) ) chart_it <- funct

    3

    1답변

    나는 this example을 따르고 있으며 특정 정렬을 사용하여 테이블을 그래프로 표시 할 수 있는지 궁금합니다. nba <- read.csv("http://datasets.flowingdata.com/ppg2008.csv") nba$Name <- with(nba, reorder(Name, PTS)) library(ggplot2) nba.m <- m