Wolfram 언어™

선거 결과 트래커에서 데이터 입력 오류 수정하기

이제 데이터 빈의 항목 제거가 가능해 졌습니다.

데이터 빈을 생성하고 선거 결과가 들어오는 동시에 그것을 저장합니다.

In[1]:=

votes = CreateDatabin[]

Out[1]=

데이터 빈에 컨텐츠를 넣고 지금까지 각 후보에 대한 투표의 비율을 플롯합니다.

In[2]:=

DatabinUpload[votes, data = {<|"Alpha" -> 34, "Beta" -> 12, "Gamma" -> 7|>, <| "Alpha" -> 44, "Beta" -> 19, "Gamma" -> 9|>, <|"Alpha" -> 52, "Beta" -> 19, "Gamma" -> 11|>, <|"Alpha" -> 68, "Beta" -> 22, "Gamma" -> 18|>, <|"Alpha" -> 78, "Beta" -> 24, "Gamma" -> 20|>}];

In[3]:=

ListLinePlot[ Merge[Map[Map[Function[val, Round[100.0*val/Total[Values[#]]]], #] &, votes["Entries"]], Identity], PlotRange -> {0, All}, PlotLabel -> "Percentage of Vote as it Came In"]

Out[3]=

수동으로 입력된 데이터 점은 실수로 두 후보자의 상대의 값이 입력되었기 때문에, 플롯에서 부정확한 교차로 볼 수 있습니다.

In[4]:=

DatabinAdd[votes, <|"Alpha" -> 86, "Beta" -> 22, "Gamma" -> 26|>];

In[5]:=

ListLinePlot[ Merge[Map[Map[Function[val, Round[100.0*val/Total[Values[#]]]], #] &, votes["Entries"]], Identity], PlotRange -> {0, All}, PlotLabel -> "Percentage of Vote as it Came In"]

Out[5]=

가장 최근의 항목을 제거하고 올바른 항목을 추가하여 데이터 빈을 수정합니다.

In[6]:=

DatabinRemove[votes, -1];

In[7]:=

DatabinAdd[votes, <|"Alpha" -> 86, "Beta" -> 26, "Gamma" -> 22|>];

In[8]:=

ListLinePlot[ Merge[Map[Map[Function[val, Round[100.0*val/Total[Values[#]]]], #] &, votes["Entries"]], Identity], PlotRange -> {0, All}, PlotLabel -> "Percentage of Vote as it Came In"]

Out[8]=