r - Fitting a plot with multi-line y labels -


i implementing analysis in r: download dataset, creation of zoo object , plot dataset.

library(tseries) library(zoo)  start <- "2011-01-01" end <- "2014-12-31"  met <- get.hist.quote("met", quote="close", start=start, end=end) mhk <- get.hist.quote("mhk", quote="close", start=start, end=end) mjn <- get.hist.quote("mjn", quote="close", start=start, end=end) mkc <- get.hist.quote("mkc", quote="close", start=start, end=end) mlm <- get.hist.quote("mlm", quote="close", start=start, end=end) mmc <- get.hist.quote("mmc", quote="close", start=start, end=end) mmm <- get.hist.quote("mmm", quote="close", start=start, end=end) mnk <- get.hist.quote("mnk", quote="close", start=start, end=end) mnst <- get.hist.quote("mnst", quote="close", start=start, end=end) mo <- get.hist.quote("mo", quote="close", start=start, end=end)   mon <- get.hist.quote("mon", quote="close", start=start, end=end)   mos <- get.hist.quote("mos", quote="close", start=start, end=end)   mpc <- get.hist.quote("mpc", quote="close", start=start, end=end)  mrk <- get.hist.quote("mrk", quote="close", start=start, end=end)   mro <- get.hist.quote("mro", quote="close", start=start, end=end)  series <- zoo(cbind(met, mhk, mjn, mkc, mlm, mmc, mmm, mnk, mnst, mo,                     mon, mos, mpc, mrk, mro)) colnames(series) <- c("metlife", "mohawk", "\nmead\njohnson",                       "mccormick", "martin\nmarietta",                        "marsh and\nmclennan", "3m", "mallinckrodt",                         "monster\nbeverage", "altria", "monsanto",                        "the mosaic\ncompany", "marathon\npetroleum",                         "merck", "marathon oil") series <- na.approx(series)  plot(series, main = "", xlab = "")

in order present better-looking graph, have introduced command \n split y label names in 2 lines. graphical output puts the left y labels out of margin.

r plot example

i have tried modify both mar , mai in function par() without change @ of output. think maybe can linked object drawn (a zoo object).

tidyverse - ggplot makes bit easier reasonably looking graphics without tuning three-letter-acronymed parameters ad infinitum:

library(tidyverse)  series %>%   as.data.frame %>%   mutate(date = row.names(.) %>% as.date) %>%   gather(ticker, price, -date) %>%   filter (!is.na(price)) ->   dl  dl %>%   ggplot(aes(date, price)) +   geom_line() +   facet_wrap(~ticker, strip.position = "left", ncol = 2)

tickers in ggplot

nb: can \n wrapping automatically facet_wrap(..., labeller = labeller(ticker = label_wrap_gen(10))

nb2: of series did not download (all nas), did not bother


Comments

Post a Comment

Popular posts from this blog

Retrieving ETA (estimated time of arrival) with Google Distance Matrix API and public transit as transport mode -

Image
is possible retrieve eta google's distancematrix api (or alternative api). fyi, eta different duration, when using public transport. following example clarify request. when leave on friday @ 8.15 i'll able catch train @ 8.30 , arrive @ 9.00 am. google says duration 30 minutes. however, when leave on saturday @ 8.15 i'll able catch first train @ 9.00 , arrive @ 9.30 am. google still says duration 30 minutes, means ignore delay. google map supports functionality there api around giving me eta instead of duration. can see, distance-matrix' response no good. clarifying question little. eta estimated time of arrival , it's clear user wants know entire duration of transport (including waiting time public transport).
Read more

android - ConstraintLayout: Realign baseline constraint in case if dependent view visibility was set to GONE -

Image
is there way realign baseline constraint textview in case if dependent view visibility set gone? my layout code: <android.support.constraint.constraintlayout android:layout_width="match_parent" android:layout_height="wrap_content"> <textview android:id="@+id/title" android:layout_width="wrap_content" android:layout_height="wrap_content" android:text="test title" android:textcolor="@color/black" android:textsize="24sp" app:layout_constraintleft_toleftof="parent" app:layout_constraintright_torightof="parent"/> <textview android:id="@+id/subtitle1" android:layout_width="wrap_content" android:layout_height="wrap_content" android:text="subtitle 1" android:textsize="11sp" app:layout_constraintb...
Read more

c# - Populating Gridview inside Listview ItemTemplate On Web User Control from Code Behind -

i have think simple question, might more complex.. i have spent few days looking answer on google , various questions on site cannot seem come right. what trying bind gridview on user control ascx page default.aspx.cs on page load event. user control markup follows: <%@ control language="c#" autoeventwireup="true" codebehind="vulnerabilityexternalip.ascx.cs" inherits="vulnerabilityassesment.controls.vulnerabilityexternalip" %> <asp:table runat="server" cellpadding="1" cellspacing="2"> <asp:tablerow> <asp:tablecell> <asp:label id="lblvulnerabilityname" runat="server" text="vulnerability name:" cssclass="itemname"></asp:label> </asp:tablecell> <asp:tablecell> <asp:label id="lblvulnerabilitynametext" runat="server" text='<%# eval("mainvulnerabilityname")...
Read more