2016-03-30 5 views
0

Вот код для построения 10 различных графиковКак добавить пробел в этом участке? Я новичок в R

lab=unique(train_train$PdDistrict) 
lab=as.character(lab) 
par(mfrow=c(5,2)) 

for(i in 1:length(lab)) 
{ 
    a=plot(table(train_train[train_train$PdDistrict==lab[i],1]),las=3,main=lab[i]) 
} 

Полученный график показан на этой ссылке изображения

IMAGE

Как я могу пространство этих графики, так что его читаемый?

+1

отправьте его на другое устройство, например, в формате pdf: 'pdf ('file.pdf'); ## здесь код сюжета; dev.off() ', где вы можете настроить высоту и ширину, чтобы быть тем, что вам нужно. или использовать меньшее количество панелей на странице, например 'mfrow = c (2,2)' или что-то – rawr

+0

Прочитайте '? par' и найдите' 'mar''. Однако со сложностью меток x-axis ваших графов примечание @ rawr будет по-прежнему (или даже более того) применимым. – r2evans

ответ

1

Мой новый код, который я изменил

lab=unique(train_train$PdDistrict) 
lab=as.character(lab) 
par(mfrow=c(1,2),mar=c(9,4,1,0)) 

for(i in 1:length(lab)) 
{ 

    a=plot(table(train_train[train_train$PdDistrict==lab[i],1]),las=2,main=lab[i]) 
} 

enter image description here

Теперь она выглядит намного лучше.