Do the following using R statistical tool please Q-3 A) Read csv file gene.csv (see below for file) and draw a heatmap. (Hint: reading file use row.names = 1 and Converting data.frame to numeric matrix use function as.matrix or data.matrix) B) By using ggplot and preloaded midwest data. By limit your axis xlim=c(0,0.1), ylim=c(0, 500000) Plot plot area vs popadults and color points by states with size = 2. (refer tutorial: http://r-statistics.co/Complete-Ggplot2-Tutorial-Part1-With-R-Code.html)

Gene file

	obs1	obs2	obs3	obs4	obs5	obs6	obs7	obs8	obs9	obs10	obs11
Gene1	0.62	0.75	0.34	0.33	0.8	0.5	0.72	0.17	1	0.81	0.51
Gene2	0.62	0.75	0.34	0.33	0.8	0.54	0.74	0.17	1	0.81	0.51
Gene3	0.67	0.51	0.23	0.28	0.79	0.44	0.81	1	1	0.81	0.14
Gene4	0.63	0.75	0.55	0.33	0.64	0.6	0.85	1	0.23	0.61	0.14
Gene5	0.55	1	0.76	0.52	0.65	0.64	0.74	0.17	0.23	0.61	0.26
Gene6	0.54	0.75	0.48	0.31	0.57	0.65	0.88	1	0.23	0.61	0.14
Gene7	0.42	1	0.76	0.73	0.66	0.67	0.69	0.17	0.23	0.61	0.51
Gene8	0.72	0.51	0.31	0.19	0.76	0.6	0.87	1	0.23	0.81	0.26
Gene9	0.67	0.51	0.3	0.28	0.8	0.59	1	1	0.23	0.81	0.26
Gene10	0.57	0.75	0.36	0.37	0.8	0.64	0.8	1	0.23	0.81	0.51
Gene11	0.53	0.75	0.36	0.37	0.8	0.64	0.83	1	0.23	0.81	0.51
Gene12	0.49	1	0.58	0.54	0.63	0.76	0.76	0.17	0.23	0.61	0.39
Gene13	0.51	1	0.58	0.54	0.63	0.7	0.77	0.17	0.23	0.61	0.39
Gene14	0.45	1	0.58	0.54	0.63	0.71	0.79	0.17	0.23	0.61	0.39