How to make group and stack bar plot?

[Orapun Arjkumpa]

Dear all,

I'd like to create a group and stack bar chart from this data below;

                Type Clinical_sign Status N Percent

                EEHV1A Lethargic Died 26 90.7

                EEHV1A Fever Died 15 57.5

                EEHV1A Diarrhea Died 5 27.3

                EEHV1A Bloody_diarrhea Died 14 34.1

                EEHV1A Facial_edema Died 17 47.7

                EEHV1A Tongue_cyanosis Died 10 25

                EEHV1A Lethargic Survived 13 9.3

                EEHV1A Fever Survived 8 42.5

                EEHV1A Diarrhea Survived 7 72.7

                EEHV1A Bloody_diarrhea Survived 1 65.9

                EEHV1A Facial_edema Survived 4 52.3

                EEHV1A Tongue_cyanosis Survived 1 75

                EEHV1B Lethargic Died 3 80

                EEHV1B Fever Died NA 33.3

                EEHV1B Diarrhea Died 1 50

                EEHV1B Bloody_diarrhea Died 1 25

                EEHV1B Facial_edema Died 2 50

                EEHV1B Tongue_cyanosis Died 1 33.3

                EEHV1B Lethargic Survived 1 25

                EEHV1B Fever Survived 1 20

                EEHV1B Diarrhea Survived 1 66.7

                EEHV1B Bloody_diarrhea Survived NA 75

                EEHV1B Facial_edema Survived NA 50

                EEHV1B Tongue_cyanosis Survived NA 66.7

                EEHV4 Lethargic Died 9 75.8

                EEHV4 Fever Died 1 9.1

                EEHV4 Diarrhea Died 3 36.4

                EEHV4 Bloody_diarrhea Died 7 24.2

                EEHV4 Facial_edema Died 2 6.1

                EEHV4 Tongue_cyanosis Died 3 9.1

                EEHV4 Lethargic Survived 16 24.2

                EEHV4 Fever Survived 2 90.9

                EEHV4 Diarrhea Survived 9 63.6

                EEHV4 Bloody_diarrhea Survived 1 75.8

                EEHV4 Facial_edema Survived NA 93.9

                EEHV4 Tongue_cyanosis Survived NA 90.9

                E1&E4 Lethargic Died 2 100

                E1&E4 Fever Died 2 100

                E1&E4 Diarrhea Died 2 100

                E1&E4 Bloody_diarrhea Died 2 100

                E1&E4 Facial_edema Died 2 100

                E1&E4 Tongue_cyanosis Died 1 50

                E1&E4 Lethargic Survived NA 0

                E1&E4 Fever Survived NA 0

                E1&E4 Diarrhea Survived NA 0

                E1&E4 Bloody_diarrhea Survived NA 0

                E1&E4 Facial_edema Survived NA 0

                E1&E4 Tongue_cyanosis Survived NA 50

Then I try to create the script as;

ggplot(L, aes(x = Clinical_sign, y = N, fill = Type, group = Type, width=0.8)) + 

  geom_bar(stat = "identity", position = "dodge") + 

  scale_x_discrete (limits= c("Lethargic", "Fever", "Diarrhea", "Bloody_diarrhea", 

                              "Facial_edema", "Tongue_cyanosis"))

I have 2 questions;

1. How to make each individual bar to stack by using "Status"?

2. How to reorder "Type" as "EEHV1A", "EEHV1B", "EEHV4", "E1&E4"?

Thanks for your suggestion,

Noija