r - Error when changing axis format with scale_x_date -


dear fellow homo sapiens,

i've created this graph using code below (except without + scale_x_date).

the data-set i've used found here. looks this:

gfc1cari<-read.csv("demo.csv") head(gfc1cari) x xx variable value var 1 1 2008-07-17 financials 0.001772705 financ 2 2 2008-07-18 financials 0.017306086 financ 3 3 2008-07-21 financials 0.010745136 financ 4 4 2008-07-22 financials 0.021152194 financ 5 5 2008-07-23 financials 0.031195805 financ 6 6 2008-07-24 financials 0.026534444 financ

as you'll see in picture, x-axis displays dates such "aug", "sep" .... . however, want similar "08/2007", "09/2007" ... . so, attempt @ doing displayed below, doesn't work. 

p <- ggplot(data=gfc1cari,aes(x=xx, y=value, colour=var)) + geom_line() + opts(legend.position = "none") + xlab(" ") + ylab("cumulative abnormal return") + scale_x_date(labels = date_format("%m/%y"),breaks = "1 month") p <- direct.label(p+xlim(min(gfc1cari$xx), max(gfc1cari$xx)+20))

i've tried many other variation of breaks = ?? , date_format , can't %m/%y show, it'll "aug" .. "sep" .. "oct". requested joran:

> str(gfc1cari) 'data.frame': 1730 obs. of 5 variables: $ x : int 1 2 3 4 5 6 7 8 9 10 ... $ xx : posixct, format: "2008-07-17" "2008-07-18" "2008-07-21" "2008-07-22" ... $ variable: factor w/ 10 levels "financials","industrials",..: 1 1 1 1 1 1 1 1 1 1 ... $ value : num 0.00177 0.01731 0.01075 0.02115 0.0312 ... $ var : chr "financ" "financ" "financ" "financ" ...

i've tried change date formate posixct as.date follows:

gfc1cari[,2]<-as.date(gfc1cari[,2]) str(gfc1cari) 'data.frame': 1730 obs. of 5 variables: $ x : int 1 2 3 4 5 6 7 8 9 10 ... $ xx : date, format: "2008-07-16" "2008-07-17" ... $ variable: factor w/ 10 levels "financials","industrials",..: 1 1 1 1 1 1 1 1 1 1 ... $ value : num 0.000983 0.015822 0.008339 0.017987 0.027186 ... $ var : chr "financ" "financ" "financ" "financ" ...

this doesn't fix situation. instead x-axis { "oct", "jan", "apr" }, , that's it.

thanks everyone.

my apologies, being dense. thought error getting happening before attempt use directlabels, not after.

the call xlim stomping on x axis formatting. put scale_x_date call inside direct.labels command works me:

p <- direct.label(p + xlim(min(dat$xx), max(dat$xx)+20) + scale_x_date(labels = date_format("%m/%y"),breaks = "1 month"))

enter image description here


Comments

Post a Comment

Popular posts from this blog

javascript - backbone.js Collection.add() doesn't `construct` (`initialize`) an object -

<!doctype html public "-//w3c//dtd xhtml 1.0 strict//en" "http://www.w3.org/tr/xhtml1/dtd/xhtml1-strict.dtd"> <html> <head> <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.7.2/jquery.min.js"></script> <script src="http://documentcloud.github.com/underscore/underscore-min.js"></script> <script src="http://documentcloud.github.com/backbone/backbone-min.js"></script> </head> <body> <button id="cmd_create_event" name="cmd_create_event" type="button">create new `event`</button> <script type="text/javascript"> var eventmodel = backbone.model.extend({ initialize : function() { console.log("`event` initialized. id: " + this.cid); this.bind("change:status", function() { console.log(this.get("status") + " value `status`"); }); this.bind("error", function(model, e...
Read more

php - Get uncommon values from two or more arrays -

is there function in php give array of uncommon values 2 or more arrays? for example: $array1 = array( "green", "red", "blue"); $array2 = array( "green", "yellow", "red"); .... $result = function_needed($array1, $array2,...); print_r($result); should give output: array("blue", "yellow", ...); use array_diff , array_merge : $result = array_merge(array_diff($array1, $array2), array_diff($array2, $array1)); here's demo. for multiple arrays, combine callback , array_reduce : function unique(&$a, $b) { return $a ? array_merge(array_diff($a, $b), array_diff($b, $a)) : $b; } $arrays = array( array('green', 'red', 'blue'), array('green', 'yellow', 'red') ); $result = array_reduce($arrays, 'unique'); and here's demo of that.
Read more

Adding duplicate array rows in Php -

i create function in php adds rows of array shared column value. so input. $test = array( array("c", 5, 6), array("c", 2, 3), array("test", 5, 6) ); and output. $testduplicatefree = array( array("c", 7, 9), array("test", 5, 6) ) ); i'm thinking function combine_duplicates($array,$col){ ... ... return $duplicatefreearray; } where $col duplicate free array. so, in case, combine_duplicates($test,0); would me desired output. this. <?php function combine_duplicates($array,$col) { $index = array(); foreach ($array $row) { $key = $row[$col]; if (!isset($index[$key])) { $index[$key] = $row; } else { ($i = 0; $i < count($row); ++$i) { if ($i != $col) { $index[$key][$i] += $row[$i]; } } } } return array_values($index); } $array = array( array("c", 5, 6), array("c", 2, 3), array("test", 5, 6) ); print_r(combine_duplicates($array, 0)); try here: http://codepad.org/mdhesqhi
Read more