Need help printing two histograms side by side in rstudio using ggplot() that contains geom_histogram and facet_wrap:

Suppose I have a data with Semesters: 0-3 are indicated as underclassmen, and >3 are upperclassmen. Print two histograms of lower and upperclassmen on the Hours of Working out

Suppose a random data, called Survey with up to 400 responses:

Semester	Hours of Working out per week
3	2
2	1
1	1.5
4	3
0	11
2	10
1	11
2	2
4	3
7	1
5	2
8	1.5
4	2
3	14
7	15
2	11
2	4.5
7	5.5
7	7
8	8
2	5
1	16
5	14
2	14
6	13

and the data so forth on to as many as 400 responses. I am really confused on how I should set this up

so far I have:

lowclass<-subset(newsem7, Semester<=3) highclass<-subset(newsem7,Semester>3)