这样的数据用R语言怎么绘制成直方图,谢谢!

2025-02-23 12:55:33
推荐回答(2个)
回答1:

储存原始数据后,将其在R中命名为test,运行以下数据就能得到你要的条形图了

tp <- barplot(test$Length_distribution, names.arg=test$Sequence_size, las =2, ylim=c(0,30000),col="black")
text(tp, test$Length_distribution, labels =test$Length_distribution,pos=4,srt=90,offset=0)

回答2:

这样的数据用R语言怎么绘制成直方图代码如下:
turboc 直方图

#include
#include
#include
#include
#include

int main()
{
int GraphDriver;
int GraphMode;
int i, x, y;
char buffer[5];
int data[]={7,3,12,6,9,5,8,11};

GraphDriver = DETECT;
initgraph(&GraphDriver, &GraphMode, "");

setcolor(15);
moveto(635, 461);
lineto(20, 461);
lineto(20, 20);

setcolor(15);
for (i = 1 ; i < 13; i++)
{
itoa(i, buffer, 10);
outtextxy(20 - textwidth(buffer), 456 - i * 36, buffer);
moveto(20, 460 - i * 36);
lineto(23, 460 - i * 36);
}
setfillstyle(SOLID_FILL, 1);
for (i = 0 ; i < 8; i++)
{
moveto(i * 50 + 49, 461);
lineto(i * 50 + 49, 465);
outtextxy(i * 50 + 51, 463, itoa(i + 1, buffer, 10));
bar(i * 50 + 35, 460 - data[i] * 36, i * 50 + 65, 460);
}

getch();

closegraph();
}