摘要:
1、 > a <- c(3,NA,NA,4,1,5) > b <- c(NA,4,6,2,4,9) > c <- data.frame(a,b) > c a b 1 3 NA 2 NA 4 3 NA 6 4 4 2 5 1 4 6 5 9 > c[is.na(c)] <- 0 > c a b 1 3 阅读全文
摘要:
1、 p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p 2、隐去x轴 p + xlab(NULL) 3、 隐去y轴 p + ylab(NULL) 阅读全文
摘要:
1、 p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p 2、调整x轴 p+theme(axis.title.x=element_text(vjust=2, size=20,face = "bold")) p+theme(a 阅读全文
摘要:
1、 library(gcookbook) library(ggplot2) p=ggplot(heightweight,aes(x=sex,y=heightIn))+geom_violin() p 2、指定x轴因子水平顺序 heightweight$sex<-factor(heightweight 阅读全文
摘要:
1、 p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p 2、调整绘图边框的粗细 p + theme(panel.border = element_rect(fill=NA,color="black", size=5, li 阅读全文
摘要:
1、 p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p 2、调整x轴 p+theme(axis.line.x=element_line(linetype=1,color="black",size=3)) 3、调整x轴刻度线 阅读全文
摘要:
1、 p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p 2、去除图例 p + theme(legend.position = 'none') 阅读全文
摘要:
1、 p<-ggplot(mtcars,aes(mpg,hp,colour=factor(cyl)))+geom_point() p 2、去除背景色 p + theme_bw() 3、去除网格线 p + theme_bw() + theme(panel.grid=element_blank()) 阅读全文
摘要:
1、 #include <stdio.h> #define NUMBER 7 int main(void) { int i, a[NUMBER]; for (i = 0; i < NUMBER; i ++) { printf("NO.[%d] = ", i + 1); scanf("%d", &a[ 阅读全文
摘要:
#include <stdio.h> int main(void) { int a[7] = {45,32,86,56,24,98,85}; int min, max; min = a[0]; max = a[0]; int i; for (i = 0; i < 7; i ++) { if (a[i 阅读全文