Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Error after upgrading ggplot2 to ver 2.0.0 #2

Closed
ghost opened this issue Jan 13, 2016 · 9 comments
Closed

Error after upgrading ggplot2 to ver 2.0.0 #2

ghost opened this issue Jan 13, 2016 · 9 comments

Comments

@ghost
Copy link

ghost commented Jan 13, 2016

ggplot2.boxplot generated the following error after updating ggplot2. Are you going to update your package in order to be compatible with ggplot2 ver 2.0.0 ?

Error: Unknown parameters: mainTitle, xtitle, ytitle, legendTitle
In addition: Warning messages:
1: replacing previous import by 'grid::unit' when loading 'ggthemes'
2: replacing previous import by 'grid::arrow' when loading 'ggthemes'
3: replacing previous import by 'scales::alpha' when loading 'ggthemes'
4: replacing previous import by 'grid::unit' when loading 'sjPlot'
5: In crs$dataset <- my.data : Coercing LHS to a list
6: replacing previous import by 'ggplot2::arrow' when loading 'Hmisc'
7: replacing previous import by 'ggplot2::unit' when loading 'Hmisc'
8: replacing previous import by 'scales::alpha' when loading 'Hmisc'

@kassambara
Copy link
Owner

Hi,
I'll upgrade the package and let you know as soon as possible.
Thank you for reporting this error.

Best Regards,
A. Kassambara

@kassambara
Copy link
Owner

Hi,

easyGgplot2 has been updated know.

Install the latest version as follow:

if(!require(devtools)) install.packages("devtools")
devtools::install_github("kassambara/easyGgplot2")

Please, let me know if your code works...

Best Regards,
A. KASSAMBARA

@ghost
Copy link
Author

ghost commented Jan 14, 2016

Thank you.

I only faced a problem (that didn't occur before) when there is a group in
the dataframe with only one observation.
An example follows (sorry for the greek words in the dataset)

PROBLEM (no desnities - only MeanLines)

ggplot2.density(data=dt, xName='mon_kost', groupName='methodos_kataskevis',
xtitle = 'Κόστος (€) / μ.μ.',
yTickLabelFont=c(9, "bold", "black"),
mainTitle="Εξομαλυμένες πυκνότητες μον. κόστους, ανά Μέθοδο Κατασκευής",
brewerPalette='Dark2', legendTitle="Μέθοδος Κατασκευής: ",
ytitle="Πυκνότητα", alpha=0.5, fillGroupDensity=TRUE,
addMeanLine=TRUE, meanLineSize=1) +
theme_bw() +
theme(legend.position = "bottom")

NO PROBLEM

ggplot2.density(data=dt[dt$methodos_kataskevis != "Προβολοδόμηση",],
xName='mon_kost', groupName='methodos_kataskevis', xtitle = 'Κόστος (€) /
μ.μ.',
yTickLabelFont=c(9, "bold", "black"),
mainTitle="Εξομαλυμένες πυκνότητες μον. κόστους, ανά Μέθοδο Κατασκευής",
brewerPalette='Dark2', legendTitle="Μέθοδος Κατασκευής: ",
ytitle="Πυκνότητα", alpha=0.5, fillGroupDensity=TRUE,
addMeanLine=TRUE, meanLineSize=1) +
theme_bw() +
theme(legend.position = "bottom")

DATA

dt <-
structure(
list(
gr_aa = c(
768L, 1042L, 1065L, 1068L, 1099L, 1100L,
673L, 676L, 679L, 681L, 683L, 685L, 686L, 1710L, 687L, 689L,
1713L, 692L, 1719L, 698L, 702L, 703L, 704L, 705L, 1729L,
707L,
1734L, 477L, 481L, 485L, 493L, 495L, 497L, 766L
), ta_type = c(
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα",
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα",
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα",
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα",
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα",
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα",
"Σιδ. Γέφυρα",
"Σιδ. Γέφυρα", "Σιδ. Γέφυρα", "Σιδ. Γέφυρα"
), perigrafh = c(
"ΣΓ25",
"ΛΑΔΟΠΟΤΑΜΟΥ", "ΣΓ03 ΡΕΜΑ ΣΕΛΙΑΝΔΡΟΥ", "ΣΓ06 ΡΕΜΑ
ΑΓΙΩΡΓΙΤΙΚΟ",
"ΣΓ24", "ΣΓ27", "ΣΓ1 ΜΠΕΚΙΟΡΡΕΜΑΤΟΣ", "ΣΓ3 ΡΕΜΑΤΟΣ
ΠΑΠΑΚΥΡΤΣΟΠΟΥΛΟΥ",
"ΣΓ5 2Η ΡΕΜΑΤΟΣ ΠΑΠΑΚΥΡΤΣΟΠΟΥΛΟΥ", "ΣΓ7 ΡΕΜΑΤΟΣ ΠΛΑΤΑΝΑ",
"ΣΓ8 ΔΡΙΜΑΡΙΟΡΡΕΜΑΤΟΣ",
"ΣΓ9 ΠΡΟΣΩΡΙΝΗ ΣΤΗΝ ΥΦΙΣΤΑΜΕΝΗ ΓΡΑΜΜΗ", "ΣΓ10
ΑΜΠΕΛΟΡΡΕΜΑΤΟΣ",
"ΣΓ19 (ΓΕΦΥΡΑ Γ1) ΘΟΛΟΠΟΤΑΜΟΣ", "ΣΓ11 ΒΟΪΔΟΡΡΕΜΑΤΟΣ",
"ΣΓ28",
"ΣΓ 20 ΒΡΩΜΟΛΑΓΓΑΔΟ", "ΣΓ32", "ΣΓ 21 (ΓΕΦΥΡΑ Γ4) ΦΟΙΝΙΚΑΣ",
"ΣΓ19",
"ΣΓ12 ΒΟΪΔΟΡΡΕΜΑΤΟΣ (1Η)", "ΣΓ13 ΒΟΪΔΟΡΡΕΜΑΤΟΣ (2Η)", "ΣΓ14
ΒΟΪΔΟΡΡΕΜΑΤΟΣ (3Η)",
"ΣΓ15 ΒΟΪΔΟΡΡΕΜΑΤΟΣ (4Η)", "ΣΓ 22", "ΣΓ16 ΒΟΪΔΟΡΡΕΜΑΤΟΣ
(5Η)",
"ΣΓ 24", "ΡΕΜΜΑ ΡΑΧΙΑΝΗΣ (Τ-06)", "ΡΕΜΜΑ ΖΑΠΑΝΤΗ (Τ-11)",
"ΡΕΜΜΑ ΒΑΡΕΛΑ (Τ-14)",
"ΑΣΩΠΟΣ ΠΟΤΑΜΟΣ (T-20)", "ΧΕΙΜΑΡΟΣ ΕΛΙΣΣΩΝΑ (Τ-23)", "ΡΕΜΜΑ
ΚΥΡΙΛΛΟΥ (Τ-25)",
"ΣΓ23Ν"
), route_descr = c(
"ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΚΙΑΤΟ - ΠΑΤΡΑ 59-75",
"ΚΙΑΤΟ - ΠΑΤΡΑ 21-40", "ΚΙΑΤΟ - ΠΑΤΡΑ 21-40", "ΛΙΑΝΟΚΛΑΔΙ -
ΔΟΜΟΚΟΣ",
"ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ

  • ΔΟΜΟΚΟΣ",
    "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ
  • ΔΟΜΟΚΟΣ",
    "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΚΙΑΤΟ -
    ΠΑΤΡΑ 90-109",
    "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΚΙΑΤΟ -
    ΠΑΤΡΑ 90-109",
    "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΚΙΑΤΟ - ΠΑΤΡΑ 90-109", "ΛΙΑΝΟΚΛΑΔΙ
  • ΔΟΜΟΚΟΣ",
    "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΛΙΑΝΟΚΛΑΔΙ
  • ΔΟΜΟΚΟΣ",
    "ΛΙΑΝΟΚΛΑΔΙ - ΔΟΜΟΚΟΣ", "ΚΙΑΤΟ - ΠΑΤΡΑ 90-109", "ΛΙΑΝΟΚΛΑΔΙ
  • ΔΟΜΟΚΟΣ",
    "ΚΙΑΤΟ - ΠΑΤΡΑ 109-120", "ΣΚΑ - ΚΙΑΤΟ", "ΣΚΑ - ΚΙΑΤΟ", "ΣΚΑ
  • ΚΙΑΤΟ",
    "ΣΚΑ - ΚΙΑΤΟ", "ΣΚΑ - ΚΙΑΤΟ", "ΣΚΑ - ΚΙΑΤΟ", "ΛΙΑΝΟΚΛΑΔΙ -
    ΔΟΜΟΚΟΣ"
    ), moni_flag = structure(
    c(
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L,
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L,
    1L, 1L,
    1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L
    ), .Label = c("Διπλή", "Μονή"), class = "factor"
    ), length = c(
    207, 109.5, 33, 30, 109.8, 207,
    27.31, 117, 40, 20, 117, 14.7, 522, 7.6, 297, 342, 7.6,
    30.14,
    162.8, 18.5, 207, 105, 391, 436, 14, 657, 107.8, 34.5, 20,
    15.5,
    33, 20, 15.4, 84.8
    ), n_anoi = c(
    5L, 4L, 1L, 1L, 5L, 5L, 2L, 3L,
    1L, 1L, 3L, 1L, 12L, 1L, 7L, 8L, 1L, 2L, 6L, 1L, 5L, 3L, 9L,
    10L, 1L, 15L, 4L, 1L, 1L, 1L, 2L, 3L, 1L, 2L
    ), methodos_kataskevis = structure(
    c(
    4L,
    3L, 1L, 1L, 1L, 3L, 1L, 1L, 1L, 1L, 1L, 1L, 4L, 1L, 4L,
    4L, 1L,
    1L, 3L, 1L, 4L, 1L, 4L, 4L, 1L, 2L, 3L, 3L, 3L, 1L, 3L,
    1L, 1L,
    1L
    ), .Label = c("Ικριώματα", "Προβολοδόμηση", "Προκατ. Δοκοί",
    "Σταδ.Προώθηση"), class = "factor"
    ), monad_calc = c(
    5485209.52186329,
    2225149.08111311, 408286.867788583, 581923.566665246,
    1429551.47878868,
    3406355.03767597, 198148.496522405, 2166422.94184525,
    803891.588442578,
    238511.728438278, 2050129.15646762, 395641.234900324,
    6659283.38465548,
    196757.25861, 3697047.76820474, 10904404.0704621,
    360091.332988,
    231692.799668758, 3232140.700194, 212067.407620734,
    3162486.27302504,
    1345555.98279085, 3685027.0096206, 2454772.038332,
    376188.180268,
    3071248.3424493, 3089063.461144, 658487.80250221,
    213139.251551363,
    107944.340851705, 777661.91762768, 784399.13232831,
    606238.818386809,
    1744206.29811606
    ), new_monad_calc = structure(
    c(
    1L, 3L, 5L, 6L,
    7L, 8L, 16L, 17L, 18L, 19L, 20L, 21L, 22L, 23L, 24L,
    25L, 26L,
    27L, 28L, 29L, 30L, 31L, 32L, 33L, 34L, 35L, 36L, 42L,
    43L, 44L,
    47L, 48L, 49L, 53L
    ), .Label = c(
    "5.485.209.52", "127.759.47",
    "2.225.149.08", "610.718.21", "408.286.87",
    "581.923.57", "1.429.551.48",
    "3.406.355.04", "13.180.113.95", "822.462.19",
    "162.922.56",
    "180.058.07", "764.184.95", "823.491.63", "239.112.41",
    "198.148.50",
    "2.166.422.94", "803.891.59", "238.511.73",
    "2.050.129.16", "395.641.23",
    "6.659.283.38", "196.757.26", "3.697.047.77",
    "10.904.404.07",
    "360.091.33", "231.692.80", "3.232.140.70",
    "212.067.41", "3.162.486.27",
    "1.345.555.98", "3.685.027.01", "2.454.772.04",
    "376.188.18",
    "3.071.248.34", "3.089.063.46", "1.118.211.17",
    "792.441.66",
    "912.568.76", "2.204.986.68", "1.372.002.68",
    "658.487.80", "213.139.25",
    "107.944.34", "78.350.95", "117.241.26", "777.661.92",
    "784.399.13",
    "606.238.82", "386.521.52", "395.497.18", "94.449.96",
    "1.744.206.30"
    ), class = "factor"
    ), mon_kost = c(
    26498.5967239772, 20320.9961745489,
    12372.3293269268, 19397.4522221749, 13019.5945244871,
    16455.8214380482,
    7255.52898287825, 18516.4354003868, 20097.2897110644,
    11925.5864219139,
    17522.4714228002, 26914.3697211105, 12757.2478633247,
    25889.112975,
    12447.9722835176, 31884.2224282518, 47380.4385510526,
    7687.21963068208,
    19853.4441043857, 11463.1031146343, 15277.7114638891,
    12814.8188837224,
    9424.62150798107, 5630.21109709174, 26870.5843048571,
    4674.65501133836,
    28655.5052054174, 19086.6029710786, 10656.9625775682,
    6964.15102269064,
    23565.5126553842, 39219.9566164155, 39366.1570381045,
    20568.4704966517
    ), new_mon_kost = structure(
    c(
    1L, 3L, 5L, 6L, 7L, 8L, 16L, 17L,
    18L, 19L, 20L, 21L, 22L, 23L, 24L, 25L, 26L, 27L, 28L,
    29L, 30L,
    31L, 32L, 33L, 34L, 35L, 36L, 42L, 43L, 44L, 47L, 48L,
    49L, 53L
    ), .Label = c(
    "26.498.60", "6.846.70", "20.321.00", "12.723.30",
    "12.372.33", "19.397.45", "13.019.59", "16.455.82",
    "45.137.38",
    "41.123.11", "10.768.18", "19.962.09", "42.454.72",
    "45.749.54",
    "9.564.50", "7.255.53", "18.516.44", "20.097.29",
    "11.925.59",
    "17.522.47", "26.914.37", "12.757.25", "25.889.11",
    "12.447.97",
    "31.884.22", "47.380.44", "7.687.22", "19.853.44",
    "11.463.10",
    "15.277.71", "12.814.82", "9.424.62", "5.630.21",
    "26.870.58",
    "4.674.66", "28.655.51", "7.808.74", "9.300.96",
    "7.866.97",
    "7.650.89", "7.967.50", "19.086.60", "10.656.96",
    "6.964.15",
    "5.054.90", "6.513.40", "23.565.51", "39.219.96",
    "39.366.16",
    "25.098.80", "25.681.63", "4.722.50", "20.568.47"
    ), class = "factor"
    )
    ), .Names = c(
    "gr_aa",
    "ta_type", "perigrafh", "route_descr", "moni_flag", "length",
    "n_anoi", "methodos_kataskevis", "monad_calc", "new_monad_calc",
    "mon_kost", "new_mon_kost"
    ), row.names = c(
    1L, 3L, 5L, 6L, 7L,
    8L, 16L, 17L, 18L, 19L, 20L, 21L, 22L, 23L, 24L, 25L, 26L, 27L,
    28L, 29L, 30L, 31L, 32L, 33L, 34L, 35L, 36L, 42L, 43L, 44L, 47L,
    48L, 49L, 53L
    ), class = "data.frame"
    )

On Thu, Jan 14, 2016 at 12:36 PM, Alboukadel KASSAMBARA <
notifications@github.com> wrote:

Hi,

easyGgplot2 has been updated know.

Install the latest version as follow:

if(!require(devtools)) install.packages("devtools")devtools::install_github("kassambara/easyGgplot2")

Please, let me know if your code works...

Best Regards,
A. KASSAMBARA


Reply to this email directly or view it on GitHub
#2 (comment)
.

@kassambara
Copy link
Owner

Thank you again for your feedback.

This problem is not from easyGgplot2. It's from ggplot2 v2..

I have the same problem when I use ggplot2 v2 original syntax as follow:

# problem
ggplot(dt, aes(x = mon_kost)) +
  geom_density(aes(fill = methodos_kataskevis))

# no problem
ggplot(dt[dt$methodos_kataskevis != "Προβολοδόμηση",], aes(x = mon_kost)) +
  geom_density(aes(fill = methodos_kataskevis), alpha = 0.5)

I think that, it makes sens to remove a group with only one observation, before plotting.

Best Regards,
AK

@ghost
Copy link
Author

ghost commented Jan 14, 2016

Ah, ok
Thank you very much, for your immediate response.

Best Regards,
George

On Thu, Jan 14, 2016 at 1:35 PM, Alboukadel KASSAMBARA <
notifications@github.com> wrote:

Thank you again for your feedback.

This problem is not from easyGgplot2. It's from ggplot2 v2..

I have the same problem when use ggplot2 v2 original syntax as follow:

problem

ggplot(dt, aes(x = mon_kost)) +
geom_density(aes(fill = methodos_kataskevis))

no problem

ggplot(dt[dt$methodos_kataskevis != "Προβολοδόμηση",], aes(x = mon_kost)) +
geom_density(aes(fill = methodos_kataskevis), alpha = 0.5)

I think that, it makes sens to remove a group with only one observation,
before plotting.

Best Regards,
AK


Reply to this email directly or view it on GitHub
#2 (comment)
.

@eghorani
Copy link

Hi, thanks for the great work you're doing.

I'm having a problem dodging bars using ggplot2.barplot.

Using the example code you've provided:

df<-restaurant
ggplot2.barplot(data=df, xName='time', yName="total_bill",
groupName='sex', position=position_dodge())

This produces stacked bars only.

this code works:

ggplot(df, aes(x=time, y=total_bill, fill=sex)) +
geom_bar(stat="identity", position="dodge")

kassambara added a commit that referenced this issue Dec 30, 2016
@kassambara
Copy link
Owner

Hi,

This issue has been fixed now. Please install the latest version.

I would highly suggest to use ggpubr package (read this: http://www.sthda.com/english/wiki/ggpubr-r-package-ggplot2-based-publication-ready-plots), which will be a replacement of easyGgplot2.

For ggpubr::ggbarplot, read this: http://www.sthda.com/english/rpkgs/ggpubr/reference/ggbarplot.html

Best,
/A

@eghorani
Copy link

eghorani commented Dec 30, 2016 via email

@kassambara
Copy link
Owner

So, we can close this issue. I really appreciate your comment!!

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

2 participants