-
Notifications
You must be signed in to change notification settings - Fork 0
/
meanbars.m
23 lines (13 loc) · 900 Bytes
/
meanbars.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
(* ::Package:: *)
(* Anish Tondwalkar, NRL *)
(*
This code shows some of the statistics from multistation.m with labels.
*)
(* ::Input:: *)
(*BarChart[#1,PlotLabel->#2[[1]], FrameLabel -> {"Hour of Day","Mean Difference Altitude (km)"} ,Frame->True]&@@@Fold[Drop,Transpose@{meanshmF2,dropbads@stations},Reverse@{{1},{4},{13},{19},{23}}]*)
(* ::Input:: *)
(*BarChart[#1,PlotLabel->#2[[1]], FrameLabel -> {"Hour of Day","Mean Difference Freq (MHz)"} ,Frame->True]&@@@Fold[Drop,Transpose@{meansfoF2,dropbads@stations},Reverse@{{1},{4},{13},{19},{23}}]*)
(* ::Input:: *)
(*BarChart[#1,PlotLabel->#2[[1]], FrameLabel -> {"Hour of Day","Mean Difference Altitude (km)"} ,Frame->True]&@@@Transpose@{meanshmF2,dropbads@stations}*)
(* ::Input:: *)
(*BarChart[#1,PlotLabel->#2[[1]], FrameLabel -> {"Hour of Day","Mean Difference Freq (MHz)"} ,Frame->True]&@@@Transpose@{meansfoF2,dropbads@stations}*)