Блог

Я делаю графическую визуализацию различных частей моей анкеты. Мы используем систему RGB для согласования цветов с Excel, однако мои штриховые графики не окрашиваются, используется только первый цвет вектора раскраски.

Поэтому вместо

 barplot(c(1, 1, 1), axes=T, col=c("#806000","#C6E0B4","#FFC000"),names.arg=c("test1","test2","test3"))
  

В итоге все три полосы будут иметь цвет «# 806000».

Вот код для моего графика (DATA_tot — это полная таблица данных для моей анкеты):

 barplot(
  cbind(
    length(which(DATA_tot$A014_18==2)),
    length(which(DATA_tot$A014_02==2)),   
    length(which(DATA_tot$A014_01==2)),
    length(which(DATA_tot$A014_03==2))
    ),
  main="Frage 4a",
  col=c("grey","#806000","#C6E0B4","#FFC000"),
  ylab="Anzahl der Betriebe",
  names.arg=c("keine n Änderungen","Streuwiesen","einmähdige n 
Wiesen","Hutweiden"), 
  ylim=c(0,1400),
  cex.axis=0.8, cex.names=0.6
  )
  

Кто-нибудь когда-либо сталкивался с этой проблемой или находил способ ее обойти?
Я явно ищу решения с помощью barplot (по другим причинам).

попробуйте использовать c вместо cbind :

 barplot(
  c(
    length(which(DATA_tot$A014_18==2)),
    length(which(DATA_tot$A014_02==2)),   
    length(which(DATA_tot$A014_01==2)),
    length(which(DATA_tot$A014_03==2))
    ),
  main="Frage 4a",
  col=c("grey","#806000","#C6E0B4","#FFC000"),
  ylab="Anzahl der Betriebe",
  names.arg=c("keine n Änderungen","Streuwiesen","einmähdige n 
Wiesen","Hutweiden"), 
  ylim=c(0,1400),
  cex.axis=0.8, cex.names=0.6
  )