首页 文章

在ggplot2中按照数值顺序排列x轴的标签[重复]

提问于
浏览
2

这个问题在这里已有答案:

我遇到的问题是ggplot2正在使用我的因子变量的标签并按字母顺序排序:而不是常规1,2,3,...,19,20它变为1,10,11,..., 8,9 . 那些标签值是按数字排序的,所以我想保留它们的数字顺序 . 有趣的是,ggplot2并没有改变我所有情节的顺序,但我无法确定原因 .

这是我的例子(重新排序因子):

#Dataframes with my data

    df1<-structure(list(var = structure(c(13L, 21L, 14L, 20L, 15L, 19L, 
15L, 19L, 14L, 21L, 19L, 21L, 21L, 18L, 19L, 21L, 19L, 14L, 21L, 
21L, 18L, 18L, 16L, 19L, 19L, 15L, 21L, 21L, 20L, 12L, 20L, 13L, 
20L, 14L, 19L, 14L, 18L, 13L, 21L, 18L, 20L, 21L, 16L, 19L, 21L, 
19L, 14L, 21L, 21L, 16L, 17L, 15L, 19L, 18L, 14L, 21L, 21L, 20L, 
10L, 19L, 9L, 18L, 9L, 17L, 10L, 13L, 9L, 19L, 14L, 18L, 19L, 
12L, 15L, 21L, 15L, 11L, 20L, 19L, 10L, 13L, 13L, 15L, 15L, 13L, 
21L, 21L, 18L, 15L, 21L, 14L, 21L, 15L, 20L, 16L, 18L, 15L, 21L, 
19L, 21L, 21L, 17L, 19L, 21L, 19L, 16L, 21L, 21L, 15L, 18L, 18L, 
19L, 19L, 18L, 21L, 21L, 21L, 12L, 20L, 14L, 20L, 15L, 21L, 16L, 
21L, 16L, 21L, 18L, 21L, 21L, 16L, 19L, 21L, 20L, 17L, 21L, 21L, 
16L, 18L, 17L, 20L, 20L, 17L, 21L, 21L, 21L, 21L, 14L, 21L, 16L, 
21L), .Label = c("1", "2", "3", "4", "5", "6", "7", "8", "9", 
"10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20", 
"21", "22"), class = "factor"), mod = c(1.00085320097232, 0.983799236755741, 
0.999021834640581, 0.985966169712423, 0.997517466666048, 0.989925820179825, 
0.997690971078398, 0.990613583427106, 0.999269305935753, 0.984733380794849, 
0.990776002248053, 0.984571728046385, 0.981286505772827, 0.992668559258466, 
0.98882425989506, 0.980020311111573, 0.988802790209461, 0.999092759197013, 
0.983769390705821, 0.983079755458444, 0.992881959366547, 0.992490394137259, 
0.995220587055765, 0.989352556519739, 0.991050300097109, 0.997890240400418, 
0.973313759690094, 0.976272073418161, 0.987027958906971, 1.0027659361555, 
0.985726733528214, 1.00138595619949, 0.988000713704551, 0.999529568889752, 
0.990497982605707, 0.999028886979944, 0.992719213547987, 1.00041521639887, 
0.984643439115305, 0.992063383679324, 0.986103466394401, 0.98266800360026, 
0.994918877843687, 0.990948196101149, 0.980983356931702, 0.990847404545752, 
0.999974270713516, 0.984913756799606, 0.984404797639798, 0.996263406321717, 
0.99408186608625, 0.996796935957794, 0.990534807040301, 0.992372803345729, 
0.99900673620916, 0.975336985470914, 0.977148682610603, 0.987880477729105, 
1.00590649163168, 0.989771514776825, 1.00780619287412, 0.991586859129135, 
1.0071417052493, 0.994233066700575, 1.0047918709384, 1.00053113909975, 
1.0066746000826, 0.989278460343596, 0.998753654081146, 0.991816067103673, 
0.990690375727478, 1.00211962621255, 0.998150543715061, 0.984751882887788, 
0.997386898093705, 1.00361468274586, 0.988322918041743, 0.988810477257792, 
1.00594541898852, 1.00096785177224, 1.00080296512135, 0.996934910462889, 
0.996878827147476, 1.00029065201754, 0.978503193342591, 0.980703643525914, 
0.992105333717596, 0.998282717437973, 0.982872351917007, 0.998809487332376, 
0.984115879655268, 0.997838360290591, 0.987231298924994, 0.996010019868602, 
0.992048256844709, 0.998259498113374, 0.982773883437325, 0.990268824715062, 
0.984508117312714, 0.983729503750958, 0.99360208564058, 0.98999861372894, 
0.978059879420204, 0.989081253502619, 0.995652587554496, 0.981280875901191, 
0.981623777643685, 0.996721335719507, 0.992497882676074, 0.993046421047081, 
0.988755919954368, 0.989232458005766, 0.992937858352865, 0.972547543124041, 
0.974619875850771, 0.985382561699533, 1.00240625434892, 0.985828223388321, 
0.999815368367156, 0.98646588341636, 0.997025863464747, 0.98553712475649, 
0.99550537100776, 0.985185290197646, 0.994959310107694, 0.980529854063247, 
0.992481393265307, 0.984536389883072, 0.985070705355204, 0.9949514147155, 
0.991077687690396, 0.980414970228045, 0.98723517731121, 0.994066429479647, 
0.983135643243082, 0.982822586214233, 0.995451451368164, 0.99312465978728, 
0.993827129587088, 0.985846032126488, 0.986318914894866, 0.994164797628927, 
0.974434055919853, 0.973229511503257, 0.983681222736799, 0.97490232753215, 
0.998489782359852, 0.983492094660751, 0.995942503398888, 0.982502348464547
), low = c(1.00008962426941, 0.973856897337124, 0.998493699796719, 
0.985752014137461, 0.996817199922311, 0.988851347545285, 0.996817199922311, 
0.988851347545285, 0.998493699796719, 0.973856897337124, 0.988851347545285, 
0.973856897337124, 0.973856897337124, 0.99148788682308, 0.988851347545285, 
0.973856897337124, 0.988851347545285, 0.998493699796719, 0.973856897337124, 
0.973856897337124, 0.99148788682308, 0.99148788682308, 0.994925479951989, 
0.988851347545285, 0.988851347545285, 0.996817199922311, 0.973856897337124, 
0.973856897337124, 0.985752014137461, 1.00165033860141, 0.985752014137461, 
1.00008962426941, 0.985752014137461, 0.998493699796719, 0.988851347545285, 
0.998493699796719, 0.99148788682308, 1.00008962426941, 0.973856897337124, 
0.99148788682308, 0.985752014137461, 0.973856897337124, 0.994925479951989, 
0.988851347545285, 0.973856897337124, 0.988851347545285, 0.998493699796719, 
0.973856897337124, 0.973856897337124, 0.994925479951989, 0.993252734657271, 
0.996817199922311, 0.988851347545285, 0.99148788682308, 0.998493699796719, 
0.973856897337124, 0.973856897337124, 0.985752014137461, 1.00468196577565, 
0.988851347545285, 1.00639609166503, 0.99148788682308, 1.00639609166503, 
0.993252734657271, 1.00468196577565, 1.00008962426941, 1.00639609166503, 
0.988851347545285, 0.998493699796719, 0.99148788682308, 0.988851347545285, 
1.00165033860141, 0.996817199922311, 0.973856897337124, 0.996817199922311, 
1.00305217148501, 0.985752014137461, 0.988851347545285, 1.00468196577565, 
1.00008962426941, 1.00008962426941, 0.996817199922311, 0.996817199922311, 
1.00008962426941, 0.973856897337124, 0.973856897337124, 0.99148788682308, 
0.996817199922311, 0.973856897337124, 0.998493699796719, 0.973856897337124, 
0.996817199922311, 0.985752014137461, 0.994925479951989, 0.99148788682308, 
0.996817199922311, 0.973856897337124, 0.988851347545285, 0.973856897337124, 
0.973856897337124, 0.993252734657271, 0.988851347545285, 0.973856897337124, 
0.988851347545285, 0.994925479951989, 0.973856897337124, 0.973856897337124, 
0.996817199922311, 0.99148788682308, 0.99148788682308, 0.988851347545285, 
0.988851347545285, 0.99148788682308, 0.973856897337124, 0.973856897337124, 
0.973856897337124, 1.00165033860141, 0.985752014137461, 0.998493699796719, 
0.985752014137461, 0.996817199922311, 0.973856897337124, 0.994925479951989, 
0.973856897337124, 0.994925479951989, 0.973856897337124, 0.99148788682308, 
0.973856897337124, 0.973856897337124, 0.994925479951989, 0.988851347545285, 
0.973856897337124, 0.985752014137461, 0.993252734657271, 0.973856897337124, 
0.973856897337124, 0.994925479951989, 0.99148788682308, 0.993252734657271, 
0.985752014137461, 0.985752014137461, 0.993252734657271, 0.973856897337124, 
0.973856897337124, 0.973856897337124, 0.973856897337124, 0.998493699796719, 
0.973856897337124, 0.994925479951989, 0.973856897337124), high = c(1.00148023477861, 
0.985302892335616, 0.999913842511162, 0.98849687390284, 0.998355355424634, 
0.991266639058593, 0.998355355424634, 0.991266639058593, 0.999913842511162, 
0.985302892335616, 0.991266639058593, 0.985302892335616, 0.985302892335616, 
0.993099642276173, 0.991266639058593, 0.985302892335616, 0.991266639058593, 
0.999913842511162, 0.985302892335616, 0.985302892335616, 0.993099642276173, 
0.993099642276173, 0.996587804927349, 0.991266639058593, 0.991266639058593, 
0.998355355424634, 0.985302892335616, 0.985302892335616, 0.98849687390284, 
1.00289415242267, 0.98849687390284, 1.00148023477861, 0.98849687390284, 
0.999913842511162, 0.991266639058593, 0.999913842511162, 0.993099642276173, 
1.00148023477861, 0.985302892335616, 0.993099642276173, 0.98849687390284, 
0.985302892335616, 0.996587804927349, 0.991266639058593, 0.985302892335616, 
0.991266639058593, 0.999913842511162, 0.985302892335616, 0.985302892335616, 
0.996587804927349, 0.994701266808039, 0.998355355424634, 0.991266639058593, 
0.993099642276173, 0.999913842511162, 0.985302892335616, 0.985302892335616, 
0.98849687390284, 1.00621846681864, 0.991266639058593, 1.00792911808258, 
0.993099642276173, 1.00792911808258, 0.994701266808039, 1.00621846681864, 
1.00148023477861, 1.00792911808258, 0.991266639058593, 0.999913842511162, 
0.993099642276173, 0.991266639058593, 1.00289415242267, 0.998355355424634, 
0.985302892335616, 0.998355355424634, 1.00448351173732, 0.98849687390284, 
0.991266639058593, 1.00621846681864, 1.00148023477861, 1.00148023477861, 
0.998355355424634, 0.998355355424634, 1.00148023477861, 0.985302892335616, 
0.985302892335616, 0.993099642276173, 0.998355355424634, 0.985302892335616, 
0.999913842511162, 0.985302892335616, 0.998355355424634, 0.98849687390284, 
0.996587804927349, 0.993099642276173, 0.998355355424634, 0.985302892335616, 
0.991266639058593, 0.985302892335616, 0.985302892335616, 0.994701266808039, 
0.991266639058593, 0.985302892335616, 0.991266639058593, 0.996587804927349, 
0.985302892335616, 0.985302892335616, 0.998355355424634, 0.993099642276173, 
0.993099642276173, 0.991266639058593, 0.991266639058593, 0.993099642276173, 
0.985302892335616, 0.985302892335616, 0.985302892335616, 1.00289415242267, 
0.98849687390284, 0.999913842511162, 0.98849687390284, 0.998355355424634, 
0.985302892335616, 0.996587804927349, 0.985302892335616, 0.996587804927349, 
0.985302892335616, 0.993099642276173, 0.985302892335616, 0.985302892335616, 
0.996587804927349, 0.991266639058593, 0.985302892335616, 0.98849687390284, 
0.994701266808039, 0.985302892335616, 0.985302892335616, 0.996587804927349, 
0.993099642276173, 0.994701266808039, 0.98849687390284, 0.98849687390284, 
0.994701266808039, 0.985302892335616, 0.985302892335616, 0.985302892335616, 
0.985302892335616, 0.999913842511162, 0.985302892335616, 0.996587804927349, 
0.985302892335616), var_ori = structure(c(13L, 21L, 14L, 20L, 
15L, 19L, 15L, 19L, 14L, 21L, 19L, 21L, 21L, 18L, 19L, 21L, 19L, 
14L, 21L, 21L, 18L, 18L, 16L, 19L, 19L, 15L, 21L, 21L, 20L, 12L, 
20L, 13L, 20L, 14L, 19L, 14L, 18L, 13L, 21L, 18L, 20L, 21L, 16L, 
19L, 21L, 19L, 14L, 21L, 21L, 16L, 17L, 15L, 19L, 18L, 14L, 21L, 
21L, 20L, 10L, 19L, 9L, 18L, 9L, 17L, 10L, 13L, 9L, 19L, 14L, 
18L, 19L, 12L, 15L, 21L, 15L, 11L, 20L, 19L, 10L, 13L, 13L, 15L, 
15L, 13L, 21L, 21L, 18L, 15L, 21L, 14L, 21L, 15L, 20L, 16L, 18L, 
15L, 21L, 19L, 21L, 21L, 17L, 19L, 21L, 19L, 16L, 21L, 21L, 15L, 
18L, 18L, 19L, 19L, 18L, 21L, 21L, 21L, 12L, 20L, 14L, 20L, 15L, 
21L, 16L, 21L, 16L, 21L, 18L, 21L, 21L, 16L, 19L, 21L, 20L, 17L, 
21L, 21L, 16L, 18L, 17L, 20L, 20L, 17L, 21L, 21L, 21L, 21L, 14L, 
21L, 16L, 21L), .Label = c("0.86", "[1.15,3.11)", "[3.11,3.47)", 
"[3.47,3.77)", "[3.77,4.02)", "[4.02,4.21)", "[4.21,4.41)", "[4.41,4.57)", 
"[4.57,4.75)", "[4.75,4.93)", "[4.93,5.09)", "[5.09,5.24)", "[5.24,5.41)", 
"[5.41,5.58)", "[5.58,5.77)", "[5.77,5.98)", "[5.98,6.17)", "[6.17,6.38)", 
"[6.38,6.70)", "[6.70,7.08)", "[7.08,9.28)", "[9.28,9.54]"), class = "factor")), .Names = c("var", 
"mod", "low", "high", "var_ori"), row.names = c(NA, 150L), class = "data.frame")

    df2<-structure(list(var = structure(c(11L, 19L, 10L, 19L, 10L, 18L, 
12L, 14L, 10L, 19L, 15L, 18L, 19L, 13L, 16L, 20L, 16L, 12L, 20L, 
19L, 11L, 14L, 14L, 16L, 16L, 14L, 20L, 20L, 18L, 10L, 19L, 12L, 
19L, 14L, 19L, 15L, 19L, 14L, 20L, 17L, 20L, 19L, 15L, 18L, 20L, 
19L, 16L, 20L, 20L, 14L, 15L, 16L, 19L, 18L, 14L, 20L, 20L, 19L, 
20L, 11L, 19L, 13L, 19L, 14L, 20L, 15L, 20L, 16L, 20L, 17L, 20L, 
20L, 16L, 18L, 20L, 19L, 16L, 20L, 20L, 15L, 17L, 16L, 20L, 19L, 
16L, 20L, 20L, 20L, 20L, 11L, 19L, 12L, 19L, 13L, 19L, 14L, 20L, 
14L, 20L, 16L, 20L, 19L, 14L, 16L, 20L, 18L, 15L, 20L, 19L, 14L, 
15L, 15L, 19L, 18L, 15L, 20L, 20L, 19L, 20L, 9L, 19L, 12L, 18L, 
12L, 19L, 13L, 19L, 13L, 20L, 15L, 19L, 18L, 13L, 15L, 20L, 18L, 
14L, 19L, 19L, 13L, 14L, 14L, 18L, 18L, 13L, 20L, 20L, 18L, 20L, 
2L), .Label = c("1", "2", "3", "4", "5", "6", "7", "8", "9", 
"10", "11", "12", "13", "14", "15", "16", "17", "18", "19", "20"
), class = "factor"), mod = c(0.999776431730114, 0.986727662740201, 
1.00023630560784, 0.989171891730747, 1.00009434915076, 0.992232386050353, 
0.999468360916685, 0.997484810397401, 1.0000242641676, 0.985835480467107, 
0.996395671266124, 0.989568711931697, 0.98797231320128, 0.998383497318398, 
0.995852026211342, 0.978199451029572, 0.995277924515125, 0.999060954379668, 
0.98447913810294, 0.985193141484994, 0.999828711660704, 0.997727027911407, 
0.997636253551257, 0.994971350397964, 0.994866886453903, 0.997522933684193, 
0.963863040667508, 0.969512816146659, 0.989939681720488, 1.00020365455916, 
0.986150964091569, 0.999116164627643, 0.987392959468332, 0.998190851966455, 
0.988490528069752, 0.997167366641329, 0.98672574005535, 0.997418868029662, 
0.976032948557903, 0.993239873949519, 0.984875316545771, 0.985429920362902, 
0.996068676789879, 0.992216868519829, 0.976403464232568, 0.98698177476738, 
0.995120083679956, 0.981855635405889, 0.983433650250075, 0.997392558818255, 
0.996122313122368, 0.995273755399623, 0.98777563018575, 0.990591312786413, 
0.997233224721132, 0.964659274811211, 0.960231139418912, 0.988393148627114, 
0.966201379766396, 0.999750797367541, 0.985079357898489, 0.99873029740055, 
0.985837046076991, 0.997307855657763, 0.98460772946944, 0.996178620866654, 
0.983665621115944, 0.995727313711604, 0.974758009167725, 0.993582444777839, 
0.982739005059511, 0.983628917548309, 0.995739913209549, 0.992022304088441, 
0.974515090030568, 0.987087288794565, 0.995003570881205, 0.980159493575185, 
0.979617658658512, 0.996179921589942, 0.994122761079012, 0.994753741238143, 
0.984869174548967, 0.98589230974564, 0.995189703304288, 0.959289949527194, 
0.955987653881928, 0.982685774130364, 0.961014411592437, 0.999732517183056, 
0.986337128524806, 0.999211772799094, 0.988809952792023, 0.998352328778159, 
0.988831932651434, 0.997441689661469, 0.98441032959034, 0.997877910557652, 
0.97722737404137, 0.994640918160321, 0.984096656227718, 0.988961430670896, 
0.998257322516557, 0.99567346076362, 0.984117074088852, 0.989803848655887, 
0.996389604288659, 0.982814172218141, 0.985210306292689, 0.997968260095857, 
0.996355602688329, 0.996840299318173, 0.98836202594914, 0.989510973501589, 
0.996715217048015, 0.95906172894744, 0.952300547761713, 0.98531967559576, 
0.963626819114621, 1.00040336526581, 0.987897539590952, 0.999245662827765, 
0.990612915734394, 0.999307786957358, 0.989096279548965, 0.998860996127054, 
0.988260217915671, 0.998825981238456, 0.982488720347447, 0.996847841884664, 
0.987551240848546, 0.989763617193185, 0.998761846507044, 0.996405919362226, 
0.984010764066075, 0.991766155385054, 0.997972236867794, 0.986482203358589, 
0.985929893190579, 0.998624759552253, 0.997721230882173, 0.997903330728556, 
0.990613258105199, 0.9912262231538, 0.998718980682088, 0.971295852761292, 
0.966483279298645, 0.99070318552007, 0.97126608277427, 0.99454864691887
), low = c(0.99962264333467, 0.985207731571535, 1.00002427886981, 
0.985207731571535, 1.00002427886981, 0.989849772581204, 0.999056092772957, 
0.997306703342966, 1.00002427886981, 0.985207731571535, 0.996018377275769, 
0.989849772581204, 0.985207731571535, 0.998307553959348, 0.994557546712157, 
0.959634718409053, 0.994557546712157, 0.999056092772957, 0.959634718409053, 
0.985207731571535, 0.99962264333467, 0.997306703342966, 0.997306703342966, 
0.994557546712157, 0.994557546712157, 0.997306703342966, 0.959634718409053, 
0.959634718409053, 0.989849772581204, 1.00002427886981, 0.985207731571535, 
0.999056092772957, 0.985207731571535, 0.997306703342966, 0.985207731571535, 
0.996018377275769, 0.985207731571535, 0.997306703342966, 0.959634718409053, 
0.992793233455545, 0.959634718409053, 0.985207731571535, 0.996018377275769, 
0.989849772581204, 0.959634718409053, 0.985207731571535, 0.994557546712157, 
0.959634718409053, 0.959634718409053, 0.997306703342966, 0.996018377275769, 
0.994557546712157, 0.985207731571535, 0.989849772581204, 0.997306703342966, 
0.959634718409053, 0.959634718409053, 0.985207731571535, 0.959634718409053, 
0.99962264333467, 0.985207731571535, 0.998307553959348, 0.985207731571535, 
0.997306703342966, 0.959634718409053, 0.996018377275769, 0.959634718409053, 
0.994557546712157, 0.959634718409053, 0.992793233455545, 0.959634718409053, 
0.959634718409053, 0.994557546712157, 0.989849772581204, 0.959634718409053, 
0.985207731571535, 0.994557546712157, 0.959634718409053, 0.959634718409053, 
0.996018377275769, 0.992793233455545, 0.994557546712157, 0.959634718409053, 
0.985207731571535, 0.994557546712157, 0.959634718409053, 0.959634718409053, 
0.959634718409053, 0.959634718409053, 0.99962264333467, 0.985207731571535, 
0.999056092772957, 0.985207731571535, 0.998307553959348, 0.985207731571535, 
0.997306703342966, 0.959634718409053, 0.997306703342966, 0.959634718409053, 
0.994557546712157, 0.959634718409053, 0.985207731571535, 0.997306703342966, 
0.994557546712157, 0.959634718409053, 0.989849772581204, 0.996018377275769, 
0.959634718409053, 0.985207731571535, 0.997306703342966, 0.996018377275769, 
0.996018377275769, 0.985207731571535, 0.989849772581204, 0.996018377275769, 
0.959634718409053, 0.959634718409053, 0.985207731571535, 0.959634718409053, 
1.00032142854411, 0.985207731571535, 0.999056092772957, 0.989849772581204, 
0.999056092772957, 0.985207731571535, 0.998307553959348, 0.985207731571535, 
0.998307553959348, 0.959634718409053, 0.996018377275769, 0.985207731571535, 
0.989849772581204, 0.998307553959348, 0.996018377275769, 0.959634718409053, 
0.989849772581204, 0.997306703342966, 0.985207731571535, 0.985207731571535, 
0.998307553959348, 0.997306703342966, 0.997306703342966, 0.989849772581204, 
0.989849772581204, 0.998307553959348, 0.959634718409053, 0.959634718409053, 
0.989849772581204, 0.959634718409053, 0.994304341619655), high = c(0.999987725709517, 
0.989104505288002, 1.00029004593091, 0.989104505288002, 1.00029004593091, 
0.992526041900909, 0.999580726942107, 0.998201677880488, 1.00029004593091, 
0.989104505288002, 0.997171743948177, 0.992526041900909, 0.989104505288002, 
0.998992364213859, 0.995823926135333, 0.98483423431047, 0.995823926135333, 
0.999580726942107, 0.98483423431047, 0.989104505288002, 0.999987725709517, 
0.998201677880488, 0.998201677880488, 0.995823926135333, 0.995823926135333, 
0.998201677880488, 0.98483423431047, 0.98483423431047, 0.992526041900909, 
1.00029004593091, 0.989104505288002, 0.999580726942107, 0.989104505288002, 
0.998201677880488, 0.989104505288002, 0.997171743948177, 0.989104505288002, 
0.998201677880488, 0.98483423431047, 0.994401182193857, 0.98483423431047, 
0.989104505288002, 0.997171743948177, 0.992526041900909, 0.98483423431047, 
0.989104505288002, 0.995823926135333, 0.98483423431047, 0.98483423431047, 
0.998201677880488, 0.997171743948177, 0.995823926135333, 0.989104505288002, 
0.992526041900909, 0.998201677880488, 0.98483423431047, 0.98483423431047, 
0.989104505288002, 0.98483423431047, 0.999987725709517, 0.989104505288002, 
0.998992364213859, 0.989104505288002, 0.998201677880488, 0.98483423431047, 
0.997171743948177, 0.98483423431047, 0.995823926135333, 0.98483423431047, 
0.994401182193857, 0.98483423431047, 0.98483423431047, 0.995823926135333, 
0.992526041900909, 0.98483423431047, 0.989104505288002, 0.995823926135333, 
0.98483423431047, 0.98483423431047, 0.997171743948177, 0.994401182193857, 
0.995823926135333, 0.98483423431047, 0.989104505288002, 0.995823926135333, 
0.98483423431047, 0.98483423431047, 0.98483423431047, 0.98483423431047, 
0.999987725709517, 0.989104505288002, 0.999580726942107, 0.989104505288002, 
0.998992364213859, 0.989104505288002, 0.998201677880488, 0.98483423431047, 
0.998201677880488, 0.98483423431047, 0.995823926135333, 0.98483423431047, 
0.989104505288002, 0.998201677880488, 0.995823926135333, 0.98483423431047, 
0.992526041900909, 0.997171743948177, 0.98483423431047, 0.989104505288002, 
0.998201677880488, 0.997171743948177, 0.997171743948177, 0.989104505288002, 
0.992526041900909, 0.997171743948177, 0.98483423431047, 0.98483423431047, 
0.989104505288002, 0.98483423431047, 1.00046097281219, 0.989104505288002, 
0.999580726942107, 0.992526041900909, 0.999580726942107, 0.989104505288002, 
0.998992364213859, 0.989104505288002, 0.998992364213859, 0.98483423431047, 
0.997171743948177, 0.989104505288002, 0.992526041900909, 0.998992364213859, 
0.997171743948177, 0.98483423431047, 0.992526041900909, 0.998201677880488, 
0.989104505288002, 0.989104505288002, 0.998992364213859, 0.998201677880488, 
0.998201677880488, 0.992526041900909, 0.992526041900909, 0.998992364213859, 
0.98483423431047, 0.98483423431047, 0.992526041900909, 0.98483423431047, 
0.996555288394208), var_ori = structure(c(11L, 19L, 10L, 19L, 
10L, 18L, 12L, 14L, 10L, 19L, 15L, 18L, 19L, 13L, 16L, 20L, 16L, 
12L, 20L, 19L, 11L, 14L, 14L, 16L, 16L, 14L, 20L, 20L, 18L, 10L, 
19L, 12L, 19L, 14L, 19L, 15L, 19L, 14L, 20L, 17L, 20L, 19L, 15L, 
18L, 20L, 19L, 16L, 20L, 20L, 14L, 15L, 16L, 19L, 18L, 14L, 20L, 
20L, 19L, 20L, 11L, 19L, 13L, 19L, 14L, 20L, 15L, 20L, 16L, 20L, 
17L, 20L, 20L, 16L, 18L, 20L, 19L, 16L, 20L, 20L, 15L, 17L, 16L, 
20L, 19L, 16L, 20L, 20L, 20L, 20L, 11L, 19L, 12L, 19L, 13L, 19L, 
14L, 20L, 14L, 20L, 16L, 20L, 19L, 14L, 16L, 20L, 18L, 15L, 20L, 
19L, 14L, 15L, 15L, 19L, 18L, 15L, 20L, 20L, 19L, 20L, 9L, 19L, 
12L, 18L, 12L, 19L, 13L, 19L, 13L, 20L, 15L, 19L, 18L, 13L, 15L, 
20L, 18L, 14L, 19L, 19L, 13L, 14L, 14L, 18L, 18L, 13L, 20L, 20L, 
18L, 20L, 2L), .Label = c("[1.15,3.11)", "[3.11,3.47)", "[3.47,3.77)", 
"[3.77,4.02)", "[4.02,4.21)", "[4.21,4.41)", "[4.41,4.57)", "[4.57,4.75)", 
"[4.75,4.93)", "[4.93,5.09)", "[5.09,5.24)", "[5.24,5.41)", "[5.41,5.58)", 
"[5.58,5.77)", "[5.77,5.98)", "[5.98,6.17)", "[6.17,6.38)", "[6.38,6.70)", 
"[6.70,7.08)", "[7.08,9.28]"), class = "factor")), .Names = c("var", 
"mod", "low", "high", "var_ori"), row.names = c(NA, 150L), class = "data.frame")

    labels<-c(0.86, 2.13, 3.29, 3.62, 3.895, 4.115, 4.31, 4.49, 4.66, 4.84, 
    5.01, 5.165, 5.325, 5.495, 5.675, 5.875, 6.075, 6.275, 6.54, 
    6.89, 8.18, 9.41)

    #Graph:

    graph<-ggplot(df2, aes(var,mod, group=1))+ 
      geom_smooth(aes(color="red"), se=F, linetype="dotted", size=1)+ 
      geom_line(data=df2,aes(var,low, color="red4"), size=1)+
      geom_line(data=df2,aes(var,high, color="red4"), size=1)+
      geom_ribbon(data=df2, aes(var,ymin=low,ymax=high), fill="lightpink", alpha=0.4)+

      geom_smooth(data=df1, aes(var,mod, group=1, color="green"), se=F, linetype="dotted", size=1)+ 
      geom_line(data=df1,aes(var,high, color="green4"), size=1)+
      geom_line(data=df1,aes(var,low, color="green4"), size=1)+
      geom_ribbon(data=df1, aes(var,ymin=low,ymax=high), fill="chartreuse1", alpha=0.4)+
      ylim(min(df2$low,df1$low),max(df2$high,df1$high))+
      scale_colour_manual(name = 'Legend', 
                          values =c('red'='red','green'='green', 'green4'='green4', 'red4'='red4'), labels = c('1','interval-1','2','interval-2'))+
      scale_size_area() + 
      xlab("mod var") +
      ylab(expression(f[Tmax.an]))+
      labs(title='Mod Var 1 2')

    graph<-graph + theme(axis.title.y=element_text(size=18)) + theme(axis.title.y=element_text(size=18)) + scale_x_discrete(breaks=c(1:22), labels=c(paste(labels)))

任何有关此事的帮助将不胜感激!先感谢您 .

1 回答

  • 1

    这似乎对我来说很好:

    df1b <- df1
    df2b <- df2
    df1b$var <- as.integer(as.character(df1b$var))
    df2b$var <- as.integer(as.character(df2b$var))
    
    graph<-ggplot(df2b, aes(var,mod, group=1))+ 
        geom_smooth(aes(color="red"), se=F, linetype="dotted", size=1)+ 
        geom_line(data=df2b,aes(var,low, color="red4"), size=1)+
        geom_line(data=df2b,aes(var,high, color="red4"), size=1)+
        geom_ribbon(data=df2b, aes(var,ymin=low,ymax=high), fill="lightpink", alpha=0.4)+
    
        geom_smooth(data=df1b, aes(var,mod, group=1, color="green"), se=F, linetype="dotted", size=1)+ 
        geom_line(data=df1b,aes(var,high, color="green4"), size=1)+
        geom_line(data=df1b,aes(var,low, color="green4"), size=1)+
        geom_ribbon(data=df1b, aes(var,ymin=low,ymax=high), fill="chartreuse1", alpha=0.4)+
        ylim(min(df2b$low,df1b$low),max(df2b$high,df1b$high))+
        scale_colour_manual(name = 'Legend', 
                                                values =c('red'='red','green'='green', 'green4'='green4', 'red4'='red4'), 
                                                labels = c('1','interval-1','2','interval-2'))+
        scale_size_area() + 
        xlab("mod var") +
        ylab(expression(f[Tmax.an]))+
        labs(title='Mod Var 1 2')
    

相关问题