Science Score: 44.0%
This score indicates how likely this project is to be science-related based on various indicators:
-
✓CITATION.cff file
Found CITATION.cff file -
✓codemeta.json file
Found codemeta.json file -
✓.zenodo.json file
Found .zenodo.json file -
○DOI references
-
○Academic publication links
-
○Academic email domains
-
○Institutional organization owner
-
○JOSS paper metadata
-
○Scientific vocabulary similarity
Low similarity (0.4%) to scientific vocabulary
Last synced: 7 months ago
·
JSON representation
·
Repository
知識構造化の授業/エンジニア講習資料
Basic Info
Statistics
- Stars: 1
- Watchers: 2
- Forks: 0
- Open Issues: 0
- Releases: 1
Created almost 13 years ago
· Last pushed 7 months ago
Metadata Files
Readme
Citation
README.md
<<<<<<< HEAD current:
chishikikouzouka.nb10.nb
current chishikikouzouka.nb9.nb n005
7a7a7df4c1a667aaa38d6246e1ee7dfa72eda04c
Owner
- Name: Kou AMANO
- Login: kouamano
- Kind: user
- Location: ???
- Repositories: 26
- Profile: https://github.com/kouamano
Citation (Citation_network_of_PCA-cosine-21_clusters.for_JSIMS_letter.mac.nb)
(* Content-type: application/mathematica *)
(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)
(* CreatedBy='Mathematica 6.0' *)
(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[ 145, 7]
NotebookDataLength[ 2105013, 49111]
NotebookOptionsPosition[ 2057303, 47538]
NotebookOutlinePosition[ 2058248, 47569]
CellTagsIndexPosition[ 2058159, 47564]
WindowFrame->Normal*)
(* Beginning of Notebook Content *)
Notebook[{
Cell[CellGroupData[{
Cell["\<\
Interdisciplinary Relations among Natural Science Fields Based on Ciatation \
Data.
; Using PCA-cosine-21 for JSIMS letter (mac)\
\>", "Title",
CellChangeTimes->{{3.4277645833850393`*^9, 3.427764643242133*^9}, {
3.427766424551578*^9, 3.427766428363336*^9}, 3.429928281280018*^9, {
3.431988561945567*^9, 3.4319885623202257`*^9}, {3.479010759646961*^9,
3.479010766316268*^9}, {3.535607693223961*^9, 3.535607697125844*^9}, {
3.537097284644697*^9, 3.537097395288878*^9}}],
Cell[CellGroupData[{
Cell["Prepare", "Section",
CellChangeTimes->{{3.427764652293439*^9, 3.4277646554976377`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"$CharacterEncoding", "=", "\"\<UTF8\>\""}]], "Input",
CellChangeTimes->{{3.4790145636571417`*^9, 3.47901459183386*^9}}],
Cell[BoxData["\<\"UTF8\"\>"], "Output",
CellChangeTimes->{{3.4790145694301558`*^9, 3.479014619030999*^9},
3.479018203181666*^9, 3.489811885732432*^9, 3.5189074019821157`*^9,
3.521761254565819*^9, 3.521768251016468*^9, 3.522018614729596*^9,
3.5225439478376713`*^9, 3.522547687371689*^9, 3.522548110216209*^9,
3.522557909893585*^9, 3.522558318736216*^9, 3.522558590281211*^9,
3.5225589630233088`*^9, 3.531531170903838*^9, 3.531531667388379*^9,
3.531534131981464*^9, 3.5316144949346447`*^9, 3.531622852170292*^9,
3.53162702057691*^9, 3.531629508165633*^9, 3.531630097709607*^9,
3.531713232721504*^9, 3.531776050688404*^9, 3.53179018109415*^9,
3.531790861425179*^9, 3.532036608259375*^9, 3.53203982547563*^9,
3.532054624552224*^9, 3.53212483480905*^9, 3.535607803823185*^9,
3.5356086488940783`*^9, 3.53709741735147*^9, 3.537408771322627*^9,
3.5374368974539337`*^9, 3.537520490549452*^9, 3.537524971470953*^9,
3.53752850044604*^9, 3.537848696809339*^9, 3.537939029933568*^9,
3.540983965782033*^9, 3.541050991189292*^9, 3.5466690126468353`*^9,
3.5466710786360188`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"dir", "=",
"\"\</Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/SOC-pca-cosine\>\""}]], "Input",
CellChangeTimes->{{3.479010793478426*^9, 3.479010827140705*^9}, {
3.535607787742579*^9, 3.535607795644361*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/SOC-pca-cosine\"\>"], "Output",
CellChangeTimes->{{3.479010828818357*^9, 3.479010842083413*^9},
3.47901191401547*^9, 3.47901461919392*^9, 3.4790182033025427`*^9, {
3.489811877555599*^9, 3.48981188583368*^9}, 3.5189074021478786`*^9,
3.521761254612454*^9, 3.521768251126296*^9, 3.522018614989996*^9,
3.5225439480899677`*^9, 3.5225476874880657`*^9, 3.5225481103468723`*^9,
3.522557910029439*^9, 3.522558318870122*^9, 3.52255859036353*^9,
3.5225589631573267`*^9, 3.531531171115141*^9, 3.531531667491794*^9,
3.53153413214286*^9, 3.5316144949746323`*^9, 3.531622852223928*^9,
3.531627020723256*^9, 3.531629508329939*^9, 3.531630097873493*^9,
3.5317132328727627`*^9, 3.531776050832038*^9, 3.5317901812487*^9,
3.531790861579609*^9, 3.532036608393711*^9, 3.532039825572698*^9,
3.5320546247158337`*^9, 3.5321248349582357`*^9, {3.535607797589411*^9,
3.535607812984262*^9}, 3.535608649040978*^9, 3.537097417478389*^9,
3.537408771400839*^9, 3.53743689758351*^9, 3.537520490646339*^9,
3.537524971668807*^9, 3.537528500576172*^9, 3.537848696891902*^9,
3.537939030057105*^9, 3.540983965884821*^9, 3.5410509913421593`*^9,
3.546669012805943*^9, 3.5466710787730637`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SetDirectory", "[", "dir", "]"}]], "Input",
CellChangeTimes->{{3.42776479397331*^9, 3.42776480953652*^9}, {
3.4790107843987494`*^9, 3.479010785240796*^9}, {3.4790108334524517`*^9,
3.479010835371689*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/SOC-pca-cosine\"\>"], "Output",
CellChangeTimes->{
3.427764812928905*^9, 3.427776632179721*^9, 3.427777278368688*^9,
3.427862991796028*^9, 3.427940077420432*^9, 3.4279428113006268`*^9,
3.429934609573166*^9, 3.429998094759646*^9, 3.4302869125920687`*^9,
3.430354264256116*^9, 3.4303545945186443`*^9, 3.430527723936327*^9,
3.43061115528369*^9, 3.430620910290011*^9, 3.43068723350933*^9,
3.430693225294653*^9, 3.43173180375555*^9, 3.431752721341099*^9,
3.4318222319390497`*^9, 3.431840380630427*^9, 3.4318984256960487`*^9,
3.431998593457889*^9, 3.432003286134728*^9, 3.4320985059143763`*^9,
3.432100356963052*^9, 3.432177887832024*^9, 3.4322495983809633`*^9,
3.4322545789502897`*^9, 3.432255583770074*^9, 3.4323330188336563`*^9,
3.4323354728153467`*^9, 3.432338539645494*^9, 3.4323390688537292`*^9,
3.432339266935828*^9, 3.432357768708612*^9, 3.432361143911029*^9,
3.432361996272251*^9, 3.432444047620014*^9, 3.433807288859911*^9,
3.434234669177156*^9, 3.43501390417776*^9, 3.43503797721319*^9,
3.435214718272223*^9, 3.4352663658812733`*^9, 3.4352667174880447`*^9,
3.43527751396017*^9, 3.4352853881112633`*^9, 3.435353900096793*^9,
3.435355553347312*^9, 3.435365109499507*^9, 3.435376679260655*^9,
3.4353796567751017`*^9, 3.479010775762993*^9, {3.479010835948786*^9,
3.479010842208359*^9}, 3.479011914160407*^9, 3.479014619242085*^9,
3.479018203315557*^9, {3.4898118815639257`*^9, 3.489811885845418*^9},
3.5189074021597357`*^9, 3.5217612546314087`*^9, 3.52176825116387*^9,
3.5220186150303392`*^9, 3.5225439481383657`*^9, 3.522547687497266*^9,
3.522548110356978*^9, 3.522557910037245*^9, 3.522558318878891*^9,
3.522558590395125*^9, 3.522558963165852*^9, 3.531531171125195*^9,
3.5315316675275993`*^9, 3.531534132152409*^9, 3.5316144949998817`*^9,
3.5316228522485237`*^9, 3.531627020758624*^9, 3.531629508365519*^9,
3.531630097908527*^9, 3.53171323288242*^9, 3.5317760508421373`*^9,
3.531790181257905*^9, 3.5317908615895977`*^9, 3.532036608427609*^9,
3.532039825608862*^9, 3.532054624757846*^9, 3.532124834994351*^9,
3.535607815821404*^9, 3.535608649094627*^9, 3.5370974175365877`*^9,
3.537408771437538*^9, 3.5374368976202183`*^9, 3.537520490687738*^9,
3.537524971758257*^9, 3.537528500615329*^9, 3.5378486969241858`*^9,
3.537939030115641*^9, 3.5409839659311943`*^9, 3.541050991401359*^9,
3.546669012864874*^9, 3.546671078809106*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ccfilename", "=",
"\"\<JCR_cited_2004.Cluster-Cluster.tsv.analytic\>\""}]], "Input",
CellChangeTimes->{{3.427765629150284*^9, 3.427765646748242*^9}}],
Cell[BoxData["\<\"JCR_cited_2004.Cluster-Cluster.tsv.analytic\"\>"], "Output",
CellChangeTimes->CompressedData["
1:eJwVy30s1HEAx/ETXSmjKVbtCJGZKI7z0JhvGzt5XK7kIc9qZHkmMXJO1FAq
Tz2soUJx6MhD5SmVeRihVpyIan6/JFdbcrvU5/fHZ68/Pnvrh8UejVRisVjh
GD9vvVl2iSLDzbYaq/D47How440Mrr3+ZYq09KzNuMB7hjlcPhQbe/TtKKKI
puqvXi7Mv2s20AOfH9N79AnGeQgmGUWZZSd5VygSlCPcHQylKQsz4dB2MMpJ
BC3b7c3yoMmfYjdhMUXerh4WFkCpjnaiGCbN1nu1wf50z5oJOJjlclXlGkUW
rMem2PBQobOfNcyUvXbiwSbOZk4gHP/3YU8WtFgqLcqGnsssNSHc7xA3XQPZ
VXrqdZAXn1v4EC411I0yVibHLDJy7uvIJHDORrWsFepplys9gT2j2pofYbqH
SVtqCUUuRLRF8kvRibXm+8sosriJVz0GA3OWf+wrp8iQ8oixE2w36PZh9E7s
qHCGinx5vCsUc9a+REOf6uqWM5A92B4UB8dKV1RSoGSnUVoqFM0rOhu/UcTw
J/8F498qF9cmGPgq+lYz3OZxNkACN6h3tbqyaHKz1Dl7wIYm3mOTCjsHmrxJ
PnXaAeabzj9og2m/c03aHWnSYCFTdMCYriGLTihK6JV3QV691KwbzjWOeDFq
VERmMt4WRCRJvWgSqprwmFFknvt1BpYPz+3d6E0T+658W1UoiKkgW6HVVME5
NTjIdexjvFjA8beGpqMBbAF0L6xd8md+SwkJgO/d1Z0mYPkWq/FJKM/YpSaF
5kqhgnWozI1UqvalSVyfYRSj0M7S77w/TdjDsSGaATQJr7Hm6METB32/82HI
9XQdN7jOLXnnDoWVugcoKNN9eUQrkCa1rO7tn0NpUue4PKISRpMVozvypzE0
MZBMK57B/wDRmi8=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"<<", "Combinatorica`"}]], "Input",
CellChangeTimes->{{3.430355025933414*^9, 3.430355038088518*^9}}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"General", "::", "compat"}], "MessageName"], ":",
" ", "\<\"Combinatorica Graph and Permutations functionality has been \
superseded by preloaded functionaliy. The package now being loaded may \
conflict with this. Please see the Compatibility Guide for details.\"\>"}]], \
"Message", "MSG",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBGJxT8/GE+avHF8J3/hjafvKMexFerotkO6RfbZsO5D+
KtCjucPulWPeiy9/dgJp6YkPDXcBaaElR37tA9L9H+7r7gfSFecv+oPo+9Vp
dSA6Qj2r5I7/K0cDm+JNIDokqOPZXSBdHP5EmTXgleNtxy4LTiBdVDXXkRtI
M0hMqOAB0qVfnA6B6A2f5KNMgfTUxli2ECDtZb7mTRSQDj+7zTEaSC8VFnG4
DKQrtlteugKkjR1lee4A6bLfSSH/QOYFHWdcHP7K8Y2fdiaIfvXDLLIq6pVj
ckhJglD0K8eaB1YyCkB61rrotx5AOku/QdYbSK+fOuuaD5B+OVtF/yWQfhF/
yks05pXjr6wjwk8SXzmeSf58liUJ5O7Fv3bnvHJcZvbozx4gDQAI5qVq
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"Ranking", "[", "l___", "]"}], ":=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[", "l", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.430287809097933*^9, 3.430287839306295*^9}, {
3.4302879021093597`*^9, 3.430287909527883*^9}, {3.430287988508218*^9,
3.430288029414159*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"numClusters", "=", "21"}]], "Input",
CellChangeTimes->{{3.4306217654445744`*^9, 3.4306217746711473`*^9}, {
3.431822960682974*^9, 3.431822961197104*^9}}],
Cell[BoxData["21"], "Output",
CellChangeTimes->CompressedData["
1:eJwVzH0s1HEcB/Bzw1jWmkttueoiddWoDJ3Nw313KpebE/JwZyYdCl2N8tRG
dywp5Smup2HzFH90lbtOkTY9rCQapxS1mJnftyOWrbKj3r8/Pnv98X6/P9uS
z0Sm2HA4nFhc7eiCVFXBEAf3P+ISKFwK8yyFPQEjYdoqhmxpu6Qth1nJR7Pv
w327JYOsgtA5uQmW7axvG4GyjWWVttUMuS7gjdtD69/ieF8YXexG/GCmo4Sf
AGUiD0ER5LZzKzTQbBY5aSHfrmO8Dfp3xaxth5G+r691wNHm+SHWC/rmWdaF
uvjFTpgXItEZYfrPCZvHsNRB6vwNrp9Um3JrGTJUY5MaWseQZ6/ipl7qGNKg
KWj6AHNUcQs7bjKkPG2dUAxL1KtRrN+D2m8fhJcv0iwp7PEem0mHAbyrxgzY
6rGUeBZ6C33scmDVidT8XLg04NCt/8GQ5RX5C1ZLZbj0AbR+yr7zEEbl5yo7
Id/1nVHKoUR18pjmzQFKfiumrP6BlIRPnk4LhNaG+VYT5LrqdnUFUeKStWJ9
Au3Nlv1P4d3OgeVe6HZ41vM5tPh9kbOqG9WFrBuCz5+bkFOSFJf/iHW4oXLm
KxQ1WtztIigRJ1aLHOHs2xayBvqodHlOMLVa2sfqxRMqfGGFMcU+Gt7YbrAo
YL2ulyhhf9dW8QgMXgwZNrP9YQ+nCWjYkxG9yublhdymWEpk4X6nWJu8JPEF
CkroraIkZyUln3WH+AI4PZQ+FwoH+65sDoN1gS0fZbB3zGsvA/vvjR5xScDu
1yBv+jj+xfx7b5tMiTBCv9ydSckmw5y1B/4HifxotA==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Needs", "[", "\"\<BarCharts`\>\"", "]"}]], "Input",
CellChangeTimes->{{3.435014033185474*^9, 3.435014058915772*^9}}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"General", "::", "obspkg"}], "MessageName"], ":",
" ", "\<\"\[NoBreak]\\!\\(\\\"BarCharts`\\\"\\)\[NoBreak]\:306f\:30b5\:30dd\
\:30fc\:30c8\:3055\:308c\:306a\:304f\:306a\:308a\:307e\:3057\:305f\:ff0e\:30ed\
\:30fc\:30c9\:3057\:3088\:3046\:3068\:3057\:3066\:3044\:308b\:30ec\:30ac\:30b7\
\:30fc\:30d0\:30fc\:30b8\:30e7\:30f3\:306f\:ff0c\:73fe\:5728\:306eMathematica\
\:6a5f\:80fd\:3068\:885d\:7a81\:3092\:8d77\:3059\:53ef\:80fd\:6027\:304c\:3042\
\:308a\:307e\:3059\:ff0e\:66f4\:65b0\:60c5\:5831\:306b\:3064\:3044\:3066\:306f\
Compatibility Guide\:3092\:3054\:89a7\:304f\:3060\:3055\:3044\:ff0e \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:Compatibility/Tutorials/BarCharts\\\
\", ButtonNote -> \\\"General::obspkg\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.531534132641588*^9, 3.531614495522093*^9,
3.531622852645522*^9, 3.5316270213085833`*^9, 3.5316295088045464`*^9,
3.5316300984268637`*^9, 3.531713233381178*^9, 3.531776051255589*^9,
3.531790181787706*^9, 3.531790862093898*^9, 3.532036609200379*^9,
3.532039826351396*^9, 3.53205462533035*^9, 3.532124835422832*^9,
3.535607830621344*^9, 3.535608649851219*^9, 3.537097418241872*^9,
3.537408772129038*^9, 3.5374368983496923`*^9, 3.5375204914772463`*^9,
3.537524972497176*^9, 3.537528501296897*^9, 3.537848697603046*^9,
3.537939030823884*^9, 3.5409839666071043`*^9, 3.541050992119405*^9,
3.5466690136212606`*^9, 3.546671079564719*^9}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"BarChart3D", "::", "shdw"}], "MessageName"], ":",
" ", "\<\"\:8907\:6570\:306e\:30b3\:30f3\:30c6\:30ad\:30b9\:30c8\[NoBreak]\\\
!\\({\\\"BarCharts`\\\", \
\\\"System`\\\"}\\)\[NoBreak]\:306b\:304a\:3044\:3066\:30b7\:30f3\:30dc\:30eb\
\[NoBreak]\\!\\(\\\"BarChart3D\\\"\\)\[NoBreak]\:304c\:4f7f\:308f\:308c\:3066\
\:3044\:307e\:3059\:ff0e\:30b3\:30f3\:30c6\:30ad\:30b9\:30c8\[NoBreak]\\!\\(\\\
\"BarCharts`\\\"\\)\[NoBreak]\:306e\:5b9a\:7fa9\:306f\:4ed6\:306e\:5b9a\:7fa9\
\:3067\:96a0\:308c\:3066\:3057\:307e\:3046\:53ef\:80fd\:6027\:304c\:3042\:308a\
\:307e\:3059\:ff0e \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\
\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/shdw\\\", ButtonNote -> \
\\\"BarCharts`BarChart3D::shdw\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{3.531534132641588*^9, 3.531614495522093*^9,
3.531622852645522*^9, 3.5316270213085833`*^9, 3.5316295088045464`*^9,
3.5316300984268637`*^9, 3.531713233381178*^9, 3.531776051255589*^9,
3.531790181787706*^9, 3.531790862093898*^9, 3.532036609200379*^9,
3.532039826351396*^9, 3.53205462533035*^9, 3.532124835422832*^9,
3.535607830621344*^9, 3.535608649851219*^9, 3.537097418241872*^9,
3.537408772129038*^9, 3.5374368983496923`*^9, 3.5375204914772463`*^9,
3.537524972497176*^9, 3.537528501296897*^9, 3.537848697603046*^9,
3.537939030823884*^9, 3.5409839666071043`*^9, 3.541050992119405*^9,
3.5466690136212606`*^9, 3.546671079609776*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{"Needs", "[", "\"\<MultivariateStatistics`\>\"", "]"}]], "Input"],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"??", "SpearmanRankCorrelation"}]], "Input",
CellChangeTimes->{{3.53178875880469*^9, 3.531788780569055*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
StyleBox["\<\"\!\(\*RowBox[{\\\" SpearmanRankCorrelation \\\", \\\"[\\\", \
RowBox[{StyleBox[\\\" xlist \\\", \\\" TI \\\"], \\\",\\\", StyleBox[\\\" \
ylist \\\", \\\" TI \\\"]}], \\\"]\\\"}]\) gives Spearman's rank correlation \
coefficient \!\(\*StyleBox[\\\" \[Rho] \\\", \\\" TR \\\"]\) for the \
real-valued vectors \!\(\*StyleBox[\\\" xlist \\\", \\\" TI \\\"]\) and \
\!\(\*StyleBox[\\\" ylist \\\", \\\" TI \\\"]\).\"\>", "MSG"],
"\[NonBreakingSpace]",
ButtonBox[
StyleBox["\[RightSkeleton]", "SR"],
Active->True,
BaseStyle->"Link",
ButtonData->
"paclet:MultivariateStatistics/ref/SpearmanRankCorrelation"]}]], "Print", \
"PrintUsage",
CellChangeTimes->{3.546671080134509*^9},
CellTags->"Info3546703479-1411742"],
Cell[BoxData[
InterpretationBox[GridBox[{
{
RowBox[{
RowBox[{"Attributes", "[", "SpearmanRankCorrelation", "]"}], "=",
RowBox[{"{", "Protected", "}"}]}]},
{" "},
{GridBox[{
{
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"{",
RowBox[{"_", "?", "NumericQ"}], "}"}], ",",
RowBox[{"{",
RowBox[{"_", "?", "NumericQ"}], "}"}]}], "]"}], ":=",
"Indeterminate"}]},
{" "},
{
RowBox[{
RowBox[{
"SpearmanRankCorrelation", "[",
"MultivariateStatistics`Private`args___", "]"}], ":=",
RowBox[{"Block", "[",
RowBox[{
RowBox[{"{",
RowBox[{"MultivariateStatistics`Private`res", "=",
RowBox[{"MultivariateStatistics`Private`iRankCorrelation", "[",
RowBox[{
RowBox[{"{", "MultivariateStatistics`Private`args", "}"}], ",",
"SpearmanRankCorrelation"}], "]"}]}], "}"}], ",",
RowBox[{"MultivariateStatistics`Private`res", "/;",
RowBox[{
"MultivariateStatistics`Private`res", "=!=", "$Failed"}]}]}],
"]"}]}]}
},
BaselinePosition->{Baseline, {1, 1}},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxItemSize->{"Columns" -> {{
Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}},
"RowsIndexed" -> {}}]}
},
BaselinePosition->{Baseline, {1, 1}},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}}],
Definition[MultivariateStatistics`SpearmanRankCorrelation],
Editable->False]], "Print",
CellChangeTimes->{3.546671080176054*^9},
CellTags->"Info3546703479-1411742"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Programs", "Section",
CellChangeTimes->{{3.5210824874763412`*^9, 3.521082498096943*^9}, {
3.5316430623522587`*^9, 3.531643062665677*^9}}],
Cell[BoxData[
RowBox[{" ",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"each", " ", "line", " ", "means", " ", "cinting", " ", "parate"}], ",",
" ",
RowBox[{
RowBox[{"to", " ", "use", " ", "citing",
RowBox[{"(", "row", ")"}]}], "-",
RowBox[{"cited",
RowBox[{"(", "column", ")"}], " ", "matrix"}]}]}], " ",
"*)"}]}]], "Input",
CellChangeTimes->{{3.5316432471016283`*^9, 3.5316109213266153`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"zeroSelf", "[", "mat_", "]"}], ":=",
RowBox[{"Module", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"len", ",", "rl"}], "}"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"len", "=",
RowBox[{"Length", "[", "mat", "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"rl", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"n", ",", "n"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "len"}], "}"}]}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"ReplacePart", "[",
RowBox[{"mat", ",", "rl"}], "]"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.54594610134606*^9, 3.545946145803134*^9}, {
3.545946271627123*^9, 3.545946276907138*^9}, {3.545946397457028*^9,
3.5459465261913157`*^9}, {3.545946632058839*^9, 3.545946658117811*^9}, {
3.5459475588739357`*^9, 3.545947561252645*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"nextscore", "[",
RowBox[{"{",
RowBox[{"mat_", ",", "r_"}], "}"}], "]"}], ":=",
RowBox[{"{",
RowBox[{"mat", ",",
RowBox[{"Map", "[",
RowBox[{"Tr", ",",
RowBox[{"Transpose", "[",
RowBox[{"(",
RowBox[{"mat", " ", "r"}], ")"}], "]"}]}], "]"}]}], "}"}]}]], "Input",\
CellChangeTimes->{{3.521029298816333*^9, 3.5210294225426083`*^9},
3.5210921301983633`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"linkMatToH", "[", "mat_", "]"}], ":=",
RowBox[{"Block", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{", "links", "}"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"links", "=",
RowBox[{"Map", "[",
RowBox[{"Tr", ",", "mat"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{
RowBox[{"mat", "/", "links"}], "/.",
RowBox[{"{",
RowBox[{"Indeterminate", "\[Rule]", "0"}], "}"}]}]}]}],
"\[IndentingNewLine]", "]"}]}]], "Input",
CellChangeTimes->{{3.521082749442307*^9, 3.521082867893352*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"hToG", "[",
RowBox[{"mat_", ",", "alpha_"}], "]"}], ":=",
RowBox[{"Block", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"n", ",", "zerolines", ",", "a", ",", "elem"}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{
RowBox[{"n", "=",
RowBox[{"Length", "[", "mat", "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"zerolines", "=",
RowBox[{"Position", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{"Tr", ",", "mat"}], "]"}], ",", "0"}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"a", "=",
RowBox[{"ReplacePart", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{"0", ",",
RowBox[{"{", "n", "}"}]}], "]"}], ",",
RowBox[{"zerolines", "\[Rule]", "1"}]}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"elem", "=",
RowBox[{"Table", "[",
RowBox[{"1", ",",
RowBox[{"{", "n", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{
RowBox[{"mat", "*", "alpha"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"alpha", "*", "a"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"1", "-", "alpha"}], ")"}], "elem"}]}], ")"}], "*",
RowBox[{"1", "/", "n"}]}]}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.5210831073608837`*^9, 3.5210833732507772`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"googlePageScore", "[",
RowBox[{"linkmat_", ",", "alpha_", ",", "itr_"}], "]"}], ":=",
RowBox[{"Module", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"n", ",", "rstart", ",", "h", ",", "g"}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{
RowBox[{"n", "=",
RowBox[{"Length", "[", "linkmat", "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"rstart", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"1", "/", "n"}], ",",
RowBox[{"{", "n", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"h", "=",
RowBox[{"linkMatToH", "[", "linkmat", "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"g", "=",
RowBox[{"hToG", "[",
RowBox[{"h", ",", "alpha"}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"Nest", "[",
RowBox[{"nextscore", ",",
RowBox[{"{",
RowBox[{"g", ",", "rstart"}], "}"}], ",", "itr"}], "]"}]}]}],
"\[IndentingNewLine]", "]"}]}]], "Input",
CellChangeTimes->{{3.5210838578316307`*^9, 3.521083932684874*^9}, {
3.521083991140593*^9, 3.521084182734458*^9}, 3.521092130240719*^9, {
3.619383567225317*^9, 3.619383570159025*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"diagonalStanderdize", "[", "m_", "]"}], ":=",
RowBox[{"Module", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{", "sqtr", "}"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"sqtr", "=",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"Tr", "[",
RowBox[{"m", ",", "List"}], "]"}], "//", "N"}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"m", "[",
RowBox[{"[",
RowBox[{"j", ",", "k"}], "]"}], "]"}], "/",
RowBox[{"sqtr", "[",
RowBox[{"[", "j", "]"}], "]"}]}], "/",
RowBox[{"sqtr", "[",
RowBox[{"[", "k", "]"}], "]"}]}], ",",
RowBox[{"{",
RowBox[{"j", ",",
RowBox[{"Length", "[", "m", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"k", ",",
RowBox[{"Length", "[",
RowBox[{"m", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}]}], "}"}]}], "]"}]}]}],
"\[IndentingNewLine]", "]"}]}]], "Input",
CellChangeTimes->{{3.535609253033503*^9, 3.535609321004303*^9}, {
3.535609354211063*^9, 3.535609378721252*^9}, {3.5356094381059504`*^9,
3.535609452464436*^9}, {3.535609485974702*^9, 3.53560959521397*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"t", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"RandomReal", "[", "]"}], ",",
RowBox[{"{", "10", "}"}], ",",
RowBox[{"{", "10", "}"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.535609326458774*^9, 3.535609343795518*^9}, {
3.535609384769086*^9, 3.5356093860826178`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"0.024541751078117846`", ",", "0.15873804054368845`", ",",
"0.19479994797818878`", ",", "0.7964899340917684`", ",",
"0.07583641687168319`", ",", "0.4282767837492687`", ",",
"0.7427439081894558`", ",", "0.7944404734743322`", ",",
"0.6357732283938649`", ",", "0.9606077921614222`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.6261033115344237`", ",", "0.7998849505328882`", ",",
"0.8130076088257505`", ",", "0.43119403416280044`", ",",
"0.7036886033408232`", ",", "0.35310045213229424`", ",",
"0.847594336642471`", ",", "0.7211987987862918`", ",",
"0.890712241134805`", ",", "0.8642869885117959`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.9295264105940426`", ",", "0.8879895014603825`", ",",
"0.11390469655176205`", ",", "0.35646535771416543`", ",",
"0.7838763998471645`", ",", "0.687741192005312`", ",",
"0.6137850751507676`", ",", "0.1962627208439407`", ",",
"0.5779592386046029`", ",", "0.10070700447843217`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.04235398942094082`", ",", "0.026734992744950503`", ",",
"0.22633569030070455`", ",", "0.09299271481806537`", ",",
"0.7091707207053541`", ",", "0.763230127230272`", ",",
"0.2732042345363004`", ",", "0.5449080091463336`", ",",
"0.4981562640515578`", ",", "0.8542899914333011`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.6914659305239781`", ",", "0.42432951584825096`", ",",
"0.045620846957291405`", ",", "0.6504624962446932`", ",",
"0.14537614765288986`", ",", "0.8031114898878235`", ",",
"0.5561705437348248`", ",", "0.30548746472175914`", ",",
"0.9036283058627406`", ",", "0.7377160646647256`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.5897645635165125`", ",", "0.8383000813622297`", ",",
"0.18877647298509492`", ",", "0.4574936090996031`", ",",
"0.9283632633406185`", ",", "0.9081187511444775`", ",",
"0.052281504431036074`", ",", "0.05818082131102886`", ",",
"0.4304082205495472`", ",", "0.20774345206461753`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.8028795972851321`", ",", "0.46859828753289`", ",",
"0.7665891979300625`", ",", "0.8802004230118559`", ",",
"0.1282563510615351`", ",", "0.4240484700138223`", ",",
"0.39570384376380385`", ",", "0.40281909085672774`", ",",
"0.8799628805906687`", ",", "0.9178368727896173`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.5498179961546672`", ",", "0.8672229505167819`", ",",
"0.7481052610550707`", ",", "0.7280946599692106`", ",",
"0.4144582506411165`", ",", "0.4568343359739968`", ",",
"0.6463178992352823`", ",", "0.531509927690456`", ",",
"0.5853359374480487`", ",", "0.39888052326728385`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.2398863133991911`", ",", "0.13526380684132522`", ",",
"0.5208492040230963`", ",", "0.6840334601831288`", ",",
"0.39240290167334435`", ",", "0.3211258259746579`", ",",
"0.4400396281576988`", ",", "0.725756924022742`", ",",
"0.895811405118895`", ",", "0.08827975152780776`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"0.5541934469207137`", ",", "0.8327525506312277`", ",",
"0.12093075101519979`", ",", "0.8805121995066403`", ",",
"0.06972798052250462`", ",", "0.7380108227491826`", ",",
"0.019820511479604175`", ",", "0.8089971147851771`", ",",
"0.8745013701320854`", ",", "0.44126437547693453`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.5356093445687227`*^9, 3.535609387080964*^9,
3.537097419202003*^9, 3.5374087730551434`*^9, 3.53743689937739*^9,
3.537520492620614*^9, 3.537524973606537*^9, 3.5375285023337917`*^9,
3.537848698613953*^9, 3.5379390317982607`*^9, 3.540983967632365*^9,
3.54105099311409*^9, 3.546669055937236*^9, 3.5466710805298443`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"diagonalStanderdize", "[", "t", "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.535609390262075*^9, 3.535609412213356*^9}, {
3.535609610119425*^9, 3.535609614153572*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"1.`", "1.132959743614497`", "3.684387052375799`", "16.672589402626077`",
"1.2696337358585572`", "2.8688010920674176`", "7.537046429985917`",
"6.955893079444115`", "4.2878656492995955`", "9.230896855203545`"},
{"4.46868214375494`", "1.`", "2.6934569064212166`", "1.5810096373287776`",
"2.0635746132328676`", "0.41429833614437617`", "1.5065694230922482`",
"1.1060774578694046`", "1.0522413499858212`", "1.454771480456301`"},
{"17.5807802187786`", "2.9418684764740246`", "0.9999999999999999`",
"3.4635547034512024`", "6.091583414137827`", "2.1383702304424608`",
"2.8910817600146905`", "0.7976480525148519`", "1.8093313193786287`",
"0.44919967035648267`"},
{"0.8865782792142041`", "0.09802612706771124`", "2.1991647371481107`",
"1.`", "6.099296632414648`", "2.6263930479551285`",
"1.4242224545288313`", "2.450998455375989`", "1.7259683942114308`",
"4.217270145702601`"},
{"11.576344305342266`", "1.2443509989968402`", "0.35452425244354896`",
"5.594370434401564`", "0.9999999999999999`", "2.2103341800023397`",
"2.318869301532066`", "1.0989833828106954`", "2.5040036337357154`",
"2.9126830548688885`"},
{"3.950522858295664`", "0.9835907226987735`", "0.5869562485594646`",
"1.5743063481829513`", "2.5550537855047986`", "1.0000000000000002`",
"0.08721508735084832`", "0.08374383314731929`", "0.4772005573023306`",
"0.3281758274008709`"},
{"8.147277595554357`", "0.8329171411255355`", "3.6108275311443494`",
"4.5885130919253605`", "0.5347455354358259`", "0.7073902091328206`",
"1.`", "0.8783532651949395`", "1.4779880564635963`",
"2.1964986106502584`"},
{"4.814048782888006`", "1.3300296092115995`", "3.040438357273059`",
"3.274972760535811`", "1.4910030129656393`", "0.6575544577353828`",
"1.409306187400037`", "1.`", "0.8482838619080765`",
"0.8236405253917078`"},
{"1.6178729097480737`", "0.15979366190544636`", "1.6305453993393648`",
"2.369979498515294`", "1.087369978677654`", "0.35603739845772137`",
"0.7390917607242734`", "1.0517855592476408`", "1.0000000000000002`",
"0.1404117250270101`"},
{"5.3254851648082155`", "1.4016925824853115`", "0.5394069039519834`",
"4.346718150912819`", "0.27530308345722304`", "1.1658481168936017`",
"0.04743296681359972`", "1.6704821865056223`", "1.3909219701422872`",
"0.9999999999999999`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{
3.5356094125960503`*^9, 3.53560949945575*^9, 3.535609566509741*^9, {
3.535609600844985*^9, 3.5356096150844927`*^9}, 3.537097419258741*^9,
3.537408773108659*^9, 3.537436899427474*^9, 3.53752049267769*^9,
3.537524973656949*^9, 3.537528502371657*^9, 3.537848698669382*^9,
3.537939031856928*^9, 3.540983967689687*^9, 3.5410509931683702`*^9,
3.546669055997636*^9, 3.546671080589089*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Tr", "[", "t", "]"}]], "Input",
CellChangeTimes->{{3.535609426319504*^9, 3.535609428987502*^9}}],
Cell[BoxData["4.34910856382829`"], "Output",
CellChangeTimes->{3.535609429640016*^9, 3.5356094958803673`*^9,
3.537097419302243*^9, 3.537408773157596*^9, 3.537436899475025*^9,
3.537520492725081*^9, 3.5375249737752647`*^9, 3.537528502417083*^9,
3.537848698717475*^9, 3.53793903189758*^9, 3.540983967733033*^9,
3.54105099321642*^9, 3.54666905603824*^9, 3.5466710806302853`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["Eigen factor", "Subsection",
CellChangeTimes->{{3.5459451608480167`*^9, 3.5459451611340218`*^9}, {
3.545958657251395*^9, 3.545958661747343*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"hToE", "[",
RowBox[{"mat_", ",", "alpha_", ",", "w_"}], "]"}], ":=",
RowBox[{"Block", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"n", ",", "zerolines", ",", "a", ",", "elem"}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{
RowBox[{"n", "=",
RowBox[{"Length", "[", "mat", "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"zerolines", "=",
RowBox[{"Position", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{"Tr", ",", "mat"}], "]"}], ",", "0"}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"a", "=",
RowBox[{"ReplacePart", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{"0", ",",
RowBox[{"{", "n", "}"}]}], "]"}], ",",
RowBox[{"zerolines", "\[Rule]", "1"}]}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
RowBox[{"elem", "=",
RowBox[{"Table", "[",
RowBox[{"1", ",",
RowBox[{"{", "n", "}"}]}], "]"}]}], ";"}], "*)"}],
"\[IndentingNewLine]",
RowBox[{"elem", "=",
RowBox[{
RowBox[{"w", "/",
RowBox[{"Tr", "[", "w", "]"}]}], "*", "n"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"Transpose", "[",
RowBox[{
RowBox[{
RowBox[{"Transpose", "[", "mat", "]"}], "*", "alpha"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"alpha", "*", "a"}], "+",
RowBox[{
RowBox[{"(",
RowBox[{"1", "-", "alpha"}], ")"}], "elem"}]}], ")"}], "*",
RowBox[{"1", "/", "n"}]}]}], "]"}]}]}], "\[IndentingNewLine]",
"]"}]}]], "Input",
CellChangeTimes->{{3.5210831073608837`*^9, 3.5210833732507772`*^9}, {
3.545959932365532*^9, 3.545959966406983*^9}, {3.54596084656663*^9,
3.5459608492612*^9}, {3.545965354173703*^9, 3.545965354758649*^9}, {
3.545966592140984*^9, 3.545966610910317*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"eigenPageScore", "[",
RowBox[{"linkmat_", ",", "alpha_", ",", "w_", ",", "itr_"}], "]"}], ":=",
RowBox[{"Block", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{"n", ",", "rstart", ",", "h", ",", "g"}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{
RowBox[{"n", "=",
RowBox[{"Length", "[", "linkmat", "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"rstart", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"1", "/", "n"}], ",",
RowBox[{"{", "n", "}"}]}], "]"}]}], ";", "\[IndentingNewLine]",
RowBox[{"h", "=",
RowBox[{"linkMatToH", "[", "linkmat", "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"g", "=",
RowBox[{"hToE", "[",
RowBox[{"h", ",", "alpha", ",", "w"}], "]"}]}], ";",
"\[IndentingNewLine]",
RowBox[{"Nest", "[",
RowBox[{"nextscore", ",",
RowBox[{"{",
RowBox[{"g", ",", "rstart"}], "}"}], ",", "itr"}], "]"}]}]}],
"\[IndentingNewLine]", "]"}]}]], "Input",
CellChangeTimes->{{3.5210838578316307`*^9, 3.521083932684874*^9}, {
3.521083991140593*^9, 3.521084182734458*^9}, 3.521092130240719*^9, {
3.545959981610982*^9, 3.545960006141139*^9}, {3.545960063830035*^9,
3.5459600640260487`*^9}, 3.54596016640514*^9, {3.5459631807990294`*^9,
3.54596319187696*^9}}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Import data", "Section",
CellChangeTimes->{{3.427764827807473*^9, 3.4277648306496067`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"alldata", "=",
RowBox[{"Import", "[",
RowBox[{"ccfilename", ",", "\"\<Table\>\""}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.427764840403803*^9, 3.427764892750948*^9}, {
3.4277656551258993`*^9, 3.427765675054954*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"sizes", "=",
RowBox[{"alldata", "[",
RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.427764994727602*^9, 3.42776501164085*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"22", ",", "22"}], "}"}]], "Output",
CellChangeTimes->{{3.427765006396327*^9, 3.427765012358933*^9},
3.427776636267419*^9, 3.427777284385301*^9, 3.42786299562995*^9,
3.427940084368156*^9, 3.427942812952136*^9, 3.4299346183499393`*^9,
3.429998096486002*^9, 3.430286914898732*^9, 3.4303542714081383`*^9,
3.430354595245501*^9, 3.430527727435227*^9, 3.430611158456119*^9,
3.4306209131290493`*^9, 3.430687242470604*^9, 3.4306932271401377`*^9,
3.4317318070722523`*^9, 3.43175272464401*^9, 3.431822234994664*^9,
3.431840383901313*^9, 3.431898429427425*^9, 3.4319985967178593`*^9,
3.432003288980695*^9, 3.432098508685837*^9, 3.432100362140091*^9,
3.432177890653881*^9, 3.432249601566947*^9, 3.432254585874648*^9,
3.4322555859762707`*^9, 3.432333021530081*^9, 3.4323354749558277`*^9,
3.4323392694514217`*^9, 3.4323577709983387`*^9, 3.432361146344531*^9,
3.432361999141569*^9, 3.432444050904736*^9, 3.433807291730755*^9,
3.434234680791731*^9, 3.435013907241686*^9, 3.435037982990378*^9,
3.435214724395361*^9, 3.435266368854247*^9, 3.435266720284587*^9,
3.4352775331131163`*^9, 3.435285406839305*^9, 3.4353539181628103`*^9,
3.435355570078886*^9, 3.435365111965081*^9, 3.435376681966811*^9,
3.435379659581151*^9, 3.4790108573044147`*^9, 3.479011921963819*^9,
3.47901820406954*^9, 3.489811886897821*^9, 3.518907421354105*^9,
3.521761256134819*^9, 3.5220186292568827`*^9, 3.522543970372568*^9,
3.5225477006506844`*^9, 3.52254811959693*^9, 3.5225579107044*^9,
3.522558319591867*^9, 3.522558615411706*^9, 3.522558963708416*^9,
3.5315311731436243`*^9, 3.531534132839785*^9, 3.5316144957114973`*^9,
3.531622852828148*^9, 3.531627021816846*^9, 3.531629509295496*^9,
3.531630098915909*^9, 3.531713233908907*^9, 3.531776051635515*^9,
3.5317901826658783`*^9, 3.53179086299356*^9, 3.532036611341816*^9,
3.5320398282118683`*^9, 3.532054626360969*^9, 3.532124836293972*^9,
3.535607868528976*^9, 3.535608650877578*^9, 3.5370974194542828`*^9,
3.537408773292467*^9, 3.537436899629293*^9, 3.5375204929330273`*^9,
3.537524973893835*^9, 3.5375285025540257`*^9, 3.53784869887973*^9,
3.537939032053653*^9, 3.540983967887549*^9, 3.541050993431926*^9,
3.546669143240563*^9, 3.54667108083418*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNamesANDSizesANDIssues", "=",
RowBox[{
"Import", "[", "\"\<../fields-clustersizes-issues.tsv\>\"",
"]"}]}]], "Input",
CellChangeTimes->{{3.522018828934729*^9, 3.522018909865796*^9}, {
3.522019909723374*^9, 3.522019926100679*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "435", ",", "145987.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "315", ",", "345502.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "248", ",", "384818.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "78", ",", "110448.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "130", ",", "81244.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "163", ",", "93381.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "427", ",", "152543.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "216", ",", "77345.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "209", ",", "131554.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "243", ",", "122403.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "416", ",", "243966.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "148", ",", "57635.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "519", ",", "296555.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "187", ",", "69050.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "173", ",", "75438.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "374", ",", "201248.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "178", ",", "56695.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "308", ",", "144004.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "277", ",", "144683.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "165", ",", "55707.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-3\"\>", ",", "4", ",", "1117.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "751", ",", "591227.`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGBQA2I3kX9Ht9u+cjzh6HcGRMe0BurssHvlaMc9899OIL0x
9rvRLiDNNP/Wr31A2kPqu+5+IP0i92MQiHbbW1UHosNjVpbc8X/lOJdx/rO7
QHrO61/KrAGvHBetmmfBCaR70vc5cgNppWNrK3iAdMK6xEMgepaLU5QpkM5o
rmALAdIB1TffRAHp7b8fO0YD6WqWIofLQJrPtufSFZC6tgCeO0D6xMzekH9A
2mJ6Fsfi8FeOl07FZ4Lo4PKiyKqoV47dqmsThKJfOVayVMgoAOlj2xe+9QDS
In4HZL2B9KWmq9d8gLTTjyT9l0C6bwqrt2jMK0d7DwaRJ4mvHH/MNTzHkvTK
8cq811x7cl45ViQq/gXRAHBIl5A=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "[",
RowBox[{"[", "0", "]"}], "]"}], "&"}], ",", "ClNamesANDSizesANDIssues"}],
"]"}]], "Input",
CellChangeTimes->{{3.522018928504176*^9, 3.522018944141458*^9}, {
3.522018988205193*^9, 3.5220190006972857`*^9}, {3.522019917361804*^9,
3.522019930389595*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"String", ",", "String", ",", "String", ",", "String", ",", "String", ",",
"String", ",", "String", ",", "String", ",", "String", ",", "String", ",",
"String", ",", "String", ",", "String", ",", "String", ",", "String", ",",
"String", ",", "String", ",", "String", ",", "String", ",", "String", ",",
"String", ",", "String"}], "}"}]], "Output",
CellChangeTimes->{
3.522018945165951*^9, {3.522018988753203*^9, 3.5220190009345093`*^9},
3.5225439705582247`*^9, 3.5225477008326283`*^9, 3.5225481197777987`*^9,
3.5225579108509502`*^9, 3.522558319742255*^9, 3.5225586155915117`*^9,
3.522558963856094*^9, 3.531531173302876*^9, 3.5315341329980383`*^9,
3.531614495945354*^9, 3.531622852989183*^9, 3.5316270219879427`*^9,
3.531629509468314*^9, 3.5316300990897713`*^9, 3.531713234138747*^9,
3.5317760518664083`*^9, 3.531790182826167*^9, 3.5317908631560297`*^9,
3.5320366115975924`*^9, 3.532039828393043*^9, 3.532054626560508*^9,
3.532124836455616*^9, 3.535607878986987*^9, 3.53560865113925*^9,
3.537097419702816*^9, 3.5374087735406523`*^9, 3.5374368998746634`*^9,
3.5375204930903378`*^9, 3.5375249740456553`*^9, 3.537528502798951*^9,
3.537848699129511*^9, 3.5379390322977333`*^9, 3.540983968132369*^9,
3.541050993606838*^9, 3.5466691434041348`*^9, 3.5466710810808783`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues21", "=", "ClNamesANDSizesANDIssues"}],
";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues21", "[",
RowBox[{"[", "17", "]"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "=",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues", "[",
RowBox[{"[", "17", "]"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "+",
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues", "[",
RowBox[{"[", "21", "]"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues21", "[",
RowBox[{"[", "17", "]"}], "]"}], "[",
RowBox[{"[", "3", "]"}], "]"}], "=",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues", "[",
RowBox[{"[", "17", "]"}], "]"}], "[",
RowBox[{"[", "3", "]"}], "]"}], "+",
RowBox[{
RowBox[{"ClNamesANDSizesANDIssues", "[",
RowBox[{"[", "21", "]"}], "]"}], "[",
RowBox[{"[", "3", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]",
RowBox[{"ClNamesANDSizesANDIssues21", "=",
RowBox[{"Drop", "[",
RowBox[{"ClNamesANDSizesANDIssues21", ",",
RowBox[{"{", "21", "}"}]}], "]"}]}]}], "Input",
CellChangeTimes->{{3.522019106187325*^9, 3.5220191776452017`*^9}, {
3.522019208177758*^9, 3.52201927428367*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "435", ",", "145987.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "315", ",", "345502.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "248", ",", "384818.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "78", ",", "110448.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "130", ",", "81244.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "163", ",", "93381.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "427", ",", "152543.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "216", ",", "77345.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "209", ",", "131554.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "243", ",", "122403.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "416", ",", "243966.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "148", ",", "57635.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "519", ",", "296555.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "187", ",", "69050.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "173", ",", "75438.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "374", ",", "201248.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "182", ",", "57812.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "308", ",", "144004.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "277", ",", "144683.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "165", ",", "55707.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "751", ",", "591227.`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.522019274749934*^9, 3.522543970571879*^9,
3.522547700844335*^9, 3.522548119787551*^9, 3.5225579108602133`*^9,
3.522558319752689*^9, 3.522558615637957*^9, 3.522558963865988*^9,
3.531531173316018*^9, 3.531534133112423*^9, 3.5316144959750757`*^9,
3.531622853001857*^9, 3.531627022001367*^9, 3.531629509481422*^9,
3.5316300991023197`*^9, 3.531713234202586*^9, 3.531776051878771*^9,
3.531790182837348*^9, 3.531790863168025*^9, 3.532036611611498*^9,
3.532039828421921*^9, 3.532054626572092*^9, 3.532124836467519*^9,
3.535607884355887*^9, 3.535608651178996*^9, 3.537097419741816*^9,
3.53740877359762*^9, 3.537436899935707*^9, 3.5375204931388283`*^9,
3.537524974092354*^9, 3.537528502840541*^9, 3.5378486991883373`*^9,
3.537939032356238*^9, 3.540983968174403*^9, 3.541050993651348*^9,
3.546669143436754*^9, 3.546671081136951*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNamesANDSizesANDIssues21", "//", "Length"}]], "Input",
CellChangeTimes->{{3.5220192892850657`*^9, 3.522019290593473*^9}}],
Cell[BoxData["21"], "Output",
CellChangeTimes->{{3.522019184540473*^9, 3.5220192114178057`*^9},
3.5220192539221*^9, 3.522019291297245*^9, 3.5225439705816603`*^9,
3.522547700855752*^9, 3.5225481198028584`*^9, 3.522557910868073*^9,
3.522558319829268*^9, 3.522558615696637*^9, 3.522558963874485*^9,
3.5315311733257523`*^9, 3.531534133140009*^9, 3.531614496000183*^9,
3.531622853012298*^9, 3.5316270220112133`*^9, 3.53162950949088*^9,
3.5316300991111794`*^9, 3.531713234254834*^9, 3.531776051888296*^9,
3.531790182849176*^9, 3.531790863180973*^9, 3.53203661162106*^9,
3.532039828448203*^9, 3.532054626584859*^9, 3.532124836479982*^9,
3.535607887191043*^9, 3.535608651225998*^9, 3.537097419787689*^9,
3.5374087736978617`*^9, 3.537436899976409*^9, 3.537520493186755*^9,
3.537524974140605*^9, 3.5375285028860273`*^9, 3.537848699229504*^9,
3.537939032398613*^9, 3.540983968218442*^9, 3.541050993699938*^9,
3.546669143491848*^9, 3.546671081181724*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedcitingDatawithClNames", "=",
RowBox[{"Drop", "[",
RowBox[{"alldata", ",", "1"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.427764915400889*^9, 3.427764976162546*^9},
3.427765019540923*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNames", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "&"}], ",",
"citedcitingDatawithClNames"}], "]"}]}]], "Input",
CellChangeTimes->{{3.42776515339946*^9, 3.42776517425419*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "\<\"B-2\"\>", ",", "\<\"B-3\"\>",
",", "\<\"C-1\"\>", ",", "\<\"C-2\"\>", ",", "\<\"Ca\"\>",
",", "\<\"Cp\"\>", ",", "\<\"E-1\"\>", ",", "\<\"E-2\"\>",
",", "\<\"E-3\"\>", ",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>",
",", "\<\"I-1\"\>", ",", "\<\"I-2\"\>", ",", "\<\"I-3\"\>",
",", "\<\"M\"\>", ",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>",
",", "\<\"Me-3\"\>", ",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>",
",", "\<\"Q\"\>"}], "}"}]], "Output",
CellChangeTimes->{
3.427765176183372*^9, 3.427776637184659*^9, 3.427777285400384*^9,
3.4278629989501677`*^9, 3.427940088227227*^9, 3.42794281340516*^9,
3.42993461884374*^9, 3.4299980970206423`*^9, 3.4302869153824167`*^9,
3.4303542718739862`*^9, 3.430354596027466*^9, 3.430527728581321*^9,
3.430611159324787*^9, 3.430620913585794*^9, 3.430687244174694*^9,
3.430693228150592*^9, 3.431731807984975*^9, 3.4317527256986237`*^9,
3.431822236082857*^9, 3.4318403849463367`*^9, 3.431898430452054*^9,
3.431998597823555*^9, 3.432003289332364*^9, 3.4320985090748243`*^9,
3.43210036264218*^9, 3.4321778911247873`*^9, 3.432249602030714*^9,
3.432254585890089*^9, 3.432255586035943*^9, 3.432333021749667*^9,
3.432335475168029*^9, 3.4323392698469553`*^9, 3.432357771201037*^9,
3.4323611465741243`*^9, 3.432361999389287*^9, 3.4324440514233627`*^9,
3.433807291787491*^9, 3.434234681186554*^9, 3.4350139072960663`*^9,
3.4350379832761793`*^9, 3.4352147253703213`*^9, 3.4352663691368437`*^9,
3.4352667205755033`*^9, 3.4352775389319077`*^9, 3.4352854136262608`*^9,
3.4353539219407682`*^9, 3.4353555738213253`*^9, 3.4353651121974287`*^9,
3.435376682189932*^9, 3.43537965983853*^9, 3.479010857459455*^9,
3.4790119220856123`*^9, 3.4790182041452007`*^9, 3.489811886975706*^9,
3.518907421450548*^9, 3.521761256151544*^9, 3.5220186292754173`*^9,
3.522543970599597*^9, 3.5225477009154577`*^9, 3.522548119868348*^9,
3.522557910893394*^9, 3.522558319846691*^9, 3.522558615769885*^9,
3.522558963901355*^9, 3.531531173385047*^9, 3.5315341331756*^9,
3.531614496035541*^9, 3.5316228530485363`*^9, 3.531627022072549*^9,
3.531629509553166*^9, 3.5316300991731853`*^9, 3.531713234274283*^9,
3.5317760519226713`*^9, 3.531790182883412*^9, 3.531790863216983*^9,
3.532036611662866*^9, 3.5320398284992*^9, 3.532054626602557*^9,
3.532124836515501*^9, {3.535607896839518*^9, 3.535607919378656*^9},
3.535608651307001*^9, 3.5370974198517323`*^9, 3.5374087738947268`*^9,
3.5374369000583773`*^9, 3.537520493268731*^9, 3.537524974208851*^9,
3.537528502967183*^9, 3.53784869931096*^9, 3.537939032483325*^9,
3.540983968282221*^9, 3.5410509937823353`*^9, 3.546669143550699*^9,
3.546671081245884*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"nonBiomedicalChemicalClNames", "=",
RowBox[{"{",
RowBox[{
"\"\<E-1\>\"", ",", "\"\<E-2\>\"", ",", "\"\<E-3\>\"", ",", "\"\<G-1\>\"",
",", "\"\<G-2\>\"", ",", "\"\<I-1\>\"", ",", "\"\<I-2\>\"", ",",
"\"\<I-3\>\"", ",", "\"\<M\>\"", ",", "\"\<Q\>\""}], "}"}]}]], "Input",
CellChangeTimes->{{3.53205336884802*^9, 3.5320533878296137`*^9}, {
3.5320534234875813`*^9, 3.5320534669570827`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "\<\"E-2\"\>", ",", "\<\"E-3\"\>",
",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>", ",", "\<\"I-1\"\>",
",", "\<\"I-2\"\>", ",", "\<\"I-3\"\>", ",", "\<\"M\"\>",
",", "\<\"Q\"\>"}], "}"}]], "Output",
CellChangeTimes->{3.535607923087707*^9, 3.5356086513625383`*^9,
3.537097419908633*^9, 3.537408773999053*^9, 3.5374369001151047`*^9,
3.537520493327441*^9, 3.537524974260335*^9, 3.537528503024911*^9,
3.537848699369054*^9, 3.537939032534615*^9, 3.540983968339589*^9,
3.5410509938408527`*^9, 3.546669143587029*^9, 3.546671081304635*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["ClNames21", "Subsection",
CellChangeTimes->{{3.532054136607958*^9, 3.532054145468862*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNames21", "=",
RowBox[{"Delete", "[",
RowBox[{"ClNames", ",", "15"}], "]"}]}]], "Input",
CellChangeTimes->{{3.431731640075589*^9, 3.431731645450096*^9}, {
3.431731705537333*^9, 3.431731728472314*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "\<\"B-2\"\>", ",", "\<\"B-3\"\>",
",", "\<\"C-1\"\>", ",", "\<\"C-2\"\>", ",", "\<\"Ca\"\>",
",", "\<\"Cp\"\>", ",", "\<\"E-1\"\>", ",", "\<\"E-2\"\>",
",", "\<\"E-3\"\>", ",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>",
",", "\<\"I-1\"\>", ",", "\<\"I-2\"\>", ",", "\<\"M\"\>",
",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>", ",", "\<\"Me-3\"\>",
",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>", ",", "\<\"Q\"\>"}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVx1tIk2EAh/EJc2BuFcNuxNiCdcAcLmFZ0cp34PLUXG5Qm4ZTWDHNzGqt
lBbNw0VkLckUO4AJM5fUh6IrDZOVkSGjsiTatFpWfq8WGplgbuv/XTz8eDaU
VhZYYng8nha5o3K18xpLpBOiPM4e7yfnZbiXd/vUA/gifp/OCz+0L3WOQ8/4
Vxe/iSVtPmVAAFPcd41K6FJXku1QJrEkFcEsvVp6AdbYq65ehMI6jdAJo6qh
QCecs5av7oLD/jczHtg3V77QCxOsxpY+yF/6HdMPG8MO8RQ8mVnttTezhBGl
Hc26wZKxaFXoeQtLSiLzHa+hcXJwflMrSwTJ8i0ZUHg90cC5cCV4KxMm1h+2
ZcPQaM1MGVTpl/rLoTNVVHwCqhfzYs/Avwec5+zQ/V4x8nCWJd80mhwG6pmG
wl5Yq/3Sl82j5LOCqX2ZTklAFhveqaKkzuK554X8RUPKoz2UhGbvRB5Dxc1w
2gA8/jG4PARXRv7Jn8JLzHIBp1ly3sHpG+w+HcynZLjB/X0SylZiZLE6Sgam
23fEwdwxH4mH6cqes0LoFxzxcXZtyzYpYVyrQ2CAU57gnAlqi3+QQu4bbBnj
cNnievsOjpkPCYOwRdNkiEBJjm5Nx0FK1m6ssHK+anQYq02UTEifmcWFlCRv
rk+SwrbA/Z9ZsM42uj4XhnaFJvKgQVWRykKmW5y7roiS0iJhwnQJJfn7d/v5
pZT8av6z6skxSsrkW8Oc/wEt9UQT
"],
FontSize->18]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["nonBiomedicalChemicalClNames21", "Subsection",
CellChangeTimes->{3.532054165242339*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"nonBiomedicalChemicalClNames21", "=",
RowBox[{"{",
RowBox[{
"\"\<E-1\>\"", ",", "\"\<E-2\>\"", ",", "\"\<E-3\>\"", ",", "\"\<G-1\>\"",
",", "\"\<G-2\>\"", ",", "\"\<I-1\>\"", ",", "\"\<I-2\>\"", ",",
"\"\<M\>\"", ",", "\"\<Q\>\""}], "}"}]}]], "Input",
CellChangeTimes->{{3.532053598073902*^9, 3.532053618026782*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "\<\"E-2\"\>", ",", "\<\"E-3\"\>",
",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>", ",", "\<\"I-1\"\>",
",", "\<\"I-2\"\>", ",", "\<\"M\"\>", ",", "\<\"Q\"\>"}], "}"}]], "Output",\
CellChangeTimes->{3.532053618882324*^9, 3.532054626816681*^9,
3.532124836755004*^9, 3.53560793583939*^9, 3.5356086514597282`*^9,
3.537097420005121*^9, 3.537408774199416*^9, 3.537436900311537*^9,
3.5375204934273357`*^9, 3.537524974340865*^9, 3.53752850311866*^9,
3.537848699467967*^9, 3.537939032657422*^9, 3.54098396843591*^9,
3.541050993940277*^9, 3.546669143687522*^9, 3.546671081404895*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"nonBiomedicalChemicalClNames21Position", "=",
RowBox[{"Flatten", "[",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Position", "[",
RowBox[{"ClNames21", ",", "#"}], "]"}], "&"}], ",",
"nonBiomedicalChemicalClNames21"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.53205366839187*^9, 3.532053764542441*^9}, {
3.532053806780349*^9, 3.532053840773168*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",",
"15", ",", "21"}], "}"}]], "Output",
CellChangeTimes->{{3.532053688124188*^9, 3.532053764682892*^9}, {
3.53205382559529*^9, 3.532053841117731*^9}, 3.532054626870618*^9,
3.5321248367674437`*^9, 3.535607935990569*^9, 3.535608651508937*^9,
3.537097420059308*^9, 3.53740877424391*^9, 3.537436900360413*^9,
3.537520493470731*^9, 3.5375249743976316`*^9, 3.5375285031746273`*^9,
3.5378486995142736`*^9, 3.537939032700243*^9, 3.540983968471442*^9,
3.541050993984853*^9, 3.546669143743238*^9, 3.54667108144949*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"ClNames21", "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}], "==",
"nonBiomedicalChemicalClNames21"}]], "Input",
CellChangeTimes->{{3.532053859701214*^9, 3.532053875496825*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{{3.532053865894829*^9, 3.532053876385202*^9},
3.5320546269234543`*^9, 3.532124836796631*^9, 3.535607936037054*^9,
3.535608651565134*^9, 3.537097420104226*^9, 3.53740877427527*^9,
3.53743690041821*^9, 3.537520493526367*^9, 3.537524974441777*^9,
3.537528503219007*^9, 3.537848699569139*^9, 3.5379390327552013`*^9,
3.540983968518631*^9, 3.5410509940393057`*^9, 3.5466691437743053`*^9,
3.546671081505466*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["biomedicalChemicalClNames21", "Subsection",
CellChangeTimes->{3.532054190462476*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"biomedicalChemicalClNames21", "=",
RowBox[{"{",
RowBox[{
"\"\<B-1\>\"", ",", "\"\<B-2\>\"", ",", "\"\<B-3\>\"", ",", "\"\<C-1\>\"",
",", "\"\<C-2\>\"", ",", "\"\<Ca\>\"", ",", "\"\<Cp\>\"", ",",
"\"\<Me-1\>\"", ",", "\"\<Me-2\>\"", ",", "\"\<Me-3\>\"", ",",
"\"\<Me-4\>\"", ",", "\"\<Mo\>\""}], "}"}]}]], "Input",
CellChangeTimes->{{3.532053962135148*^9, 3.532054010049151*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "\<\"B-2\"\>", ",", "\<\"B-3\"\>",
",", "\<\"C-1\"\>", ",", "\<\"C-2\"\>", ",", "\<\"Ca\"\>",
",", "\<\"Cp\"\>", ",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>",
",", "\<\"Me-3\"\>", ",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>"}],
"}"}]], "Output",
CellChangeTimes->{3.5320540142425137`*^9, 3.532054626939145*^9,
3.532124836809927*^9, 3.535607941237664*^9, 3.535608651608692*^9,
3.537097420159841*^9, 3.537408774332905*^9, 3.537436900460744*^9,
3.5375204935718403`*^9, 3.537524974498598*^9, 3.537528503276483*^9,
3.53784869961453*^9, 3.537939032802724*^9, 3.5409839685697403`*^9,
3.541050994086096*^9, 3.546669143822633*^9, 3.546671081549428*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"biomedicalChemicalClNames21Position", "=",
RowBox[{"Flatten", "[",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Position", "[",
RowBox[{"ClNames21", ",", "#"}], "]"}], "&"}], ",",
"biomedicalChemicalClNames21"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.532054024189679*^9, 3.532054097115467*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "16",
",", "17", ",", "18", ",", "19", ",", "20"}], "}"}]], "Output",
CellChangeTimes->{{3.5320540876097527`*^9, 3.53205409752982*^9},
3.5320546269512997`*^9, 3.532124836839839*^9, 3.535607941399247*^9,
3.5356086516654243`*^9, 3.537097420205258*^9, 3.537408774377647*^9,
3.5374369005116367`*^9, 3.537520493627338*^9, 3.537524974542004*^9,
3.537528503320034*^9, 3.537848699664328*^9, 3.537939032850853*^9,
3.540983968624197*^9, 3.5410509941355877`*^9, 3.546669143852584*^9,
3.546671081605898*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
ClNamesANDSizeANDIssues21, ClNamesANDIssues21, ClNamesANDSizes21, and issues21\
\>", "Subsection",
CellChangeTimes->{{3.532054235584193*^9, 3.532054308917804*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"orderrule", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}]}], "}"}]}], "&"}], ",",
"ClNamesANDSizesANDIssues21"}], "]"}]}]], "Input",
CellChangeTimes->{{3.522019764839633*^9, 3.522019825774435*^9}, {
3.531789866182296*^9, 3.531789870002651*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"\<\"I-1\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "435", ",", "145987.`"}], "}"}]}], ",",
RowBox[{"\<\"C-1\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "315", ",", "345502.`"}], "}"}]}], ",",
RowBox[{"\<\"C-2\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "248", ",", "384818.`"}], "}"}]}], ",",
RowBox[{"\<\"Q\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "78", ",", "110448.`"}], "}"}]}], ",",
RowBox[{"\<\"Ca\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "130", ",", "81244.`"}], "}"}]}], ",",
RowBox[{"\<\"Cp\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "163", ",", "93381.`"}], "}"}]}], ",",
RowBox[{"\<\"B-1\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "427", ",", "152543.`"}], "}"}]}], ",",
RowBox[{"\<\"M\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "216", ",", "77345.`"}], "}"}]}], ",",
RowBox[{"\<\"E-1\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "209", ",", "131554.`"}], "}"}]}], ",",
RowBox[{"\<\"B-2\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "243", ",", "122403.`"}], "}"}]}], ",",
RowBox[{"\<\"Me-1\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "416", ",", "243966.`"}], "}"}]}], ",",
RowBox[{"\<\"B-3\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "148", ",", "57635.`"}], "}"}]}], ",",
RowBox[{"\<\"Me-2\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "519", ",", "296555.`"}], "}"}]}], ",",
RowBox[{"\<\"E-2\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "187", ",", "69050.`"}], "}"}]}], ",",
RowBox[{"\<\"E-3\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "173", ",", "75438.`"}], "}"}]}], ",",
RowBox[{"\<\"Me-3\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "374", ",", "201248.`"}], "}"}]}], ",",
RowBox[{"\<\"I-2\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "182", ",", "57812.`"}], "}"}]}], ",",
RowBox[{"\<\"G-1\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "308", ",", "144004.`"}], "}"}]}], ",",
RowBox[{"\<\"Me-4\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "277", ",", "144683.`"}], "}"}]}], ",",
RowBox[{"\<\"G-2\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "165", ",", "55707.`"}], "}"}]}], ",",
RowBox[{"\<\"Mo\"\>", "\[Rule]",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "751", ",", "591227.`"}], "}"}]}]}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGBQA+IJii52O2xfOXYnhOrssHvlOGPJgn87gfT++v9Gu4D0
L+W7v/YBaS3NP7r7gXTB7L9BIHpFbm0diG5WXltyx/+Vo1Tr8md3gbTXQyYV
1oBXjnnmSy04gXSO6WFHbiDt/nl7BQ+QZjubfQhE8x8NiDIF0j+m1rOFAOm0
Xx+ORgFpodZHb0B0vcpbx2ggnXi/1OEykA45MuHSFSB971Uczx0gfSRudsg/
IH3sfqbg4vBXjh1HyzJBtJBzR2RV1CvHr8/OJghFv3K8wjlJRgFI/+jf+tYD
SF9muyzrDaRvPH59zQdIv3tdpv8SSD95LuMtGvPKcUeVqMiTxFeOJVpu51iS
Xjn+0/7LtSfnleOSnWZ/QTQAzq6dcw==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"ClNamesANDSizeANDIssues21", "=",
RowBox[{"ClNames21", "/.", "orderrule"}]}], ")"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.522019734847567*^9, 3.522019744607285*^9}, {
3.5220198373376427`*^9, 3.522019889690283*^9}, {3.531789886151607*^9,
3.531789888683732*^9}, {3.5374088160270233`*^9, 3.5374088270342913`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"\<\"B-1\"\>", "427", "152543.`"},
{"\<\"B-2\"\>", "243", "122403.`"},
{"\<\"B-3\"\>", "148", "57635.`"},
{"\<\"C-1\"\>", "315", "345502.`"},
{"\<\"C-2\"\>", "248", "384818.`"},
{"\<\"Ca\"\>", "130", "81244.`"},
{"\<\"Cp\"\>", "163", "93381.`"},
{"\<\"E-1\"\>", "209", "131554.`"},
{"\<\"E-2\"\>", "187", "69050.`"},
{"\<\"E-3\"\>", "173", "75438.`"},
{"\<\"G-1\"\>", "308", "144004.`"},
{"\<\"G-2\"\>", "165", "55707.`"},
{"\<\"I-1\"\>", "435", "145987.`"},
{"\<\"I-2\"\>", "182", "57812.`"},
{"\<\"M\"\>", "216", "77345.`"},
{"\<\"Me-1\"\>", "416", "243966.`"},
{"\<\"Me-2\"\>", "519", "296555.`"},
{"\<\"Me-3\"\>", "374", "201248.`"},
{"\<\"Me-4\"\>", "277", "144683.`"},
{"\<\"Mo\"\>", "751", "591227.`"},
{"\<\"Q\"\>", "78", "110448.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.5220198446835938`*^9, 3.522019890632402*^9},
3.522543970683169*^9, 3.522547701085373*^9, 3.522548120045923*^9,
3.522557910984254*^9, 3.52255831989119*^9, 3.5225586160202637`*^9,
3.522558963928643*^9, 3.5315311734252253`*^9, 3.531534133264406*^9,
3.531614496100903*^9, 3.531622853174075*^9, 3.5316270221572943`*^9,
3.531629509806528*^9, 3.53163009942629*^9, 3.5317132345407*^9,
3.531776052015521*^9, 3.531789896343523*^9, 3.531790183113102*^9,
3.531790863427945*^9, 3.5320366117186127`*^9, 3.5320398285349407`*^9,
3.532054627025559*^9, 3.532124836872691*^9, 3.5356079475270367`*^9,
3.535608651761903*^9, 3.537097420307928*^9, 3.537408774559103*^9,
3.5374088280104113`*^9, 3.537436900612598*^9, 3.537520493722898*^9,
3.5375249746307*^9, 3.537528503420477*^9, 3.5378486997653227`*^9,
3.537939032951569*^9, 3.5409839687207403`*^9, 3.54105099423707*^9,
3.54666914394207*^9, 3.546671081857768*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"ClNamesANDSizeANDIssues21"}], "]"}], "//", "Tr"}]], "Input",
CellChangeTimes->{{3.537408862941866*^9, 3.537408874801154*^9}}],
Cell[BoxData["5964"], "Output",
CellChangeTimes->{{3.537408871084869*^9, 3.537408875450431*^9},
3.537436900668483*^9, 3.5375204937712593`*^9, 3.537524974675514*^9,
3.537528503476508*^9, 3.537848699814352*^9, 3.537939033005372*^9,
3.5409839687702723`*^9, 3.5410509943041897`*^9, 3.5466691439896173`*^9,
3.546671082190255*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNamesANDIssues21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}]}], "}"}], "&"}], ",",
"ClNamesANDSizeANDIssues21"}], "]"}]}]], "Input",
CellChangeTimes->{{3.5317900651229677`*^9, 3.531790109777215*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "152543.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "122403.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "57635.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "345502.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "384818.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "81244.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "93381.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "131554.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "69050.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "75438.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "144004.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "55707.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "145987.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "57812.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "77345.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "243966.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "296555.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "201248.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "144683.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "591227.`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "110448.`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.5317900692570763`*^9, 3.531790122057054*^9,
3.5317901831278133`*^9, 3.53179086346136*^9, 3.5320366117290773`*^9,
3.532039828545823*^9, 3.532054627040647*^9, 3.532124836888283*^9,
3.5356079476071453`*^9, 3.5356086518126907`*^9, 3.537097420357287*^9,
3.5374087746180477`*^9, 3.5374369007139587`*^9, 3.537520493827536*^9,
3.537524974796978*^9, 3.5375285035213842`*^9, 3.537848699872622*^9,
3.537939033057805*^9, 3.540983968826148*^9, 3.541050994354048*^9,
3.546669144022958*^9, 3.546671082295*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNamesANDSizes21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "}"}], "&"}], ",",
"ClNamesANDSizeANDIssues21"}], "]"}]}]], "Input",
CellChangeTimes->{{3.531791056437913*^9, 3.531791093207975*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "427"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "243"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "148"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "315"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "248"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "130"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "163"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "209"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "187"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "173"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "308"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "165"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "435"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "182"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "216"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "416"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "519"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "374"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "277"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "751"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "78"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.531791094742886*^9, 3.53203661173962*^9,
3.532039828574215*^9, 3.532054627055497*^9, 3.53212483692135*^9,
3.5356079476895723`*^9, 3.535608651862445*^9, 3.537097420408021*^9,
3.537408774661888*^9, 3.537436900763754*^9, 3.537520493874394*^9,
3.5375249748439827`*^9, 3.537528503571898*^9, 3.5378486999166803`*^9,
3.5379390331033373`*^9, 3.540983968870957*^9, 3.541050994485084*^9,
3.546669144073615*^9, 3.546671082336957*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"issues21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}], "&"}], ",",
"ClNamesANDSizeANDIssues21"}], "]"}]}]], "Input",
CellChangeTimes->{{3.5225540794904947`*^9, 3.522554115043817*^9}, {
3.531789904404624*^9, 3.531789928360643*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"152543.`", ",", "122403.`", ",", "57635.`", ",", "345502.`", ",",
"384818.`", ",", "81244.`", ",", "93381.`", ",", "131554.`", ",",
"69050.`", ",", "75438.`", ",", "144004.`", ",", "55707.`", ",",
"145987.`", ",", "57812.`", ",", "77345.`", ",", "243966.`", ",",
"296555.`", ",", "201248.`", ",", "144683.`", ",", "591227.`", ",",
"110448.`"}], "}"}]], "Output",
CellChangeTimes->{{3.522554107250922*^9, 3.522554115256867*^9},
3.522557910992506*^9, 3.5225583199016733`*^9, 3.5225586161135902`*^9,
3.5225589639489727`*^9, 3.5315311734801817`*^9, 3.53153413329303*^9,
3.531614496127739*^9, 3.531622853185008*^9, 3.531627022170443*^9,
3.531629509820787*^9, 3.531630099439765*^9, 3.531713234554666*^9,
3.5317760521401873`*^9, {3.531789905579495*^9, 3.531789929957075*^9},
3.5317901831415462`*^9, 3.5317908634760647`*^9, 3.532036611750845*^9,
3.532039828584734*^9, 3.532054627069625*^9, 3.5321248369352427`*^9,
3.53560794777277*^9, 3.5356086519121*^9, 3.537097420456716*^9,
3.5374087747127028`*^9, 3.537436900893457*^9, 3.537520494001959*^9,
3.537524974874899*^9, 3.537528503624504*^9, 3.537848700045865*^9,
3.537939033151971*^9, 3.5409839689203176`*^9, 3.541050994523081*^9,
3.5466691441230164`*^9, 3.546671082386101*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["fieldPower21", "Subsection",
CellChangeTimes->{3.53205429262459*^9}],
Cell[CellGroupData[{
Cell[BoxData[{
RowBox[{
RowBox[{"fieldPower21", "=",
RowBox[{"Sqrt", "[",
RowBox[{"Outer", "[",
RowBox[{"Times", ",", "issues21", ",", "issues21"}], "]"}], "]"}]}],
";"}], "\[IndentingNewLine]",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"fieldPower21", "[",
RowBox[{"[", "n", "]"}], "]"}], "[",
RowBox[{"[", "n", "]"}], "]"}], "=",
RowBox[{
RowBox[{
RowBox[{"fieldPower21", "[",
RowBox[{"[", "n", "]"}], "]"}], "[",
RowBox[{"[", "n", "]"}], "]"}], "^", "2"}]}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}]}], "Input",
CellChangeTimes->{{3.522554036999888*^9, 3.52255407370545*^9}, {
3.522554120191216*^9, 3.522554247121499*^9}, {3.522554336890287*^9,
3.522554355316526*^9}, {3.5225544251469193`*^9, 3.522554510087426*^9}, {
3.52255454315304*^9, 3.522554604422428*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"2.3269366849`*^10", ",", "1.4982494409`*^10", ",", "3.321793225`*^9", ",",
"1.19371632004`*^11", ",", "1.48084893124`*^11", ",", "6.600587536`*^9",
",", "8.720011161`*^9", ",", "1.7306454916`*^10", ",", "4.7679025`*^9",
",", "5.690891844`*^9", ",", "2.0737152016`*^10", ",", "3.103269849`*^9",
",", "2.1312204169`*^10", ",", "3.342227344`*^9", ",", "5.982249025`*^9",
",", "5.9519409156`*^10", ",", "8.7944868025`*^10", ",",
"4.0500757504`*^10", ",", "2.0933170489`*^10", ",", "3.49549365529`*^11",
",", "1.2198760704`*^10"}], "}"}]], "Output",
CellChangeTimes->{
3.522554155375774*^9, {3.5225541966446466`*^9, 3.5225542475050488`*^9}, {
3.5225544912810802`*^9, 3.522554512486082*^9}, 3.5225545584279613`*^9,
3.5225546051687717`*^9, 3.522557911001924*^9, 3.522558319912483*^9,
3.522558616125062*^9, 3.52255896395819*^9, 3.5315311734917917`*^9,
3.531534133323834*^9, 3.5316144961541452`*^9, 3.531622853195684*^9,
3.531627022181994*^9, 3.531629509833461*^9, 3.531630099451535*^9,
3.531713234610641*^9, 3.531776052171165*^9, 3.531790183171105*^9,
3.531790863488982*^9, 3.532036611788034*^9, 3.532039828595695*^9,
3.532054627084702*^9, 3.532124836949654*^9, 3.535607956814199*^9,
3.535608651961359*^9, 3.53709742056196*^9, 3.5374087747625513`*^9,
3.5374369009489307`*^9, 3.537520494063374*^9, 3.537524974933591*^9,
3.537528503671768*^9, 3.537848700105431*^9, 3.53793903320329*^9,
3.540983968971402*^9, 3.541050994570496*^9, 3.546669144176324*^9,
3.54667108249271*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21", "=",
RowBox[{"Import", "[",
RowBox[{"\"\<ClJpNames21.txt\>\"", ",", "\"\<Table\>\"", ",",
RowBox[{"CharacterEncoding", "\[Rule]", "\"\<UTF8\>\""}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.432338552626012*^9, 3.4323385912315207`*^9}, {
3.432338665862937*^9, 3.432338667967512*^9}, {3.432338742599998*^9,
3.432338744806973*^9}, {3.4790109517533607`*^9, 3.479010954064352*^9}, {
3.479011221037818*^9, 3.479011252387829*^9}, {3.479011315113097*^9,
3.479011322371472*^9}, {3.4790115108171663`*^9, 3.479011511597349*^9}, {
3.479011575221026*^9, 3.479011586462706*^9}, {3.531531649483632*^9,
3.531531655540495*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "\<\"\:52d5\:690d\:7269\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:7269\:6027\:7269\:7406\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5206\:6790\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5fdc\:7528\:5316\:5b66\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>",
"}"}], ",",
RowBox[{"{", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>", "}"}],
",",
RowBox[{
"{", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5730\:7403\:79d1\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6570\:7406\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6570\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>", "}"}],
",",
RowBox[{"{", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>", "}"}],
",",
RowBox[{"{", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>", "}"}],
",",
RowBox[{
"{", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>", "}"}]}],
"}"}]], "Output",
CellChangeTimes->{{3.4323385801137667`*^9, 3.432338592120901*^9},
3.43233866916158*^9, 3.432338745712204*^9, 3.4323392711047993`*^9,
3.4323577715489807`*^9, 3.432361147008795*^9, 3.432362000069469*^9,
3.432444052530014*^9, 3.433807292072783*^9, 3.434234682250187*^9,
3.43501390781063*^9, 3.435037983883545*^9, 3.435214726387946*^9,
3.435266369881266*^9, 3.435266721308573*^9, 3.4352775468156433`*^9,
3.435285425838592*^9, 3.435353927634302*^9, 3.4353555794270487`*^9,
3.435365112627191*^9, 3.435376682610614*^9, 3.435379660317809*^9,
3.479010857650134*^9, 3.479010955261284*^9, 3.479011045794711*^9, {
3.479011225684334*^9, 3.479011253383119*^9}, {3.479011318655514*^9,
3.479011322712838*^9}, 3.4790115119934387`*^9, 3.4790115873583612`*^9,
3.479011922325844*^9, 3.479018204427541*^9, 3.489811887157279*^9,
3.5189074216405*^9, 3.5217612562853117`*^9, 3.522018629391633*^9,
3.522543970782999*^9, 3.5225477011915092`*^9, 3.5225481201549683`*^9,
3.522557911134719*^9, 3.522558320054563*^9, 3.522558616377996*^9,
3.5225589640347013`*^9, 3.531531173604639*^9, {3.5315316593980207`*^9,
3.531531672141324*^9}, 3.5315341334483433`*^9, 3.531614496268008*^9,
3.531622853291198*^9, 3.531627022314443*^9, 3.531629510091942*^9,
3.531630099709697*^9, 3.531713234991081*^9, 3.531776052252095*^9,
3.531790183389674*^9, 3.531790863693925*^9, 3.5320366118799*^9,
3.532039828680662*^9, 3.532054627392976*^9, 3.532124837201839*^9,
3.535607957232957*^9, 3.535608652020205*^9, 3.537097420663582*^9,
3.537408774823183*^9, 3.5374369010574713`*^9, 3.537520494123558*^9,
3.537524974989553*^9, 3.5375285037397203`*^9, 3.5378487001650257`*^9,
3.537939033354648*^9, 3.540983969038396*^9, 3.5410509946304502`*^9,
3.546669144247566*^9, 3.546671082643333*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21SQ", "=",
RowBox[{"Outer", "[",
RowBox[{"List", ",",
RowBox[{"Flatten", "[", "jFieldName21", "]"}], ",",
RowBox[{"Flatten", "[", "jFieldName21", "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.532145690790305*^9, 3.532145796935295*^9}, {
3.532145864260051*^9, 3.53214595233772*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>", ",", "\<\"\:5316\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>", ",", "\<\"\:6570\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7269\:6027\:7269\:7406\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5206\:6790\:5316\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fdc\:7528\:5316\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>\
", ",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}], "}"}]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", \
"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>", ",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5730\:7403\:79d1\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:7406\:5de5\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>", ",", "\<\"\:5316\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>", ",", "\<\"\:6570\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:6570\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:7269\:6027\:7269\:7406\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:5206\:6790\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:5fdc\:7528\:5316\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}]\
, "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:5730\:7403\:79d1\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:6570\:7406\:5de5\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:6570\:5b66\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
",", "\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}],
"}"}]}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.532145893194577*^9, 3.5321459097379913`*^9},
3.532145952830254*^9, 3.535607957494014*^9, 3.535608652152878*^9,
3.537097420997959*^9, 3.53740877487402*^9, 3.537436901171286*^9,
3.537520494217416*^9, 3.537524975062078*^9, 3.537528503904542*^9,
3.537848700238098*^9, 3.537939033447879*^9, 3.5409839692025003`*^9,
3.5410509947064543`*^9, 3.546669144390047*^9, 3.546671082779332*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21withLF2", "=",
RowBox[{"{",
RowBox[{
RowBox[{"{", "\"\<\:52d5\:690d\:7269\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6c34\:7523\:30fb\:6d77\:6d0b\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5316\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:7269\:6027\:7269\:7406\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5206\:6790\:5316\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5fdc\:7528\:5316\:5b66\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\>\"",
"}"}], ",",
RowBox[{"{", "\"\<\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\>\"", "}"}],
",",
RowBox[{
"{", "\"\<\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6c17\:8c61\:30fb\:74b0\:5883\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5730\:7403\:79d1\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6570\:7406\:5de5\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6570\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:81e8\:5e8a\:533b\:5b661\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:81e8\:5e8a\:533b\:5b662\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\>\"", "}"}],
",",
RowBox[{"{", "\"\<\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\>\"", "}"}],
",",
RowBox[{"{", "\"\<\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\>\"", "}"}],
",",
RowBox[{
"{", "\"\<\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406\>\"",
"}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.531629769561676*^9, 3.531629919004362*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "\<\"\:52d5\:690d\:7269\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:7269\:6027\:7269\:7406\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5206\:6790\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5fdc\:7528\:5316\:5b66\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>",
"}"}], ",",
RowBox[{"{", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>", "}"}],
",",
RowBox[{
"{", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\\n\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5730\:7403\:79d1\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6570\:7406\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6570\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>", "}"}],
",",
RowBox[{"{", "\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>", "}"}],
",",
RowBox[{"{", "\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>", "}"}],
",",
RowBox[{
"{", "\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>",
"}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.531629766825301*^9, 3.531629790266638*^9},
3.531629940999796*^9, 3.531630099774551*^9, 3.531713235106287*^9,
3.531776052386754*^9, 3.531790183443376*^9, 3.531790863729085*^9,
3.532036611906637*^9, 3.532039828692872*^9, 3.5320546274823723`*^9,
3.5321248372536592`*^9, 3.535607957792152*^9, 3.535608652215522*^9,
3.537097421112688*^9, 3.537408774932294*^9, 3.537436901249*^9,
3.5375204942907047`*^9, 3.537524975115456*^9, 3.5375285039756527`*^9,
3.5378487003239183`*^9, 3.537939033521304*^9, 3.5409839692714977`*^9,
3.5410509947709627`*^9, 3.546669144424178*^9, 3.5466710828546743`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21Text", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Text", "[",
RowBox[{"Style", "[",
RowBox[{"#", ",",
RowBox[{"FontSize", "\[Rule]", "10"}]}], "]"}], "]"}], "&"}], ",",
RowBox[{"Flatten", "[", "jFieldName21withLF2", "]"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.531629368934826*^9, 3.53162942590559*^9}, {
3.531629956444865*^9, 3.531629959642115*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\
\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\\n\:30cd\:30eb\:30ae\
\:30fc\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]]}], "}"}]], "Output",
CellChangeTimes->{{3.531629374173173*^9, 3.5316294280621023`*^9},
3.5316295101913443`*^9, 3.531629960628644*^9, 3.531630099834676*^9,
3.5317132351695223`*^9, 3.531776052426313*^9, 3.531790183570078*^9,
3.531790863801406*^9, 3.5320366119593763`*^9, 3.532039828724167*^9,
3.532054627545622*^9, 3.532124837291046*^9, 3.535607958079475*^9,
3.535608652266576*^9, 3.537097421219357*^9, 3.5374087750363503`*^9,
3.537436901304934*^9, 3.537520494349881*^9, 3.537524975170499*^9,
3.53752850402767*^9, 3.537848700372129*^9, 3.537939033577343*^9,
3.540983969335395*^9, 3.5410509948257627`*^9, 3.546669144483019*^9,
3.546671082910681*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21withLF", "=",
RowBox[{"{",
RowBox[{
RowBox[{"{", "\"\<\:52d5\:690d\:7269\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6c34\:7523\:30fb\:6d77\:6d0b\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5316\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:7269\:6027\:7269\:7406\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5206\:6790\:5316\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5fdc\:7528\:5316\:5b66\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9\>\"",
"}"}], ",",
RowBox[{
"{", "\"\<\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6c17\:8c61\:30fb\:74b0\:5883\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:5730\:7403\:79d1\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6570\:7406\:5de5\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:6570\:5b66\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:81e8\:5e8a\:533b\:5b661\>\"", "}"}], ",",
RowBox[{"{", "\"\<\:81e8\:5e8a\:533b\:5b662\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66\>\"", "}"}], ",",
RowBox[{
"{", "\"\<\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406\>\"",
"}"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.531628485868472*^9, 3.531628552087014*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "\<\"\:52d5\:690d\:7269\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:7269\:6027\:7269\:7406\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5206\:6790\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5fdc\:7528\:5316\:5b66\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\:30b9\"\>",
"}"}], ",",
RowBox[{
"{", "\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\:30ae\:30fc\\\
n\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:5730\:7403\:79d1\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6570\:7406\:5de5\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6570\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:81e8\:5e8a\:533b\:5b661\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:81e8\:5e8a\:533b\:5b662\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>",
"}"}]}], "}"}]], "Output",
CellChangeTimes->{3.531628553865398*^9, 3.531629510357617*^9,
3.531630099987651*^9, 3.5317132352640963`*^9, 3.531776052477475*^9,
3.531790183669428*^9, 3.531790863866124*^9, 3.5320366119993*^9,
3.5320398287676153`*^9, 3.5320546276345997`*^9, 3.532124837354579*^9,
3.5356079584599447`*^9, 3.535608652311782*^9, 3.53709742125825*^9,
3.537408775134753*^9, 3.537436901449498*^9, 3.537520494390799*^9,
3.537524975210827*^9, 3.537528504074329*^9, 3.537848700417391*^9,
3.537939033621194*^9, 3.5409839693759336`*^9, 3.541050994873577*^9,
3.546669144523785*^9, 3.5466710830365*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21withLFText", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Text", "[",
RowBox[{"Style", "[",
RowBox[{"#", ",",
RowBox[{"FontSize", "\[Rule]", "9"}]}], "]"}], "]"}], "&"}], ",",
RowBox[{"Flatten", "[", "jFieldName21withLF", "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.53162908640906*^9, 3.531629185275943*^9}, {
3.531629248815695*^9, 3.531629255491764*^9}, {3.531629322224709*^9,
3.531629328569313*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\:30b9\"\
\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\:30ae\
\:30fc\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\:5de5\
\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize -> 9]]]}],
"}"}]], "Output",
CellChangeTimes->{{3.531629090229987*^9, 3.531629187507984*^9}, {
3.531629251252138*^9, 3.5316292560263*^9}, {3.531629323458516*^9,
3.531629329128195*^9}, 3.531629510378851*^9, 3.531630100007172*^9,
3.5317132352838583`*^9, 3.531776052519431*^9, 3.531790183734599*^9,
3.531790863884981*^9, 3.532036612041391*^9, 3.532039828816547*^9,
3.532054627653302*^9, 3.532124837376598*^9, 3.5356079587474833`*^9,
3.535608652365958*^9, 3.537097421318718*^9, 3.53740877524051*^9,
3.5374369015070467`*^9, 3.5375204944455223`*^9, 3.537524975269988*^9,
3.537528504128459*^9, 3.537848700471045*^9, 3.537939033677073*^9,
3.540983969427719*^9, 3.541050994929269*^9, 3.54666914458226*^9,
3.546671083076426*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"NosANDClNames", "=",
RowBox[{"Inner", "[",
RowBox[{"List", ",",
RowBox[{"Range", "[", "22", "]"}], ",", "ClNames", ",", "List"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.427869564745348*^9, 3.4278695880124407`*^9}, {
3.42786961997655*^9, 3.427869677867478*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15", ",", "\<\"I-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "\<\"M\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "\<\"Me-4\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21", ",", "\<\"Mo\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"22", ",", "\<\"Q\"\>"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.427869655625778*^9, 3.427869680887508*^9},
3.427940091376244*^9, 3.427942813817734*^9, 3.429934619797586*^9,
3.429998097564622*^9, 3.4302869158231487`*^9, 3.430354272840819*^9,
3.43035459668964*^9, 3.430527729111033*^9, 3.430611159794726*^9,
3.430620915021516*^9, 3.430687245429044*^9, 3.430693229404764*^9,
3.431731808905232*^9, 3.431752728111475*^9, 3.431822238021103*^9,
3.431840387334415*^9, 3.431898432795899*^9, 3.431998599807529*^9,
3.4320032900371037`*^9, 3.432098509289597*^9, 3.432100363956531*^9,
3.432177891195738*^9, 3.432249602289033*^9, 3.4322545892775908`*^9,
3.4322555862426167`*^9, 3.432333022144382*^9, 3.432335475394356*^9,
3.432339271669221*^9, 3.4323577715818*^9, 3.43236114737812*^9,
3.4323620002893953`*^9, 3.432444053208014*^9, 3.4338072923084373`*^9,
3.434234682626523*^9, 3.435013908414111*^9, 3.435037984459917*^9,
3.4352147273015213`*^9, 3.4352663699208927`*^9, 3.435266721344639*^9,
3.435277550754075*^9, 3.435285429320215*^9, 3.435353929560418*^9,
3.435355583128508*^9, 3.435365112868203*^9, 3.435376682849226*^9,
3.435379660693473*^9, 3.479010857779869*^9, 3.479011922531136*^9,
3.479018204491802*^9, 3.489811887217792*^9, 3.518907421690542*^9,
3.5217612562965384`*^9, 3.522018629401834*^9, 3.522543970840131*^9,
3.5225477012032423`*^9, 3.52254812021187*^9, 3.522557911154459*^9,
3.5225583200771646`*^9, 3.522558616552176*^9, 3.522558964057227*^9,
3.531531173617618*^9, 3.531534133478135*^9, 3.5316144962949038`*^9,
3.531622853320503*^9, 3.531627022369093*^9, 3.5316295104234877`*^9,
3.5316301000511627`*^9, 3.531713235332004*^9, 3.531776052531314*^9,
3.5317901838190536`*^9, 3.5317908639303827`*^9, 3.5320366120796967`*^9,
3.53203982885642*^9, 3.532054627697795*^9, 3.532124837422613*^9,
3.535607959031024*^9, 3.5356086524108353`*^9, 3.537097421360804*^9,
3.537408775285388*^9, 3.537436901620607*^9, 3.537520494494124*^9,
3.537524975313786*^9, 3.537528504175408*^9, 3.537848700518406*^9,
3.537939033722756*^9, 3.540983969474936*^9, 3.541050995012999*^9,
3.546669144627658*^9, 3.546671083124806*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"NosANDClNames21", "=",
RowBox[{"Inner", "[",
RowBox[{"List", ",",
RowBox[{"Range", "[", "21", "]"}], ",", "ClNames21", ",", "List"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.427869564745348*^9, 3.4278695880124407`*^9}, {
3.42786961997655*^9, 3.427869677867478*^9}, {3.431733186668029*^9,
3.431733194470662*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVz1tIU3EcB/Al22xu+LBSRiwyCovwki1zPWzsH5ZzWorNwjNpTjLTaXaR
TbtouUE9iDaxrYdWSpEXvCxsO2tEdhuYiJWzHDkLSqVzTOgqVGh9z8OPz8uX
75ffxtKagrJVPB5vP84/ee53k4Mhh4LrbM1wyTh7ZgDGKlryafguOa07BO2q
eAe/jSHaA3umhdAeHixKh33pDrILpoROyYvhxFFdQiM8Qc23XoKSX1pJE6Tm
gtNdUOOtju2B6hkx0wvdgbpvQ1yOVLu80J8bE+WDmwRd0vcwcNVFW68xZJFX
Xq51MiS+2fnxuYsh+1yyO6+gzbn8NfE6Q17cUm/VwHFFkp5zaof+5l5oypRb
s+EVTw1TCfkqym+GR5bkxpMwr9MksED1qLveCofdquDgAkNa6UKdB0bCDsMQ
vCxivNk8lpz+QNtGMljy841oebeKJT7S303D42ZDkl/NEsunuysPYGNatCIA
nyjn/jyCurdRKcPQd3HNQU5Zvb2BM5x6vzaSx5KGTM/8DOzLitksyGdJVkev
UgQfF4wRMVxteFkngbSs6Snntg1mKh0ajA6hHqov/P1CwfNkhRig+JlNE4Kf
O25MTMKqMYskAv+1D+hXoLCQld4+zJIfoy0VnN8T+4vOUui5x5ZIDSzpobzy
BFhS8XpRC2u9C+tzYOXO6KlceCy5LZWBGbQyJ64YOyPb186aWLIlYhrnl+Kv
vjjxwyqWBNrLljn/A1eqOko=
"]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citedciting21Data", "Subsection",
CellChangeTimes->{{3.532054409737814*^9, 3.532054421702067*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedcitingData", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Drop", "[",
RowBox[{"#", ",", "1"}], "]"}], "&"}], ",",
"citedcitingDatawithClNames"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.42776502360174*^9, 3.427765075974882*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"selfLinkage", "=",
RowBox[{"selfCited", "=",
RowBox[{"selfCiting", "=",
RowBox[{"Tr", "[",
RowBox[{"citedcitingData", ",", "List"}], "]"}]}]}]}]], "Input",
CellChangeTimes->{{3.429998232051695*^9, 3.429998268310952*^9}, {
3.4299984226621113`*^9, 3.429998427036189*^9}, {3.430692861079949*^9,
3.4306928659999866`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"188946", ",", "83165", ",", "43839", ",", "571546", ",", "403763", ",",
"85268", ",", "77685", ",", "67463", ",", "33686", ",", "30056", ",",
"137796", ",", "58837", ",", "88752", ",", "19785", ",", "204", ",",
"28792", ",", "239889", ",", "414878", ",", "343063", ",", "140776", ",",
"1703555", ",", "241828"}], "}"}]], "Output",
CellChangeTimes->{
3.429998269729179*^9, {3.429998428037491*^9, 3.4299984312960663`*^9},
3.4302869169844112`*^9, 3.430354274175702*^9, 3.430354597724392*^9,
3.4305277300108128`*^9, 3.430611160952221*^9, 3.43062091610326*^9,
3.430687247683353*^9, 3.4306928727535877`*^9, 3.430693230525235*^9,
3.431731809451758*^9, 3.4317527297594833`*^9, 3.431822240397677*^9,
3.431840389643887*^9, 3.431898434587399*^9, 3.431998601487982*^9,
3.432003290497573*^9, 3.4320985095106564`*^9, 3.4321003655538197`*^9,
3.4321778919838133`*^9, 3.432249602383461*^9, 3.4322545979813557`*^9,
3.432255586485341*^9, 3.432333022527852*^9, 3.4323354756424*^9,
3.43233927301371*^9, 3.432357772016673*^9, 3.432361147644107*^9,
3.432362000564286*^9, 3.432444053704482*^9, 3.433807292794704*^9,
3.4342346841893997`*^9, 3.4350139093877583`*^9, 3.4350379848339853`*^9,
3.4352147288467417`*^9, 3.435266370246202*^9, 3.435266721669116*^9,
3.4352775604987793`*^9, 3.435285444324321*^9, 3.435353935263382*^9,
3.435355590601906*^9, 3.43536511314489*^9, 3.4353766831193533`*^9,
3.435379660989503*^9, 3.479010858108922*^9, 3.47901192285109*^9,
3.4790182046476507`*^9, 3.489811887370879*^9, 3.518907421811481*^9,
3.521761256325551*^9, 3.522018629434188*^9, 3.5225439708773937`*^9,
3.522547701233857*^9, 3.5225481202921553`*^9, 3.5225579111782293`*^9,
3.522558320118662*^9, 3.522558616674513*^9, 3.522558964158349*^9,
3.531531173651532*^9, 3.531534133578974*^9, 3.5316144963559513`*^9,
3.531622853351531*^9, 3.531627022447151*^9, 3.531629510502304*^9,
3.531630100128963*^9, 3.53171323541643*^9, 3.531776052580967*^9,
3.531790183921797*^9, 3.5317908639868097`*^9, 3.5320366121651*^9,
3.5320398289608383`*^9, 3.532054627779003*^9, 3.532124837480281*^9,
3.535607971931287*^9, 3.5356086525444803`*^9, 3.5370974214744*^9,
3.537408775411746*^9, 3.537436901748212*^9, 3.537520494622154*^9,
3.53752497543087*^9, 3.537528504305523*^9, 3.537848700647753*^9,
3.537939033853373*^9, 3.54098396960353*^9, 3.541050995138138*^9,
3.546669144743619*^9, 3.546671083253024*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DataPre", "=",
RowBox[{"Join", "[",
RowBox[{
RowBox[{"Append", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"citedcitingData", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "13"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{"citedcitingData", "[",
RowBox[{"[", "14", "]"}], "]"}], "+",
RowBox[{"citedcitingData", "[",
RowBox[{"[", "15", "]"}], "]"}]}]}], "]"}], ",",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"citedcitingData", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "16", ",", "22"}], "}"}]}], "]"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.431730717988297*^9, 3.431730879412149*^9}, {
3.431731006398642*^9, 3.431731061486863*^9}, {3.431731104375971*^9,
3.4317311049814672`*^9}, {3.43173115552804*^9, 3.4317311833015137`*^9}, {
3.431733249790936*^9, 3.431733262738782*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Dimensions", "[", "citedciting21DataPre", "]"}]], "Input",
CellChangeTimes->{{3.431731071835277*^9, 3.431731113608548*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"21", ",", "22"}], "}"}]], "Output",
CellChangeTimes->{{3.431731084784253*^9, 3.4317311141981792`*^9},
3.431731810852045*^9, 3.431752730982431*^9, 3.431822241641471*^9,
3.431840390869095*^9, 3.4318984353793383`*^9, 3.431998602163495*^9,
3.4320032908651447`*^9, 3.432098509912327*^9, 3.432100366057352*^9,
3.4321778923922243`*^9, 3.432249602802359*^9, 3.4322546039782057`*^9,
3.43225558668467*^9, 3.4323330227450438`*^9, 3.432335475908751*^9,
3.432339273572769*^9, 3.432357772212631*^9, 3.4323611478812847`*^9,
3.432362000809785*^9, 3.432444054034173*^9, 3.433807293081648*^9,
3.4342346848764267`*^9, 3.435013909721974*^9, 3.4350379853676167`*^9,
3.4352147298309097`*^9, 3.4352663707222652`*^9, 3.4352667225938387`*^9,
3.435277566315138*^9, 3.435285448719314*^9, 3.4353539372057533`*^9,
3.435355592539711*^9, 3.4353651133712873`*^9, 3.435376683691025*^9,
3.435379661246851*^9, 3.479010858362029*^9, 3.479011923129816*^9,
3.479018204722587*^9, 3.489811887442255*^9, 3.518907421874475*^9,
3.521761256356526*^9, 3.522018629493556*^9, 3.5225439709394913`*^9,
3.5225477012925797`*^9, 3.522548120358822*^9, 3.522557911204425*^9,
3.5225583201374683`*^9, 3.5225586167374277`*^9, 3.52255896418783*^9,
3.5315311737123938`*^9, 3.531534133596817*^9, 3.53161449643598*^9,
3.531622853388733*^9, 3.531627022465749*^9, 3.5316295105641603`*^9,
3.531630100148541*^9, 3.531713235437085*^9, 3.531776052618368*^9,
3.531790183943935*^9, 3.531790864007867*^9, 3.532036612185766*^9,
3.5320398290131683`*^9, 3.5320546277991943`*^9, 3.532124837519084*^9,
3.535607972028709*^9, 3.535608652628635*^9, 3.537097421545011*^9,
3.537408775545785*^9, 3.537436901915732*^9, 3.537520494705104*^9,
3.537524975486315*^9, 3.537528504388814*^9, 3.53784870073241*^9,
3.537939033935439*^9, 3.5409839696877537`*^9, 3.5410509952217503`*^9,
3.546669144805085*^9, 3.546671083319964*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DataPreT", "=",
RowBox[{"Transpose", "[", "citedciting21DataPre", "]"}]}], ";"}]], "Input",\
CellChangeTimes->{{3.431731328568169*^9, 3.431731344368065*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DataT", "=",
RowBox[{"Join", "[",
RowBox[{
RowBox[{"Append", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"citedciting21DataPreT", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "13"}], "}"}]}], "]"}], ",",
RowBox[{
RowBox[{"citedciting21DataPreT", "[",
RowBox[{"[", "14", "]"}], "]"}], "+",
RowBox[{"citedciting21DataPreT", "[",
RowBox[{"[", "15", "]"}], "]"}]}]}], "]"}], ",",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"citedciting21DataPreT", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "16", ",", "22"}], "}"}]}], "]"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.431731384973361*^9, 3.4317314763378477`*^9}, {
3.431731530247695*^9, 3.431731535258457*^9}, {3.431733274416761*^9,
3.431733282196144*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedciting21DataT", "//", "Dimensions"}]], "Input",
CellChangeTimes->{{3.431731509229649*^9, 3.431731511861546*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"21", ",", "21"}], "}"}]], "Output",
CellChangeTimes->{{3.431731512551292*^9, 3.431731541434372*^9},
3.431731812694803*^9, 3.431733287877771*^9, 3.431752732667441*^9,
3.43182224341151*^9, 3.4318403921894836`*^9, 3.4318984365961123`*^9,
3.4319986037005863`*^9, 3.432003291261312*^9, 3.432098510335536*^9,
3.432100367693123*^9, 3.432177892877377*^9, 3.4322496030713797`*^9,
3.432254609761022*^9, 3.432255587073703*^9, 3.4323330230012283`*^9,
3.432335476136911*^9, 3.432339274529634*^9, 3.432357772445232*^9,
3.432361148140909*^9, 3.432362001158904*^9, 3.432444054474782*^9,
3.433807293363307*^9, 3.434234686289283*^9, 3.435013910051764*^9,
3.4350379856798687`*^9, 3.435214730341001*^9, 3.435266371026443*^9,
3.435266722899425*^9, 3.435277574119722*^9, 3.4352854531580973`*^9,
3.435353940985909*^9, 3.435355596338093*^9, 3.43536511363006*^9,
3.435376683962014*^9, 3.435379661669718*^9, 3.479010858715702*^9,
3.479011923472577*^9, 3.479018204859969*^9, 3.489811887630435*^9,
3.518907421946197*^9, 3.5217612563952837`*^9, 3.522018629574942*^9,
3.5225439709655933`*^9, 3.522547701357997*^9, 3.52254812043475*^9,
3.522557911237104*^9, 3.5225583201751757`*^9, 3.522558616805378*^9,
3.522558964214286*^9, 3.5315311737798843`*^9, 3.531534133642646*^9,
3.5316144964622517`*^9, 3.531622853433704*^9, 3.531627022533332*^9,
3.531629510592587*^9, 3.5316301002179527`*^9, 3.531713235511526*^9,
3.5317760526653557`*^9, 3.5317901839978533`*^9, 3.5317908640552673`*^9,
3.532036612240469*^9, 3.532039829085791*^9, 3.532054627870101*^9,
3.532124837548607*^9, 3.535607972163278*^9, 3.5356086527467957`*^9,
3.537097421641715*^9, 3.537408775646496*^9, 3.5374369020316277`*^9,
3.5375204948221197`*^9, 3.5375249755656643`*^9, 3.537528504505701*^9,
3.5378487008480787`*^9, 3.537939034052109*^9, 3.5409839698048162`*^9,
3.541050995498555*^9, 3.546669144888008*^9, 3.546671083421386*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21Data", "=",
RowBox[{"Transpose", "[", "citedciting21DataT", "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.4317315534393473`*^9, 3.431731571724131*^9}, {
3.431733295967896*^9, 3.431733316204582*^9}, {3.431822995281233*^9,
3.4318229982735653`*^9}},
FontSize->16],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DatawithClNames", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Prepend", "[",
RowBox[{
RowBox[{"citedciting21Data", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"ClNames21", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "numClusters"}], "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.431822849468742*^9, 3.4318229036085*^9}, {
3.431822973646512*^9, 3.431823034312214*^9}, 3.431823324196376*^9, {
3.431823401914795*^9, 3.431823402301115*^9}}]
}, Open ]],
Cell[CellGroupData[{
Cell["citedciting21DataZeroSelf", "Subsection",
CellChangeTimes->{3.532054533926031*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"selfLinkage21", "=",
RowBox[{"selfCiting21", "=",
RowBox[{"selfCited21", "=",
RowBox[{"Tr", "[",
RowBox[{"citedciting21Data", ",", "List"}], "]"}]}]}]}]], "Input",
CellChangeTimes->{{3.431733331137362*^9, 3.43173334385872*^9}, {
3.431735303478635*^9, 3.4317353215687027`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"188946", ",", "83165", ",", "43839", ",", "571546", ",", "403763", ",",
"85268", ",", "77685", ",", "67463", ",", "33686", ",", "30056", ",",
"137796", ",", "58837", ",", "88752", ",", "20155", ",", "28792", ",",
"239889", ",", "414878", ",", "343063", ",", "140776", ",", "1703555", ",",
"241828"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzmtIU3EABfClbhhboqIZpujAwsJSqvXwUfsvhOnmsm1QOsU0SlpBY5hT
ESVXYsslGj7CkFnWlogZc26ardkDLUyiLQ21CBvmvSZlQWG11bkfDr9v5xx+
yXn5qXUsFkuGGOxRPH0zRf4cehF4CerVd/SNUKMylfVDuXvjUTt85x+0uKHz
S2dzUAtFhLILcxzo/TeTJ4CTh4NFe+E1fm9MAdy2po6vhWk3v7VchA6ZmlcH
PXFLc2YoenQ15B68FVxI9cJpReuqFX40GdttsDp9R8AQXPDMhn+AyR3Ddl0r
RQZDfpSK2yhi65hceNZOkaTNwp7XMOW4anVrB0XUBnWiEHZpTysZy3Oc3Znw
6/CuqizYlKlYVsOXERkjZ6FkMr1IAwvH6tnlUCNyVuqg1Vz0/P4yRRrHddkD
sK/UpLLCrgSfLYtFE/kNl35iH01mvRt8BzJowq62WezQEFuc5DhIkylBn38Y
1teF7h6Bn4aWfjuhtIKz8zH82xStYBwIa6hhnE57WDZ/BL0nbYvv4St+aAI7
lyaLY/3710N/qptw4XbB2woeDNlz5QljvEObL4DGp20cJXSFBazkQ5M4UKSC
2p4GoRv+jDa/8cCUxMu8+Vzmj0Pph0sT0sjbx2hi4XaeYUwyjuZV5dPkrvfX
iXAVTTzfx2PiobjCuyKG12vXYiUwdUvUjBRucvUkUzDnc7YksoAmnAfCCG8x
drprpoJKaCIyx3FHz9GEV1nmY/wPFohB2w==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"zeroReplaceRules", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"n", ",", "n"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.432339507456881*^9, 3.432339528086537*^9}, {
3.432339648740604*^9, 3.432339690222878*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"5", ",", "5"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"6", ",", "6"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"7", ",", "7"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"8", ",", "8"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"11", ",", "11"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"12", ",", "12"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"13", ",", "13"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"14", ",", "14"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"15", ",", "15"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"16", ",", "16"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"17", ",", "17"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"18", ",", "18"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"19", ",", "19"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"21", ",", "21"}], "}"}], "\[Rule]", "0"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVxWtIU3EYB+BjSyVdQSshYqKG5AjxglkWbPhKpW5CpVNxCy8LwVIwu2xq
YrRAnH0Qks5kWcgSky4Yjm06zaUoaaCIToyyGWri+ZsflAiSnP3Oh4cnxlCd
Wx7EcZwKuLa6yDdPBPr3lt9yYEloq9WJzcaEfS7Mx32T+TEb8bhNTwWayQyp
yOIFuuqdWh6zCtT0TN01g2187dbJdoEez1Uq0rEvrForfjxVab+I15IM9dk4
sPd54ybuOOLwVGL3aVXJLdyoaQ424iDeW2fC/Pr18d4Ngc6s31e/x5Z2u96B
5SV7zmyO0YJp9NHEWUYX6NDuOSWj2G53jxv/biiL71cxKvK/CwxgRYEsxYOL
OWFnGK+mhCZ4sVktzxPvrGluFJ+2Dd5dvMzI9dG59h3/OXg4NvgKozZXb9oB
PGadp3A83DlfK8W37ZZRcanyji4VbyusIVrsK5Bs6vC4R5KhxxVfLOlzOMz4
ataHzy81SRfxL8WANoC/tuRFvCxkNJLfcUPcv/KhqF7H6Efy31KZntGpS5Py
aLw99XMzC7cM7kRqcN/DYws52BbdnShgrTlHE3GNUf/rjKOrZYzknx5M7zcw
OvE8JnyoilHUi3u74v8BVTwAkw==
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DataZeroSelf", "=",
RowBox[{"ReplacePart", "[",
RowBox[{"citedciting21Data", ",", "zeroReplaceRules"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.432339554774043*^9, 3.43233963473521*^9}, {
3.432339703506488*^9, 3.432339747287587*^9}, 3.5317907099206753`*^9}],
Cell[BoxData[
RowBox[{
RowBox[{"citingcited21DataZeroSelf", "=",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.432339784028782*^9, 3.4323398054774714`*^9}},
FontSize->16],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedFromAllOthers", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "citedciting21DataZeroSelf"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.432339838572178*^9, 3.4323398966863403`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"62616", ",", "64483", ",", "25433", ",", "147894", ",", "142806", ",",
"42969", ",", "46395", ",", "40113", ",", "16809", ",", "19756", ",",
"64800", ",", "17925", ",", "21060", ",", "10398", ",", "9594", ",",
"125362", ",", "283151", ",", "158080", ",", "83704", ",", "705816", ",",
"29097"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwA+JZvHbmqye9dPy1Y/HHzUC6Y/fc6VuBdJmKLdM2IM11
+4vQPSDNpnl6e/nUl45PQj0zPKa9dLzJeePRkekvHf1fhi65AKTlurZ+VJvx
0lEnrF7DAUgvyusKAdEK2aWLXYH0AYUPVZ5AepPunjdZQFpXfNHubCDNIOce
XwCkWaQmspYBaXeb85XlQHpNeuHR9a9fOvLc7fDaAKQX710ZvRlIb2hi2+bJ
8MoxT+NY8wnzV456O/j/Wtq+cjRK2rNiO5Bm4krR2WH3yvHu63X/dgLpzDoJ
411A+prOq1/7gPQ5Pw69/UBa0UsxGETHv+2sA9GBwvtK7vi/ctxVvP3ZXSAt
4S+swhrwyvHPtQ0WnECaR+aGIzeQvm5/o4IHSBe59BwC0Rv+lkaZAulX92ew
hQBpNjO2t1FAepYaq1M0kA6Y0e1wGUibqay8dAVIx5p089wBiW/dFfIPSDOl
hosuDgfqz1iQCaLtIg5GVkW9ctQ9x5goFP3Kcc+JMzIKQHpK5Mu3HkD6i8Zf
WW8g3bJB/roPkBbnW6n/Ekj/XhjgLRrzyrFO10PkSeIrxzulzedYkl45enGr
cu/JeeXoZ135F0QDAFIS9bs=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedFromAllOthersRanking", "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{"citedFromAllOthers", ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.540985571398896*^9, 3.540985588686658*^9}, {
3.540985725259225*^9, 3.540985735267847*^9}, {3.540985863223688*^9,
3.540985908005618*^9}, 3.540985948191312*^9, {3.540985998115017*^9,
3.540986007650485*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"10", ",", "9", ",", "15", ",", "4", ",", "5", ",", "12", ",", "11", ",",
"13", ",", "19", ",", "17", ",", "8", ",", "18", ",", "16", ",", "20", ",",
"21", ",", "6", ",", "2", ",", "3", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{3.540985617195829*^9, 3.540985738198348*^9,
3.5409859500088367`*^9, 3.5409860086162453`*^9, 3.541050996146903*^9,
3.546669145191002*^9, 3.5466710838231277`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{"jFieldName21", ",", "citedFromAllOthersRanking"}], "}"}], "]"}],
"//", "TableForm"}]], "Input",
CellChangeTimes->{{3.540985796134365*^9, 3.540985822256937*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"\<\"\:52d5\:690d\:7269\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "10"},
{GridBox[{
{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "9"},
{GridBox[{
{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "15"},
{GridBox[{
{"\<\"\:5316\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "4"},
{GridBox[{
{"\<\"\:7269\:6027\:7269\:7406\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "5"},
{GridBox[{
{"\<\"\:5206\:6790\:5316\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "12"},
{GridBox[{
{"\<\"\:5fdc\:7528\:5316\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "11"},
{GridBox[{
{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "13"},
{GridBox[{
{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "19"},
{GridBox[{
{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "17"},
{GridBox[{
{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "8"},
{GridBox[{
{"\<\"\:5730\:7403\:79d1\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "18"},
{GridBox[{
{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "16"},
{GridBox[{
{"\<\"\:6570\:7406\:5de5\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "20"},
{GridBox[{
{"\<\"\:6570\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "21"},
{GridBox[{
{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "6"},
{GridBox[{
{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "2"},
{GridBox[{
{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "3"},
{GridBox[{
{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "7"},
{GridBox[{
{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1"},
{GridBox[{
{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "14"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{{{"\:52d5\:690d\:7269\:5b66"}, 10}, {{
"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66"}, 9}, {{
"\:6c34\:7523\:30fb\:6d77\:6d0b"}, 15}, {{"\:5316\:5b66"}, 4}, {{
"\:7269\:6027\:7269\:7406"}, 5}, {{"\:5206\:6790\:5316\:5b66"}, 12}, {{
"\:5fdc\:7528\:5316\:5b66"}, 11}, {{
"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9"}, 13}, {{
"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9"}, 19}, {{
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\:5de5\:5b66\
"}, 17}, {{"\:6c17\:8c61\:30fb\:74b0\:5883"}, 8}, {{
"\:5730\:7403\:79d1\:5b66"}, 18}, {{
"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66"}, 16}, {{
"\:6570\:7406\:5de5\:5b66"}, 20}, {{"\:6570\:5b66"}, 21}, {{
"\:81e8\:5e8a\:533b\:5b661"}, 6}, {{"\:81e8\:5e8a\:533b\:5b662"}, 2}, {{
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66"}, 3}, {{
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7"}, 7}, {{
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66"}, 1}, {{
"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406"}, 14}}]]], "Output",
CellChangeTimes->{{3.540985806596712*^9, 3.540985823110577*^9},
3.54098595267631*^9, 3.540986011365547*^9, 3.541050996207756*^9,
3.546669145239808*^9, 3.546671083884903*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingToAllOthers", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "citingcited21DataZeroSelf"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.432339908245701*^9, 3.432339954514323*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"94303", ",", "85341", ",", "36127", ",", "219615", ",", "136264", ",",
"66846", ",", "63658", ",", "49720", ",", "16226", ",", "25282", ",",
"72296", ",", "32406", ",", "28065", ",", "8904", ",", "9578", ",",
"161910", ",", "230620", ",", "183175", ",", "118808", ",", "443334", ",",
"35783"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwA+IlooV2qye9dHwduvLjZiDtsH/e9K1A2mCnG9M2IG0i
91XoHpBOTTyzvXzqS8el0XEZHtOA9IIHj45Mf+kYZRa35AKQ5r249aPajJeO
W+Y0aDgAaZbWySEg2jn5y2JXIF0SKF/tCaRX9fx8kwWkO6zv784G0mKHfeML
gPS6hiWsZUD6SvCFynIgfaay7Oj61y8d48r6vDYA6ZwXq6M3A2mPTRzbPBle
ORYsOdZ8wvyV44V8gb+Wtq8cW3T3rdgOpGPSUnR22L1ytJu84d9OIO1vL2W8
C0ivKnz1ax+QvvuHQ28/kC5dqBgMovscuupAdF7OvpI7/q8c3xzZ/uwukD61
SFiFNeCV4+K9Gy04gfTc4huO3EDaZ+6NCh4gPW1BzyEQvTWuLMoUSJc1zGIL
AdKS19jfRgHpI1xsTtFAeqZ2v8NlIP2iYuWlK0A6+E4Pzx0gnSe+O+QfkHa0
iBRdHP7KUUR+USaIDl18KLIq6pVj9QK2RKHoV44J7OdkFID0dM3Xbz2AdIbv
P1lvIM00U/G6D5Be926V/ksgPac6yFs05pXjPUEvkSeJrxw/vWk/x5IEDJ/r
Gtx7coD+n1j7F0QDAPxa/vQ=
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citingcited21Data", "=",
RowBox[{"Transpose", "[", "citedciting21Data", "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.522547922593327*^9, 3.522547966191717*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"ClNamesANDClsizesANDClissues22", "=",
RowBox[{"Import", "[",
RowBox[{"dir", "<>", "\"\</fields-clustersizes-issues.tsv\>\""}], "]"}]}],
"*)"}]], "Input",
CellChangeTimes->{{3.521768178034153*^9, 3.5217682620485153`*^9}, {
3.521768334966795*^9, 3.521768359101509*^9}, {3.53179075035811*^9,
3.531790753629775*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"ClNamesANDClsizesANDClissues22", "//", "Length"}], "*)"}]], "Input",\
CellChangeTimes->{{3.5217691554633703`*^9, 3.521769156738392*^9}, {
3.531790758643167*^9, 3.531790762037306*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDClsizesANDClissues22", "[",
RowBox[{"[", "1", "]"}], "]"}], "[",
RowBox[{"[", "1", "]"}], "]"}], "[",
RowBox[{"[", "0", "]"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.5217689313879623`*^9, 3.521768937245531*^9}, {
3.531790765147044*^9, 3.53179076790388*^9}}],
Cell["I - 3 \:3092I - 2 \:306b\:7d71\:5408", "Text",
CellChangeTimes->{{3.521768831083395*^9, 3.521768849499469*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{
RowBox[{
"ClNamesANDClsizesANDClissues21", "=", "ClNamesANDClsizesANDClissues22"}],
";", "\n",
RowBox[{
RowBox[{"ClNamesANDClsizesANDClissues21", "[",
RowBox[{"[", "17", "]"}], "]"}], "=",
RowBox[{"{",
RowBox[{"\"\<I-2\>\"", ",",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDClsizesANDClissues22", "[",
RowBox[{"[", "17", "]"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "+",
RowBox[{
RowBox[{"ClNamesANDClsizesANDClissues22", "[",
RowBox[{"[", "21", "]"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], ",",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDClsizesANDClissues22", "[",
RowBox[{"[", "17", "]"}], "]"}], "[",
RowBox[{"[", "3", "]"}], "]"}], "+",
RowBox[{
RowBox[{"ClNamesANDClsizesANDClissues22", "[",
RowBox[{"[", "21", "]"}], "]"}], "[",
RowBox[{"[", "3", "]"}], "]"}]}]}], "}"}]}], ";", "\n",
RowBox[{"ClNamesANDClsizesANDClissues21", "=",
RowBox[{"Drop", "[",
RowBox[{"ClNamesANDClsizesANDClissues21", ",",
RowBox[{"{", "21", "}"}]}], "]"}]}]}], "*)"}]], "Input",
CellChangeTimes->{{3.5217690142308187`*^9, 3.5217690215567904`*^9}, {
3.521769110759015*^9, 3.521769125816921*^9}, {3.531790771332988*^9,
3.531790774516089*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"ClNamesANDClsizesANDClissues21", "//", "Length"}], "*)"}]], "Input",\
CellChangeTimes->{{3.521769165501904*^9, 3.521769166843897*^9}, {
3.531790778051598*^9, 3.5317907812518377`*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{
RowBox[{"citingcited21Data", "=",
RowBox[{"Transpose", "[", "citedciting21Data", "]"}]}], ";"}],
"*)"}]], "Input",
CellChangeTimes->{{3.522547922593327*^9, 3.522547966191717*^9}, {
3.5317908313616943`*^9, 3.5317908341316557`*^9}}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Cited / citing table", "Section",
CellChangeTimes->{{3.431730532511324*^9, 3.4317305518237257`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{"citedcitingData", ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames", ",", "NosANDClNames"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.427765107348876*^9, 3.4277651343516293`*^9}, {
3.427765187759768*^9, 3.4277651964573803`*^9}, {3.427869699638796*^9,
3.4278697080691223`*^9}, {3.431733396651161*^9, 3.431733409983955*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"I-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"22", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "188946", "8916", "9838", "934", "562", "1011", "394", "23",
"74", "163", "8033", "2100", "333", "115", "0", "218", "144", "293",
"1756", "2839", "24853", "17"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "7157", "83165", "2329", "6428", "146", "6214", "2337",
"81", "23", "1618", "4885", "621", "78", "42", "0", "13", "969", "4423",
"1018", "6449", "19638", "14"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "8428", "1773", "43839", "335", "91", "416", "68", "12",
"222", "21", "6297", "1090", "26", "10", "0", "3", "117", "65", "1143",
"1113", "4188", "15"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "692", "4926", "268", "571546", "39515", "15556", "24422",
"11849", "507", "7580", "3722", "1613", "479", "53", "0", "96", "959",
"422", "1068", "858", "32565", "744"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "337", "190", "129", "50665", "403763", "4829", "7039",
"24046", "3350", "2374", "3607", "4540", "4727", "1823", "1", "2394",
"1146", "99", "751", "269", "5057", "25433"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "598", "4323", "219", "14115", "3592", "85268", "2261",
"939", "189", "1276", "2955", "628", "282", "60", "0", "9", "418",
"1369", "860", "464", "8288", "124"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "308", "1982", "70", "20113", "4418", "2720", "77685",
"3887", "1034", "2783", "598", "157", "68", "23", "0", "24", "2092",
"425", "361", "463", "4814", "55"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "13", "59", "10", "11878", "18194", "984", "3025", "67463",
"2491", "1549", "309", "373", "379", "282", "5", "22", "271", "11",
"10", "4", "200", "44"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "90", "42", "257", "309", "3243", "202", "1033", "3095",
"33686", "1878", "1704", "310", "1951", "186", "6", "982", "487", "59",
"442", "16", "210", "307"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "215", "1168", "46", "5991", "1818", "1160", "2520", "1471",
"1550", "30056", "2449", "284", "554", "131", "13", "106", "53", "25",
"17", "12", "104", "69"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "8191", "4795", "6357", "4643", "3100", "6240", "872",
"383", "1514", "3465", "137796", "10549", "555", "262", "8", "210",
"384", "2227", "425", "570", "7590", "2460"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "1490", "254", "788", "1219", "1222", "833", "170", "294",
"78", "195", "8998", "58837", "26", "0", "0", "72", "99", "14", "24",
"38", "1506", "605"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "319", "81", "53", "508", "3916", "223", "109", "520",
"1761", "946", "673", "132", "88752", "3275", "50", "3283", "1230",
"593", "1623", "60", "1513", "192"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "369", "52", "83", "94", "1812", "85", "49", "432", "354",
"289", "535", "48", "3511", "19785", "75", "615", "259", "848", "183",
"62", "528", "23"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"I-3\"\>"}], "}"}],
HoldForm], "2", "1", "0", "1", "17", "0", "2", "18", "37", "27", "9",
"0", "49", "91", "204", "3", "1", "0", "0", "0", "0", "0"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "265", "13", "12", "110", "2011", "4", "19", "44", "949",
"115", "76", "118", "3766", "529", "0", "28792", "42", "22", "32", "17",
"157", "1293"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "212", "1303", "167", "2535", "1389", "894", "4630", "863",
"616", "65", "691", "110", "1800", "200", "4", "29", "239889", "37875",
"13273", "5445", "53062", "199"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "635", "8719", "366", "3457", "269", "2978", "1267", "18",
"98", "93", "4516", "84", "1061", "789", "0", "9", "55372", "414878",
"32923", "28083", "142398", "16"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "1918", "1355", "1723", "4254", "765", "1192", "627", "11",
"496", "35", "1095", "173", "2825", "177", "1", "64", "13873", "28591",
"343063", "4739", "94108", "58"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "2735", "6834", "1236", "1970", "375", "789", "792", "9",
"11", "10", "680", "125", "91", "49", "0", "22", "5175", "17796",
"3549", "140776", "41456", "0"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "60318", "38548", "12174", "88621", "30036", "20303",
"11894", "1596", "581", "732", "17038", "8527", "5138", "740", "0",
"402", "78594", "135450", "123705", "67304", "1703555", "4115"},
{
TagBox[
RowBox[{"{",
RowBox[{"22", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "11", "7", "2", "1435", "19773", "213", "128", "129", "291",
"68", "3426", "824", "366", "70", "0", "1002", "225", "13", "12", "3",
"1099", "241828"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "I-3"}, {
16, "M"}, {17, "Me-1"}, {18, "Me-2"}, {19, "Me-3"}, {20, "Me-4"}, {
21, "Mo"}, {22, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {
4, "C-1"}, {5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {
10, "E-3"}, {11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {
15, "I-3"}, {16, "M"}, {17, "Me-1"}, {18, "Me-2"}, {19, "Me-3"}, {
20, "Me-4"}, {21, "Mo"}, {22, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVz30s1HEcB/ATdytJytEDM2dWRg9KzsnD7nuLTndNYR7ujJwe5iiXyUOh
eZinVcLlYcyukB6EEidTLsxu2tJyTaIrivX7tbOdfyrSev/++Oy1vffe57MP
T5Eecc6CxWLJMdv8enLNFRTRLJu3/oJbBybOMLrsYgXwKinCy9IVusMhacjX
UFjZ9MVHDAN77o5yb1Gk2CFmxAeO/xnV66BJIe+ch0rjBwPj+drYBH4VRXS5
4U6J8NDzDmMy/JscICqBOftW95fBAs9xaVE18vCB4htwcXdPZhdUlkjKGSMK
+ae1cMlh7MEUnNjYWW1Vg1xfNMuBc5zFOF8Y6OYk4sO8J1rneCikMlyvQz/f
jNpC+KlRZVMEBS+WZzsg27rG9iE82qKkHkF1Rbe5F55daq/vg6v5Jzf0Q9dQ
W3sj9Gie0Wbfwb3fF1LEdRTpD15ZGKvHfw2X2t5BQ8GMeU8DRW6zKzyEsCW1
M4rREKlqC4GD7fnXwuAJeYZJCb2nYoZSoeNoVKIKBhsfs7OgXexMbjZ0T+dJ
en5SZKG2S94Le19b94exaHJF41um96OJIIC77h9EE050+sWBYJp4HPe3G4QW
ypUjjJq85dVX8EfflgPDUOZVVcA4fvNN5lw4TVSXXy59hvySne7sUzRJOKwV
bIKlTfNkM/TifsuxgZP31COMx8qLZb7waZqGEwX5YnuTDDqWW4vk0NJBLZyC
6tau9wb4MbrGZg6KGoej/jG9NZ8drTE0EU52pjDeF0zEXZXRRLeXl7RdTpMx
72lnV5jQvWISQ2mzpYsE6p09p6XQLefZQQrWWcskDvE0WQuK5H5PoonCu/6t
lQL7I0vXh9Jo8h+TfXEn
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{"citedciting21Data", ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.427765107348876*^9, 3.4277651343516293`*^9}, {
3.427765187759768*^9, 3.4277651964573803`*^9}, {3.427869699638796*^9,
3.4278697080691223`*^9}, {3.431733396651161*^9, 3.431733440914536*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "188946", "8916", "9838", "934", "562", "1011", "394", "23",
"74", "163", "8033", "2100", "333", "115", "218", "144", "293", "1756",
"2839", "24853", "17"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "7157", "83165", "2329", "6428", "146", "6214", "2337",
"81", "23", "1618", "4885", "621", "78", "42", "13", "969", "4423",
"1018", "6449", "19638", "14"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "8428", "1773", "43839", "335", "91", "416", "68", "12",
"222", "21", "6297", "1090", "26", "10", "3", "117", "65", "1143",
"1113", "4188", "15"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "692", "4926", "268", "571546", "39515", "15556", "24422",
"11849", "507", "7580", "3722", "1613", "479", "53", "96", "959", "422",
"1068", "858", "32565", "744"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "337", "190", "129", "50665", "403763", "4829", "7039",
"24046", "3350", "2374", "3607", "4540", "4727", "1824", "2394", "1146",
"99", "751", "269", "5057", "25433"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "598", "4323", "219", "14115", "3592", "85268", "2261",
"939", "189", "1276", "2955", "628", "282", "60", "9", "418", "1369",
"860", "464", "8288", "124"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "308", "1982", "70", "20113", "4418", "2720", "77685",
"3887", "1034", "2783", "598", "157", "68", "23", "24", "2092", "425",
"361", "463", "4814", "55"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "13", "59", "10", "11878", "18194", "984", "3025", "67463",
"2491", "1549", "309", "373", "379", "287", "22", "271", "11", "10",
"4", "200", "44"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "90", "42", "257", "309", "3243", "202", "1033", "3095",
"33686", "1878", "1704", "310", "1951", "192", "982", "487", "59",
"442", "16", "210", "307"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "215", "1168", "46", "5991", "1818", "1160", "2520", "1471",
"1550", "30056", "2449", "284", "554", "144", "106", "53", "25", "17",
"12", "104", "69"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "8191", "4795", "6357", "4643", "3100", "6240", "872",
"383", "1514", "3465", "137796", "10549", "555", "270", "210", "384",
"2227", "425", "570", "7590", "2460"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "1490", "254", "788", "1219", "1222", "833", "170", "294",
"78", "195", "8998", "58837", "26", "0", "72", "99", "14", "24", "38",
"1506", "605"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "319", "81", "53", "508", "3916", "223", "109", "520",
"1761", "946", "673", "132", "88752", "3325", "3283", "1230", "593",
"1623", "60", "1513", "192"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "371", "53", "83", "95", "1829", "85", "51", "450", "391",
"316", "544", "48", "3560", "20155", "618", "260", "848", "183", "62",
"528", "23"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "265", "13", "12", "110", "2011", "4", "19", "44", "949",
"115", "76", "118", "3766", "529", "28792", "42", "22", "32", "17",
"157", "1293"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "212", "1303", "167", "2535", "1389", "894", "4630", "863",
"616", "65", "691", "110", "1800", "204", "29", "239889", "37875",
"13273", "5445", "53062", "199"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "635", "8719", "366", "3457", "269", "2978", "1267", "18",
"98", "93", "4516", "84", "1061", "789", "9", "55372", "414878",
"32923", "28083", "142398", "16"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "1918", "1355", "1723", "4254", "765", "1192", "627", "11",
"496", "35", "1095", "173", "2825", "178", "64", "13873", "28591",
"343063", "4739", "94108", "58"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "2735", "6834", "1236", "1970", "375", "789", "792", "9",
"11", "10", "680", "125", "91", "49", "22", "5175", "17796", "3549",
"140776", "41456", "0"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "60318", "38548", "12174", "88621", "30036", "20303",
"11894", "1596", "581", "732", "17038", "8527", "5138", "740", "402",
"78594", "135450", "123705", "67304", "1703555", "4115"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "11", "7", "2", "1435", "19773", "213", "128", "129", "291",
"68", "3426", "824", "366", "70", "1002", "225", "13", "12", "3",
"1099", "241828"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzmtIk2EABeAVU4itJeWKmMiSKEswCWcTSvZKl+kkTUblNokNCsxECctV
omWlJiTToYuimF2wLMfGcluRGlk4WkXlajKnXRzq9zZLRZzkXJ3vx+H5cw6c
TbrywuMrOBzOAUSyNNBoaWHI+g7pISf88u7rwyFoUPe3cFsZcjdyfSQWhhLn
iiSQPknJzoA/Qm8SNDD5zmVxLbxSO2e8BB/bLvLrYMaamZFOKDIYBY/g4Wgp
08Xuvltn7dDi6zb1wIjj4EoH23OnrRuD9dTvrGpjSNrP0yXydoYMOwXjr00M
aR3V3/8Im0Th2S03GGJuaEqWwROebiXrP2HWg33wjKfnQg4Mzu//fRLG7Uzt
LYU1zZpjFbDYZI85Cz2T/nNVUJy/VWH9hR9ym9oOd5PVjhwOxU9pg3sXJd5c
4XLmHkqmBirLXFmUTMgH457DSV04nTWz+s/fPpg3KEjth9vTDTWsC83vKwP5
lCQ5+yZG4eKzjZtjCigprHBJV0Hzt3HCg9vCQT0f3ja3v2J1O66qJNBl74hV
QmckfloFNW952WrYVdcmG4J6rfWzF17jGfkBWD32UhmFe8u8G+4doSS33FLC
OuP3FJ1XUVK/mKRdq6ZEFhpOEENb8fy0HBYscRMVcOpTii8PBsRPdzDwaK9a
IdRQcsunjA9qsVu4+YGroyQqalx+cYqS/yjsMcY=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"colors21", "=",
RowBox[{"{",
RowBox[{
"Red", ",", "Green", ",", "Blue", ",", "Cyan", ",", "Magenta", ",",
"Yellow", ",", "Black", ",",
RowBox[{"GrayLevel", "[", "0.2", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.4", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.6", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.8", "]"}], ",", "White", ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.7", ",", "0", ",", "0"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "0.7", ",", "0"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "0", ",", "0.7"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0.75", ",", "0", ",", "0", ",", "0.5"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0.75", ",", "0", ",", "0.5"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0", ",", "0.75", ",", "0.5"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.7", ",", "0.5", ",", "0.2"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.2", ",", "0.7", ",", "0.5"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.5", ",", "0.2", ",", "0.7"}], "]"}]}], "}"}]}]], "Input",
CellChangeTimes->{{3.435020043307989*^9, 3.435020188192401*^9}, {
3.435020219103031*^9, 3.435020331933114*^9}, {3.435020393984289*^9,
3.435020485030349*^9}, {3.435020517504756*^9, 3.435020558833068*^9}, {
3.435020594992538*^9, 3.43502062331883*^9}, {3.435020754341114*^9,
3.435020806535901*^9}, {3.4350209175916233`*^9, 3.435021009076075*^9}, {
3.4350210437592087`*^9, 3.435021071453431*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"RGBColor", "[",
RowBox[{"1", ",", "0", ",", "0"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "1", ",", "0"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "0", ",", "1"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "1", ",", "1"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"1", ",", "0", ",", "1"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"1", ",", "1", ",", "0"}], "]"}], ",",
RowBox[{"GrayLevel", "[", "0", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.2`", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.4`", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.6`", "]"}], ",",
RowBox[{"GrayLevel", "[", "0.8`", "]"}], ",",
RowBox[{"GrayLevel", "[", "1", "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.7`", ",", "0", ",", "0"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "0.7`", ",", "0"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "0", ",", "0.7`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0.75`", ",", "0", ",", "0", ",", "0.5`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0.75`", ",", "0", ",", "0.5`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0", ",", "0.75`", ",", "0.5`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.7`", ",", "0.5`", ",", "0.2`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.2`", ",", "0.7`", ",", "0.5`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.5`", ",", "0.2`", ",", "0.7`"}], "]"}]}], "}"}]], "Output",
CellChangeTimes->{{3.4350209057108927`*^9, 3.4350209694235764`*^9},
3.4350210103612003`*^9, 3.435021072319352*^9, 3.435037989146749*^9,
3.435214735733918*^9, 3.435266372368533*^9, 3.43526672547083*^9,
3.435277615619907*^9, 3.435285471056136*^9, 3.435353976096678*^9,
3.43535563425333*^9, 3.4353651149322557`*^9, 3.4353766856568613`*^9,
3.435379662880471*^9, 3.4790119293948517`*^9, 3.479018205620316*^9,
3.48981188849303*^9, 3.518907449817999*^9, 3.521761256691449*^9,
3.522544491691895*^9, 3.5225478524960737`*^9, 3.5225481357538652`*^9,
3.52255791150712*^9, 3.522558320474864*^9, 3.522558964519414*^9,
3.5315311744780912`*^9, 3.5315341339917603`*^9, 3.531614496816786*^9,
3.531622853794622*^9, 3.531627023186925*^9, 3.531629511209263*^9,
3.531630100761084*^9, 3.53171323623514*^9, 3.531776053089869*^9,
3.5317901846967497`*^9, 3.5317908643990393`*^9, 3.532036612714046*^9,
3.532039829564489*^9, 3.532054628611053*^9, 3.532124838040635*^9,
3.535608004490437*^9, 3.535608653498961*^9, 3.537097422414775*^9,
3.53740877714132*^9, 3.537436902824835*^9, 3.537520495680188*^9,
3.537524976200398*^9, 3.537528505411191*^9, 3.53784870167454*^9,
3.53793903490978*^9, 3.540983970692868*^9, 3.541050996952032*^9,
3.546671084292831*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{"{",
RowBox[{
RowBox[{"PointSize", "[", "0.5", "]"}], ",",
RowBox[{"Thread", "[",
RowBox[{"{",
RowBox[{"colors21", ",",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"1", ",", "n"}], "}"}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}]}], "}"}], "]"}]}], "}"}],
"]"}]], "Input",
CellChangeTimes->{{3.4350185319584293`*^9, 3.435018627305739*^9}, {
3.4350186679206753`*^9, 3.435018748150076*^9}, {3.435018792767614*^9,
3.4350188178937187`*^9}}],
Cell[BoxData[
GraphicsBox[
{PointSize[0.5],
{RGBColor[1, 0, 0], PointBox[{1, 1}]},
{RGBColor[0, 1, 0], PointBox[{1, 2}]},
{RGBColor[0, 0, 1], PointBox[{1, 3}]},
{RGBColor[0, 1, 1], PointBox[{1, 4}]},
{RGBColor[1, 0, 1], PointBox[{1, 5}]},
{RGBColor[1, 1, 0], PointBox[{1, 6}]},
{GrayLevel[0], PointBox[{1, 7}]},
{GrayLevel[0.2], PointBox[{1, 8}]},
{GrayLevel[0.4], PointBox[{1, 9}]},
{GrayLevel[0.6], PointBox[{1, 10}]},
{GrayLevel[0.8], PointBox[{1, 11}]},
{GrayLevel[1], PointBox[{1, 12}]},
{RGBColor[0.7, 0, 0], PointBox[{1, 13}]},
{RGBColor[0, 0.7, 0], PointBox[{1, 14}]},
{RGBColor[0, 0, 0.7], PointBox[{1, 15}]},
{CMYKColor[0.75, 0, 0, 0.5], PointBox[{1, 16}]},
{CMYKColor[0, 0.75, 0, 0.5], PointBox[{1, 17}]},
{CMYKColor[0, 0, 0.75, 0.5], PointBox[{1, 18}]},
{RGBColor[0.7, 0.5, 0.2], PointBox[{1, 19}]},
{RGBColor[0.2, 0.7, 0.5], PointBox[{1, 20}]},
{RGBColor[0.5, 0.2, 0.7], PointBox[{1, 21}]}},
ImageSize->{41.316006600660074`, Automatic}]], "Output",
CellChangeTimes->{{3.4350185572343693`*^9, 3.4350186281698112`*^9}, {
3.4350186711876783`*^9, 3.4350186987634487`*^9}, 3.4350187493461037`*^9, {
3.435018801204932*^9, 3.435018818936056*^9}, 3.435018996645197*^9, {
3.435019058156787*^9, 3.4350190932361717`*^9}, 3.4350191320002117`*^9,
3.435019886931283*^9, 3.435020192162088*^9, {3.435020449581106*^9,
3.4350204526058617`*^9}, 3.43502056587426*^9, {3.4350206110184402`*^9,
3.435020626745613*^9}, 3.435020688468635*^9, {3.435020739769804*^9,
3.4350208126264057`*^9}, 3.4350208749522038`*^9, {3.435020908903693*^9,
3.4350209726444883`*^9}, 3.435021013844139*^9, 3.43502107594411*^9,
3.435037991192713*^9, 3.4352147362282467`*^9, 3.43526637287922*^9,
3.4352667266618633`*^9, 3.435277629223136*^9, 3.435285474800249*^9,
3.435353990535935*^9, 3.4353556516028976`*^9, 3.435365115178355*^9,
3.435376686421422*^9, 3.435379663349811*^9, 3.47901192968001*^9,
3.479018205750263*^9, 3.4898118886190577`*^9, 3.518907449937333*^9,
3.521761256752922*^9, 3.522544491784445*^9, 3.522547858275407*^9,
3.522548135818434*^9, 3.522557911570527*^9, 3.5225583205484257`*^9,
3.52255896458215*^9, 3.531531174558769*^9, 3.531534134053173*^9,
3.531614496878977*^9, 3.5316228538570347`*^9, 3.5316270233305883`*^9,
3.5316295113154097`*^9, 3.531630100829035*^9, 3.53171323630302*^9,
3.531776053152789*^9, 3.531790184761448*^9, 3.531790864499207*^9,
3.532036612831293*^9, 3.532039829680853*^9, 3.53205462872008*^9,
3.532124838104463*^9, 3.535608017867679*^9, 3.535608653550523*^9,
3.537097422469118*^9, 3.5374087772098618`*^9, 3.537436902962798*^9,
3.5375204957336206`*^9, 3.537524976253765*^9, 3.537528505463311*^9,
3.537848701742392*^9, 3.5379390349774437`*^9, 3.540983970745049*^9,
3.541050997054233*^9, 3.5466710843444853`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"cited21Barchart", "=",
RowBox[{"StackedBarChart", "[",
RowBox[{"citingcited21Data", ",",
RowBox[{"BarLabels", "\[Rule]", "ClNames21"}], ",",
RowBox[{"BarStyle", "\[Rule]", "colors21"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.435014068576029*^9, 3.4350140803502617`*^9},
3.4350141253521137`*^9, {3.435014157001917*^9, 3.435014191119093*^9}, {
3.435014240591082*^9, 3.4350142449419117`*^9}, {3.435014277362636*^9,
3.435014281223608*^9}, {3.435014312170826*^9, 3.435014315824049*^9}, {
3.435014693790732*^9, 3.4350146995463057`*^9}, {3.4350174244288883`*^9,
3.435017436926383*^9}, {3.435019169299058*^9, 3.435019179852263*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 188946.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 7157.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 8428.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 692.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 337.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 0}, {6.3999999999999995`, 598.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 0}, {7.3999999999999995`, 308.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 0}, {8.4, 13.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 0}, {9.4, 90.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 0}, {10.4, 215.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 0}, {11.4, 8191.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 0}, {12.4, 1490.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 0}, {13.4, 319.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 0}, {14.4, 371.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 0}, {15.4, 265.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 0}, {16.4, 212.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 0}, {17.400000000000002`, 635.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 0}, {18.400000000000002`, 1918.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 0}, {19.400000000000002`, 2735.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 0}, {20.400000000000002`, 60318.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 0}, {21.400000000000002`, 11.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 188946}, {1.4, 197862.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 7157}, {2.4000000000000004`, 90322.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 8428}, {3.4000000000000004`, 10201.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 692}, {4.4, 5618.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337}, {5.3999999999999995`, 527.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 598}, {6.3999999999999995`, 4921.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 308}, {7.3999999999999995`, 2290.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 13}, {8.4, 72.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 90}, {9.4, 132.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 215}, {10.4, 1383.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 8191}, {11.4, 12986.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 1490}, {12.4, 1744.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 319}, {13.4, 400.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 371}, {14.4, 424.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 265}, {15.4, 278.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 212}, {16.4, 1515.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 635}, {17.400000000000002`, 9354.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 1918}, {18.400000000000002`, 3273.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 2735}, {19.400000000000002`, 9569.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 60318}, {20.400000000000002`, 98866.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 11}, {21.400000000000002`, 18.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 197862}, {1.4, 207700.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 90322}, {2.4000000000000004`, 92651.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 10201}, {3.4000000000000004`, 54040.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5618}, {4.4, 5886.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 527}, {5.3999999999999995`, 656.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 4921}, {6.3999999999999995`, 5140.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2290}, {7.3999999999999995`, 2360.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 72}, {8.4, 82.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 132}, {9.4, 389.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1383}, {10.4, 1429.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 12986}, {11.4, 19343.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 1744}, {12.4, 2532.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 400}, {13.4, 453.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 424}, {14.4, 507.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 278}, {15.4, 290.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1515}, {16.4, 1682.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9354}, {17.400000000000002`, 9720.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 3273}, {18.400000000000002`, 4996.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 9569}, {19.400000000000002`, 10805.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 98866}, {20.400000000000002`, 111040.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 18}, {21.400000000000002`, 20.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 207700}, {1.4, 208634.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 92651}, {2.4000000000000004`, 99079.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54040}, {3.4000000000000004`, 54375.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5886}, {4.4, 577432.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 656}, {5.3999999999999995`, 51321.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 5140}, {6.3999999999999995`, 19255.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2360}, {7.3999999999999995`, 22473.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 82}, {8.4, 11960.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 389}, {9.4, 698.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1429}, {10.4, 7420.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 19343}, {11.4, 23986.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 2532}, {12.4, 3751.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 453}, {13.4, 961.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 507}, {14.4, 602.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 290}, {15.4, 400.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1682}, {16.4, 4217.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9720}, {17.400000000000002`, 13177.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 4996}, {18.400000000000002`, 9250.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 10805}, {19.400000000000002`, 12775.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 111040}, {20.400000000000002`, 199661.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 20}, {21.400000000000002`, 1455.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 208634}, {1.4, 209196.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 99079}, {2.4000000000000004`, 99225.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54375}, {3.4000000000000004`, 54466.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 577432}, {4.4, 616947.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 51321}, {5.3999999999999995`, 455084.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 19255}, {6.3999999999999995`, 22847.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 22473}, {7.3999999999999995`, 26891.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 11960}, {8.4, 30154.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 698}, {9.4, 3941.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 7420}, {10.4, 9238.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 23986}, {11.4, 27086.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 3751}, {12.4, 4973.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 961}, {13.4, 4877.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 602}, {14.4, 2431.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 400}, {15.4, 2411.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 4217}, {16.4, 5606.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 13177}, {17.400000000000002`, 13446.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9250}, {18.400000000000002`, 10015.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12775}, {19.400000000000002`, 13150.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 199661}, {20.400000000000002`, 229697.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 1455}, {21.400000000000002`, 21228.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 209196}, {1.4, 210207.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 99225}, {2.4000000000000004`, 105439.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54466}, {3.4000000000000004`, 54882.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 616947}, {4.4, 632503.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 455084}, {5.3999999999999995`, 459913.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 22847}, {6.3999999999999995`, 108115.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 26891}, {7.3999999999999995`, 29611.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 30154}, {8.4, 31138.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 3941}, {9.4, 4143.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 9238}, {10.4, 10398.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 27086}, {11.4, 33326.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 4973}, {12.4, 5806.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 4877}, {13.4, 5100.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2431}, {14.4, 2516.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2411}, {15.4, 2415.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 5606}, {16.4, 6500.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 13446}, {17.400000000000002`, 16424.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 10015}, {18.400000000000002`, 11207.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13150}, {19.400000000000002`, 13939.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 229697}, {20.400000000000002`, 250000.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21228}, {21.400000000000002`, 21441.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210207}, {1.4, 210601.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105439}, {2.4000000000000004`, 107776.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54882}, {3.4000000000000004`, 54950.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 632503}, {4.4, 656925.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 459913}, {5.3999999999999995`, 466952.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 108115}, {6.3999999999999995`, 110376.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 29611}, {7.3999999999999995`, 107296.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 31138}, {8.4, 34163.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 4143}, {9.4, 5176.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 10398}, {10.4, 12918.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 33326}, {11.4, 34198.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 5806}, {12.4, 5976.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5100}, {13.4, 5209.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2516}, {14.4, 2567.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2415}, {15.4, 2434.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6500}, {16.4, 11130.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 16424}, {17.400000000000002`, 17691.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 11207}, {18.400000000000002`, 11834.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13939}, {19.400000000000002`, 14731.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 250000}, {20.400000000000002`, 261894.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21441}, {21.400000000000002`, 21569.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210601}, {1.4, 210624.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 107776}, {2.4000000000000004`, 107857.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54950}, {3.4000000000000004`, 54962.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 656925}, {4.4, 668774.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 466952}, {5.3999999999999995`, 490998.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 110376}, {6.3999999999999995`, 111315.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 107296}, {7.3999999999999995`, 111183.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 34163}, {8.4, 101626.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 5176}, {9.4, 8271.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 12918}, {10.4, 14389.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 34198}, {11.4, 34581.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 5976}, {12.4, 6270.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5209}, {13.4, 5729.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2567}, {14.4, 3017.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2434}, {15.4, 2478.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 11130}, {16.4, 11993.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17691}, {17.400000000000002`, 17709.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 11834}, {18.400000000000002`, 11845.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14731}, {19.400000000000002`, 14740.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 261894}, {20.400000000000002`, 263490.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21569}, {21.400000000000002`, 21698.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210624}, {1.4, 210698.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 107857}, {2.4000000000000004`, 107880.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54962}, {3.4000000000000004`, 55184.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 668774}, {4.4, 669281.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 490998}, {5.3999999999999995`, 494348.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 111315}, {6.3999999999999995`, 111504.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 111183}, {7.3999999999999995`, 112217.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 101626}, {8.4, 104117.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 8271}, {9.4, 41957.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 14389}, {10.4, 15939.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 34581}, {11.4, 36095.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 6270}, {12.4, 6348.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5729}, {13.4, 7490.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3017}, {14.4, 3408.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2478}, {15.4, 3427.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 11993}, {16.4, 12609.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17709}, {17.400000000000002`, 17807.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 11845}, {18.400000000000002`, 12341.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14740}, {19.400000000000002`, 14751.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 263490}, {20.400000000000002`, 264071.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21698}, {21.400000000000002`, 21989.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210698}, {1.4, 210861.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 107880}, {2.4000000000000004`, 109498.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 55184}, {3.4000000000000004`, 55205.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 669281}, {4.4, 676861.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 494348}, {5.3999999999999995`, 496722.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 111504}, {6.3999999999999995`, 112780.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 112217}, {7.3999999999999995`, 115000.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 104117}, {8.4, 105666.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 41957}, {9.4, 43835.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 15939}, {10.4, 45995.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 36095}, {11.4, 39560.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 6348}, {12.4, 6543.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 7490}, {13.4, 8436.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3408}, {14.4, 3724.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3427}, {15.4, 3542.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 12609}, {16.4, 12674.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17807}, {17.400000000000002`, 17900.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 12341}, {18.400000000000002`, 12376.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14751}, {19.400000000000002`, 14761.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 264071}, {20.400000000000002`, 264803.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21989}, {21.400000000000002`, 22057.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210861}, {1.4, 218894.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 109498}, {2.4000000000000004`, 114383.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 55205}, {3.4000000000000004`, 61502.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 676861}, {4.4, 680583.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 496722}, {5.3999999999999995`, 500329.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 112780}, {6.3999999999999995`, 115735.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115000}, {7.3999999999999995`, 115598.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 105666}, {8.4, 105975.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 43835}, {9.4, 45539.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 45995}, {10.4, 48444.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 39560}, {11.4, 177356.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 6543}, {12.4, 15541.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 8436}, {13.4, 9109.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3724}, {14.4, 4268.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3542}, {15.4, 3618.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 12674}, {16.4, 13365.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17900}, {17.400000000000002`, 22416.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 12376}, {18.400000000000002`, 13471.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14761}, {19.400000000000002`, 15441.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 264803}, {20.400000000000002`, 281841.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 22057}, {21.400000000000002`, 25483.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 218894}, {1.4, 220994.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 114383}, {2.4000000000000004`, 115004.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 61502}, {3.4000000000000004`, 62592.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 680583}, {4.4, 682196.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 500329}, {5.3999999999999995`, 504869.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 115735}, {6.3999999999999995`, 116363.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115598}, {7.3999999999999995`, 115755.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 105975}, {8.4, 106348.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 45539}, {9.4, 45849.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 48444}, {10.4, 48728.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 177356}, {11.4, 187905.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 15541}, {12.4, 74378.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9109}, {13.4, 9241.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 4268}, {14.4, 4316.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3618}, {15.4, 3736.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 13365}, {16.4, 13475.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 22416}, {17.400000000000002`, 22500.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 13471}, {18.400000000000002`, 13644.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15441}, {19.400000000000002`, 15566.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 281841}, {20.400000000000002`, 290368.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 25483}, {21.400000000000002`, 26307.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 220994}, {1.4, 221327.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115004}, {2.4000000000000004`, 115082.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62592}, {3.4000000000000004`, 62618.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682196}, {4.4, 682675.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 504869}, {5.3999999999999995`, 509596.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116363}, {6.3999999999999995`, 116645.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115755}, {7.3999999999999995`, 115823.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 106348}, {8.4, 106727.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 45849}, {9.4, 47800.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 48728}, {10.4, 49282.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 187905}, {11.4, 188460.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74378}, {12.4, 74404.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9241}, {13.4, 97993.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 4316}, {14.4, 7876.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3736}, {15.4, 7502.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 13475}, {16.4, 15275.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 22500}, {17.400000000000002`, 23561.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 13644}, {18.400000000000002`, 16469.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15566}, {19.400000000000002`, 15657.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 290368}, {20.400000000000002`, 295506.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26307}, {21.400000000000002`, 26673.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221327}, {1.4, 221442.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115082}, {2.4000000000000004`, 115124.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62618}, {3.4000000000000004`, 62628.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682675}, {4.4, 682728.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 509596}, {5.3999999999999995`, 511420.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116645}, {6.3999999999999995`, 116705.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115823}, {7.3999999999999995`, 115846.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 106727}, {8.4, 107014.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 47800}, {9.4, 47992.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49282}, {10.4, 49426.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188460}, {11.4, 188730.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74404}, {12.4, 74404.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 97993}, {13.4, 101318.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 7876}, {14.4, 28031.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 7502}, {15.4, 8031.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 15275}, {16.4, 15479.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 23561}, {17.400000000000002`, 24350.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 16469}, {18.400000000000002`, 16647.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15657}, {19.400000000000002`, 15706.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 295506}, {20.400000000000002`, 296246.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26673}, {21.400000000000002`, 26743.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221442}, {1.4, 221660.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115124}, {2.4000000000000004`, 115137.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62628}, {3.4000000000000004`, 62631.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682728}, {4.4, 682824.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 511420}, {5.3999999999999995`, 513814.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116705}, {6.3999999999999995`, 116714.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115846}, {7.3999999999999995`, 115870.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107014}, {8.4, 107036.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 47992}, {9.4, 48974.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49426}, {10.4, 49532.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188730}, {11.4, 188940.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74404}, {12.4, 74476.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 101318}, {13.4, 104601.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28031}, {14.4, 28649.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 8031}, {15.4, 36823.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 15479}, {16.4, 15508.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 24350}, {17.400000000000002`, 24359.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 16647}, {18.400000000000002`, 16711.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15706}, {19.400000000000002`, 15728.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 296246}, {20.400000000000002`, 296648.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26743}, {21.400000000000002`, 27745.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221660}, {1.4, 221804.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115137}, {2.4000000000000004`, 116106.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62631}, {3.4000000000000004`, 62748.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682824}, {4.4, 683783.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 513814}, {5.3999999999999995`, 514960.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116714}, {6.3999999999999995`, 117132.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115870}, {7.3999999999999995`, 117962.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107036}, {8.4, 107307.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 48974}, {9.4, 49461.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49532}, {10.4, 49585.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188940}, {11.4, 189324.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74476}, {12.4, 74575.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 104601}, {13.4, 105831.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28649}, {14.4, 28909.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36823}, {15.4, 36865.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 15508}, {16.4, 255397.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 24359}, {17.400000000000002`, 79731.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 16711}, {18.400000000000002`, 30584.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15728}, {19.400000000000002`, 20903.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 296648}, {20.400000000000002`, 375242.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27745}, {21.400000000000002`, 27970.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221804}, {1.4, 222097.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 116106}, {2.4000000000000004`, 120529.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62748}, {3.4000000000000004`, 62813.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 683783}, {4.4, 684205.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 514960}, {5.3999999999999995`, 515059.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 117132}, {6.3999999999999995`, 118501.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 117962}, {7.3999999999999995`, 118387.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107307}, {8.4, 107318.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49461}, {9.4, 49520.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49585}, {10.4, 49610.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 189324}, {11.4, 191551.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74575}, {12.4, 74589.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 105831}, {13.4, 106424.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28909}, {14.4, 29757.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36865}, {15.4, 36887.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 255397}, {16.4, 293272.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 79731}, {17.400000000000002`, 494609.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 30584}, {18.400000000000002`, 59175.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 20903}, {19.400000000000002`, 38699.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 375242}, {20.400000000000002`, 510692.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27970}, {21.400000000000002`, 27983.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 222097}, {1.4, 223853.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 120529}, {2.4000000000000004`, 121547.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62813}, {3.4000000000000004`, 63956.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 684205}, {4.4, 685273.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 515059}, {5.3999999999999995`, 515810.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 118501}, {6.3999999999999995`, 119361.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 118387}, {7.3999999999999995`, 118748.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107318}, {8.4, 107328.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49520}, {9.4, 49962.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49610}, {10.4, 49627.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 191551}, {11.4, 191976.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74589}, {12.4, 74613.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 106424}, {13.4, 108047.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 29757}, {14.4, 29940.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36887}, {15.4, 36919.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 293272}, {16.4, 306545.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 494609}, {17.400000000000002`, 527532.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 59175}, {18.400000000000002`, 402238.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 38699}, {19.400000000000002`, 42248.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 510692}, {20.400000000000002`, 634397.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27983}, {21.400000000000002`, 27995.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 223853}, {1.4, 226692.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 121547}, {2.4000000000000004`, 127996.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 63956}, {3.4000000000000004`, 65069.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 685273}, {4.4, 686131.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 515810}, {5.3999999999999995`, 516079.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 119361}, {6.3999999999999995`, 119825.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 118748}, {7.3999999999999995`, 119211.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107328}, {8.4, 107332.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49962}, {9.4, 49978.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49627}, {10.4, 49639.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 191976}, {11.4, 192546.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74613}, {12.4, 74651.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 108047}, {13.4, 108107.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 29940}, {14.4, 30002.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36919}, {15.4, 36936.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 306545}, {16.4, 311990.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 527532}, {17.400000000000002`, 555615.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 402238}, {18.400000000000002`, 406977.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 42248}, {19.400000000000002`, 183024.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 634397}, {20.400000000000002`, 701701.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27995}, {21.400000000000002`, 27998.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 226692}, {1.4, 251545.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 127996}, {2.4000000000000004`, 147634.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 65069}, {3.4000000000000004`, 69257.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 686131}, {4.4, 718696.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 516079}, {5.3999999999999995`, 521136.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 119825}, {6.3999999999999995`, 128113.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 119211}, {7.3999999999999995`, 124025.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107332}, {8.4, 107532.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49978}, {9.4, 50188.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49639}, {10.4, 49743.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 192546}, {11.4, 200136.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74651}, {12.4, 76157.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 108107}, {13.4, 109620.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 30002}, {14.4, 30530.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36936}, {15.4, 37093.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 311990}, {16.4, 365052.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 555615}, {17.400000000000002`, 698013.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 406977}, {18.400000000000002`, 501085.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 183024}, {19.400000000000002`, 224480.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 701701}, {20.400000000000002`, 2.405256*^6}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27998}, {21.400000000000002`, 29097.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 251545}, {1.4, 251562.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 147634}, {2.4000000000000004`, 147648.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 69257}, {3.4000000000000004`, 69272.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 718696}, {4.4, 719440.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 521136}, {5.3999999999999995`, 546569.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 128113}, {6.3999999999999995`, 128237.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 124025}, {7.3999999999999995`, 124080.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107532}, {8.4, 107576.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 50188}, {9.4, 50495.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49743}, {10.4, 49812.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 200136}, {11.4, 202596.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 76157}, {12.4, 76762.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 109620}, {13.4, 109812.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 30530}, {14.4, 30553.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 37093}, {15.4, 38386.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 365052}, {16.4, 365251.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 698013}, {17.400000000000002`, 698029.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 501085}, {18.400000000000002`, 501143.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 224480}, {19.400000000000002`, 224480.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 2405256}, {20.400000000000002`, 2.409371*^6}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 29097}, {21.400000000000002`, 270925.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"B-1\"", TraditionalForm], 0}, {2,
FormBox["\"B-2\"", TraditionalForm], 0}, {3,
FormBox["\"B-3\"", TraditionalForm], 0}, {4,
FormBox["\"C-1\"", TraditionalForm], 0}, {5,
FormBox["\"C-2\"", TraditionalForm], 0}, {6,
FormBox["\"Ca\"", TraditionalForm], 0}, {7,
FormBox["\"Cp\"", TraditionalForm], 0}, {8,
FormBox["\"E-1\"", TraditionalForm], 0}, {9,
FormBox["\"E-2\"", TraditionalForm], 0}, {10,
FormBox["\"E-3\"", TraditionalForm], 0}, {11,
FormBox["\"G-1\"", TraditionalForm], 0}, {12,
FormBox["\"G-2\"", TraditionalForm], 0}, {13,
FormBox["\"I-1\"", TraditionalForm], 0}, {14,
FormBox["\"I-2\"", TraditionalForm], 0}, {15,
FormBox["\"M\"", TraditionalForm], 0}, {16,
FormBox["\"Me-1\"", TraditionalForm], 0}, {17,
FormBox["\"Me-2\"", TraditionalForm], 0}, {18,
FormBox["\"Me-3\"", TraditionalForm], 0}, {19,
FormBox["\"Me-4\"", TraditionalForm], 0}, {20,
FormBox["\"Mo\"", TraditionalForm], 0}, {21,
FormBox["\"Q\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"B-1\"", TraditionalForm], 0}, {2,
FormBox["\"B-2\"", TraditionalForm], 0}, {3,
FormBox["\"B-3\"", TraditionalForm], 0}, {4,
FormBox["\"C-1\"", TraditionalForm], 0}, {5,
FormBox["\"C-2\"", TraditionalForm], 0}, {6,
FormBox["\"Ca\"", TraditionalForm], 0}, {7,
FormBox["\"Cp\"", TraditionalForm], 0}, {8,
FormBox["\"E-1\"", TraditionalForm], 0}, {9,
FormBox["\"E-2\"", TraditionalForm], 0}, {10,
FormBox["\"E-3\"", TraditionalForm], 0}, {11,
FormBox["\"G-1\"", TraditionalForm], 0}, {12,
FormBox["\"G-2\"", TraditionalForm], 0}, {13,
FormBox["\"I-1\"", TraditionalForm], 0}, {14,
FormBox["\"I-2\"", TraditionalForm], 0}, {15,
FormBox["\"M\"", TraditionalForm], 0}, {16,
FormBox["\"Me-1\"", TraditionalForm], 0}, {17,
FormBox["\"Me-2\"", TraditionalForm], 0}, {18,
FormBox["\"Me-3\"", TraditionalForm], 0}, {19,
FormBox["\"Me-4\"", TraditionalForm], 0}, {20,
FormBox["\"Mo\"", TraditionalForm], 0}, {21,
FormBox["\"Q\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBeIzh17/PTL9paN4vQ7bUSDtZnGSB0QHcW8XBdH/F+9w
BdF/zt+afQxI1xVnFx4H0koJu8tA9BfTuedBdNZ03fQTQPrQ4d9LLgDpac8k
PqnNeOn4TnWxhgOQnp12LQREfzK9vNwVSFuwzKnxBNJ9a5g+ZgFpqYNnDmSD
1DukxxcA6ROzL7OWAemivW8qy4G0bL+F94bXLx0X/N4ZvRlIP2AQ3ebJ8Mqx
ocGu/YT5K8d/dyX+Wtq+clx3vDJ3h90rRw6ROOFdQPpYV6siiD5yQ9MURGds
Vfq9D0jrlTrp7QfSbZcO14HoGecYS+/4v3J81f7p2V0g3XfAR4U14JVjVcpr
C04g/btF0okbSD/Sk6nkAdIcRqcPgWjx4zujTIH0Fa+rbCFAOqrM420UkG64
b+8UDRIPO+1wGUgHTX926QrIvEfHeO4AaWa/ryH/gPSsF0+lFoe/cpx54k4m
iP7p/TeyKgro7vTARKHoV45FJtyyCkDac53yOw8g/eewiZw3kF6RF33dB0j7
SD/RfwmkTZh7vEVjXjl2PG4WeZIINNft3DmWpFeOORXb/+7JeeUIAGvxAAk=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citingcited21Data", ",",
RowBox[{"BarLabels", "\[Rule]", "ClNames21"}], ",",
RowBox[{"BarStyle", "\[Rule]", "colors21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.435014068576029*^9, 3.4350140803502617`*^9},
3.4350141253521137`*^9, {3.435014157001917*^9, 3.435014191119093*^9}, {
3.435014240591082*^9, 3.4350142449419117`*^9}, {3.435014277362636*^9,
3.435014281223608*^9}, {3.435014312170826*^9, 3.435014315824049*^9}, {
3.435014693790732*^9, 3.435014733585299*^9}, {3.435019349305735*^9,
3.435019362032257*^9}, {3.435038050407741*^9, 3.435038055560094*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 188946.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 7157.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 8428.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 692.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 337.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 0}, {6.3999999999999995`, 598.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 0}, {7.3999999999999995`, 308.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 0}, {8.4, 13.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 0}, {9.4, 90.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 0}, {10.4, 215.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 0}, {11.4, 8191.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 0}, {12.4, 1490.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 0}, {13.4, 319.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 0}, {14.4, 371.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 0}, {15.4, 265.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 0}, {16.4, 212.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 0}, {17.400000000000002`, 635.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 0}, {18.400000000000002`, 1918.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 0}, {19.400000000000002`, 2735.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 0}, {20.400000000000002`, 60318.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 0}, {21.400000000000002`, 11.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 188946}, {1.4, 197862.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 7157}, {2.4000000000000004`, 90322.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 8428}, {3.4000000000000004`, 10201.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 692}, {4.4, 5618.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337}, {5.3999999999999995`, 527.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 598}, {6.3999999999999995`, 4921.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 308}, {7.3999999999999995`, 2290.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 13}, {8.4, 72.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 90}, {9.4, 132.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 215}, {10.4, 1383.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 8191}, {11.4, 12986.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 1490}, {12.4, 1744.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 319}, {13.4, 400.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 371}, {14.4, 424.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 265}, {15.4, 278.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 212}, {16.4, 1515.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 635}, {17.400000000000002`, 9354.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 1918}, {18.400000000000002`, 3273.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 2735}, {19.400000000000002`, 9569.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 60318}, {20.400000000000002`, 98866.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 11}, {21.400000000000002`, 18.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 197862}, {1.4, 207700.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 90322}, {2.4000000000000004`, 92651.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 10201}, {3.4000000000000004`, 54040.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5618}, {4.4, 5886.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 527}, {5.3999999999999995`, 656.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 4921}, {6.3999999999999995`, 5140.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2290}, {7.3999999999999995`, 2360.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 72}, {8.4, 82.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 132}, {9.4, 389.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1383}, {10.4, 1429.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 12986}, {11.4, 19343.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 1744}, {12.4, 2532.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 400}, {13.4, 453.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 424}, {14.4, 507.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 278}, {15.4, 290.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1515}, {16.4, 1682.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9354}, {17.400000000000002`, 9720.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 3273}, {18.400000000000002`, 4996.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 9569}, {19.400000000000002`, 10805.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 98866}, {20.400000000000002`, 111040.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 18}, {21.400000000000002`, 20.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 207700}, {1.4, 208634.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 92651}, {2.4000000000000004`, 99079.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54040}, {3.4000000000000004`, 54375.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5886}, {4.4, 577432.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 656}, {5.3999999999999995`, 51321.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 5140}, {6.3999999999999995`, 19255.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2360}, {7.3999999999999995`, 22473.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 82}, {8.4, 11960.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 389}, {9.4, 698.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1429}, {10.4, 7420.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 19343}, {11.4, 23986.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 2532}, {12.4, 3751.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 453}, {13.4, 961.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 507}, {14.4, 602.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 290}, {15.4, 400.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1682}, {16.4, 4217.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9720}, {17.400000000000002`, 13177.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 4996}, {18.400000000000002`, 9250.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 10805}, {19.400000000000002`, 12775.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 111040}, {20.400000000000002`, 199661.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 20}, {21.400000000000002`, 1455.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 208634}, {1.4, 209196.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 99079}, {2.4000000000000004`, 99225.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54375}, {3.4000000000000004`, 54466.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 577432}, {4.4, 616947.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 51321}, {5.3999999999999995`, 455084.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 19255}, {6.3999999999999995`, 22847.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 22473}, {7.3999999999999995`, 26891.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 11960}, {8.4, 30154.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 698}, {9.4, 3941.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 7420}, {10.4, 9238.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 23986}, {11.4, 27086.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 3751}, {12.4, 4973.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 961}, {13.4, 4877.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 602}, {14.4, 2431.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 400}, {15.4, 2411.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 4217}, {16.4, 5606.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 13177}, {17.400000000000002`, 13446.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9250}, {18.400000000000002`, 10015.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12775}, {19.400000000000002`, 13150.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 199661}, {20.400000000000002`, 229697.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 1455}, {21.400000000000002`, 21228.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 209196}, {1.4, 210207.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 99225}, {2.4000000000000004`, 105439.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54466}, {3.4000000000000004`, 54882.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 616947}, {4.4, 632503.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 455084}, {5.3999999999999995`, 459913.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 22847}, {6.3999999999999995`, 108115.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 26891}, {7.3999999999999995`, 29611.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 30154}, {8.4, 31138.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 3941}, {9.4, 4143.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 9238}, {10.4, 10398.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 27086}, {11.4, 33326.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 4973}, {12.4, 5806.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 4877}, {13.4, 5100.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2431}, {14.4, 2516.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2411}, {15.4, 2415.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 5606}, {16.4, 6500.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 13446}, {17.400000000000002`, 16424.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 10015}, {18.400000000000002`, 11207.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13150}, {19.400000000000002`, 13939.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 229697}, {20.400000000000002`, 250000.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21228}, {21.400000000000002`, 21441.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210207}, {1.4, 210601.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105439}, {2.4000000000000004`, 107776.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54882}, {3.4000000000000004`, 54950.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 632503}, {4.4, 656925.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 459913}, {5.3999999999999995`, 466952.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 108115}, {6.3999999999999995`, 110376.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 29611}, {7.3999999999999995`, 107296.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 31138}, {8.4, 34163.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 4143}, {9.4, 5176.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 10398}, {10.4, 12918.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 33326}, {11.4, 34198.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 5806}, {12.4, 5976.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5100}, {13.4, 5209.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2516}, {14.4, 2567.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2415}, {15.4, 2434.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6500}, {16.4, 11130.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 16424}, {17.400000000000002`, 17691.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 11207}, {18.400000000000002`, 11834.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13939}, {19.400000000000002`, 14731.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 250000}, {20.400000000000002`, 261894.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21441}, {21.400000000000002`, 21569.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210601}, {1.4, 210624.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 107776}, {2.4000000000000004`, 107857.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54950}, {3.4000000000000004`, 54962.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 656925}, {4.4, 668774.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 466952}, {5.3999999999999995`, 490998.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 110376}, {6.3999999999999995`, 111315.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 107296}, {7.3999999999999995`, 111183.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 34163}, {8.4, 101626.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 5176}, {9.4, 8271.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 12918}, {10.4, 14389.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 34198}, {11.4, 34581.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 5976}, {12.4, 6270.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5209}, {13.4, 5729.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2567}, {14.4, 3017.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2434}, {15.4, 2478.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 11130}, {16.4, 11993.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17691}, {17.400000000000002`, 17709.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 11834}, {18.400000000000002`, 11845.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14731}, {19.400000000000002`, 14740.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 261894}, {20.400000000000002`, 263490.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21569}, {21.400000000000002`, 21698.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210624}, {1.4, 210698.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 107857}, {2.4000000000000004`, 107880.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 54962}, {3.4000000000000004`, 55184.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 668774}, {4.4, 669281.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 490998}, {5.3999999999999995`, 494348.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 111315}, {6.3999999999999995`, 111504.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 111183}, {7.3999999999999995`, 112217.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 101626}, {8.4, 104117.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 8271}, {9.4, 41957.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 14389}, {10.4, 15939.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 34581}, {11.4, 36095.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 6270}, {12.4, 6348.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5729}, {13.4, 7490.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3017}, {14.4, 3408.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2478}, {15.4, 3427.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 11993}, {16.4, 12609.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17709}, {17.400000000000002`, 17807.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 11845}, {18.400000000000002`, 12341.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14740}, {19.400000000000002`, 14751.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 263490}, {20.400000000000002`, 264071.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21698}, {21.400000000000002`, 21989.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210698}, {1.4, 210861.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 107880}, {2.4000000000000004`, 109498.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 55184}, {3.4000000000000004`, 55205.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 669281}, {4.4, 676861.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 494348}, {5.3999999999999995`, 496722.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 111504}, {6.3999999999999995`, 112780.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 112217}, {7.3999999999999995`, 115000.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 104117}, {8.4, 105666.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 41957}, {9.4, 43835.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 15939}, {10.4, 45995.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 36095}, {11.4, 39560.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 6348}, {12.4, 6543.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 7490}, {13.4, 8436.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3408}, {14.4, 3724.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3427}, {15.4, 3542.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 12609}, {16.4, 12674.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17807}, {17.400000000000002`, 17900.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 12341}, {18.400000000000002`, 12376.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14751}, {19.400000000000002`, 14761.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 264071}, {20.400000000000002`, 264803.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 21989}, {21.400000000000002`, 22057.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 210861}, {1.4, 218894.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 109498}, {2.4000000000000004`, 114383.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 55205}, {3.4000000000000004`, 61502.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 676861}, {4.4, 680583.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 496722}, {5.3999999999999995`, 500329.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 112780}, {6.3999999999999995`, 115735.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115000}, {7.3999999999999995`, 115598.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 105666}, {8.4, 105975.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 43835}, {9.4, 45539.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 45995}, {10.4, 48444.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 39560}, {11.4, 177356.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 6543}, {12.4, 15541.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 8436}, {13.4, 9109.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3724}, {14.4, 4268.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3542}, {15.4, 3618.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 12674}, {16.4, 13365.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 17900}, {17.400000000000002`, 22416.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 12376}, {18.400000000000002`, 13471.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 14761}, {19.400000000000002`, 15441.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 264803}, {20.400000000000002`, 281841.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 22057}, {21.400000000000002`, 25483.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 218894}, {1.4, 220994.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 114383}, {2.4000000000000004`, 115004.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 61502}, {3.4000000000000004`, 62592.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 680583}, {4.4, 682196.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 500329}, {5.3999999999999995`, 504869.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 115735}, {6.3999999999999995`, 116363.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115598}, {7.3999999999999995`, 115755.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 105975}, {8.4, 106348.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 45539}, {9.4, 45849.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 48444}, {10.4, 48728.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 177356}, {11.4, 187905.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 15541}, {12.4, 74378.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9109}, {13.4, 9241.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 4268}, {14.4, 4316.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3618}, {15.4, 3736.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 13365}, {16.4, 13475.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 22416}, {17.400000000000002`, 22500.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 13471}, {18.400000000000002`, 13644.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15441}, {19.400000000000002`, 15566.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 281841}, {20.400000000000002`, 290368.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 25483}, {21.400000000000002`, 26307.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 220994}, {1.4, 221327.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115004}, {2.4000000000000004`, 115082.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62592}, {3.4000000000000004`, 62618.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682196}, {4.4, 682675.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 504869}, {5.3999999999999995`, 509596.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116363}, {6.3999999999999995`, 116645.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115755}, {7.3999999999999995`, 115823.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 106348}, {8.4, 106727.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 45849}, {9.4, 47800.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 48728}, {10.4, 49282.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 187905}, {11.4, 188460.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74378}, {12.4, 74404.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9241}, {13.4, 97993.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 4316}, {14.4, 7876.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3736}, {15.4, 7502.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 13475}, {16.4, 15275.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 22500}, {17.400000000000002`, 23561.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 13644}, {18.400000000000002`, 16469.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15566}, {19.400000000000002`, 15657.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 290368}, {20.400000000000002`, 295506.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26307}, {21.400000000000002`, 26673.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221327}, {1.4, 221442.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115082}, {2.4000000000000004`, 115124.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62618}, {3.4000000000000004`, 62628.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682675}, {4.4, 682728.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 509596}, {5.3999999999999995`, 511420.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116645}, {6.3999999999999995`, 116705.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115823}, {7.3999999999999995`, 115846.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 106727}, {8.4, 107014.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 47800}, {9.4, 47992.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49282}, {10.4, 49426.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188460}, {11.4, 188730.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74404}, {12.4, 74404.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 97993}, {13.4, 101318.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 7876}, {14.4, 28031.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 7502}, {15.4, 8031.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 15275}, {16.4, 15479.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 23561}, {17.400000000000002`, 24350.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 16469}, {18.400000000000002`, 16647.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15657}, {19.400000000000002`, 15706.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 295506}, {20.400000000000002`, 296246.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26673}, {21.400000000000002`, 26743.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221442}, {1.4, 221660.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115124}, {2.4000000000000004`, 115137.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62628}, {3.4000000000000004`, 62631.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682728}, {4.4, 682824.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 511420}, {5.3999999999999995`, 513814.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116705}, {6.3999999999999995`, 116714.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115846}, {7.3999999999999995`, 115870.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107014}, {8.4, 107036.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 47992}, {9.4, 48974.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49426}, {10.4, 49532.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188730}, {11.4, 188940.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74404}, {12.4, 74476.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 101318}, {13.4, 104601.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28031}, {14.4, 28649.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 8031}, {15.4, 36823.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 15479}, {16.4, 15508.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 24350}, {17.400000000000002`, 24359.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 16647}, {18.400000000000002`, 16711.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15706}, {19.400000000000002`, 15728.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 296246}, {20.400000000000002`, 296648.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26743}, {21.400000000000002`, 27745.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221660}, {1.4, 221804.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 115137}, {2.4000000000000004`, 116106.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62631}, {3.4000000000000004`, 62748.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682824}, {4.4, 683783.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 513814}, {5.3999999999999995`, 514960.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116714}, {6.3999999999999995`, 117132.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 115870}, {7.3999999999999995`, 117962.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107036}, {8.4, 107307.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 48974}, {9.4, 49461.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49532}, {10.4, 49585.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188940}, {11.4, 189324.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74476}, {12.4, 74575.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 104601}, {13.4, 105831.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28649}, {14.4, 28909.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36823}, {15.4, 36865.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 15508}, {16.4, 255397.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 24359}, {17.400000000000002`, 79731.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 16711}, {18.400000000000002`, 30584.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 15728}, {19.400000000000002`, 20903.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 296648}, {20.400000000000002`, 375242.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27745}, {21.400000000000002`, 27970.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 221804}, {1.4, 222097.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 116106}, {2.4000000000000004`, 120529.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62748}, {3.4000000000000004`, 62813.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 683783}, {4.4, 684205.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 514960}, {5.3999999999999995`, 515059.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 117132}, {6.3999999999999995`, 118501.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 117962}, {7.3999999999999995`, 118387.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107307}, {8.4, 107318.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49461}, {9.4, 49520.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49585}, {10.4, 49610.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 189324}, {11.4, 191551.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74575}, {12.4, 74589.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 105831}, {13.4, 106424.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28909}, {14.4, 29757.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36865}, {15.4, 36887.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 255397}, {16.4, 293272.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 79731}, {17.400000000000002`, 494609.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 30584}, {18.400000000000002`, 59175.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 20903}, {19.400000000000002`, 38699.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 375242}, {20.400000000000002`, 510692.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27970}, {21.400000000000002`, 27983.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 222097}, {1.4, 223853.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 120529}, {2.4000000000000004`, 121547.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 62813}, {3.4000000000000004`, 63956.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 684205}, {4.4, 685273.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 515059}, {5.3999999999999995`, 515810.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 118501}, {6.3999999999999995`, 119361.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 118387}, {7.3999999999999995`, 118748.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107318}, {8.4, 107328.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49520}, {9.4, 49962.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49610}, {10.4, 49627.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 191551}, {11.4, 191976.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74589}, {12.4, 74613.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 106424}, {13.4, 108047.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 29757}, {14.4, 29940.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36887}, {15.4, 36919.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 293272}, {16.4, 306545.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 494609}, {17.400000000000002`, 527532.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 59175}, {18.400000000000002`, 402238.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 38699}, {19.400000000000002`, 42248.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 510692}, {20.400000000000002`, 634397.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27983}, {21.400000000000002`, 27995.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 223853}, {1.4, 226692.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 121547}, {2.4000000000000004`, 127996.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 63956}, {3.4000000000000004`, 65069.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 685273}, {4.4, 686131.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 515810}, {5.3999999999999995`, 516079.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 119361}, {6.3999999999999995`, 119825.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 118748}, {7.3999999999999995`, 119211.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107328}, {8.4, 107332.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49962}, {9.4, 49978.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49627}, {10.4, 49639.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 191976}, {11.4, 192546.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74613}, {12.4, 74651.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 108047}, {13.4, 108107.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 29940}, {14.4, 30002.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36919}, {15.4, 36936.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 306545}, {16.4, 311990.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 527532}, {17.400000000000002`, 555615.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 402238}, {18.400000000000002`, 406977.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 42248}, {19.400000000000002`, 183024.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 634397}, {20.400000000000002`, 701701.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27995}, {21.400000000000002`, 27998.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 226692}, {1.4, 251545.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 127996}, {2.4000000000000004`, 147634.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 65069}, {3.4000000000000004`, 69257.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 686131}, {4.4, 718696.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 516079}, {5.3999999999999995`, 521136.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 119825}, {6.3999999999999995`, 128113.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 119211}, {7.3999999999999995`, 124025.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107332}, {8.4, 107532.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49978}, {9.4, 50188.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49639}, {10.4, 49743.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 192546}, {11.4, 200136.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 74651}, {12.4, 76157.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 108107}, {13.4, 109620.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 30002}, {14.4, 30530.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36936}, {15.4, 37093.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 311990}, {16.4, 365052.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 555615}, {17.400000000000002`, 698013.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 406977}, {18.400000000000002`, 501085.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 183024}, {19.400000000000002`, 224480.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 701701}, {20.400000000000002`, 2.405256*^6}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 27998}, {21.400000000000002`, 29097.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 251545}, {1.4, 251562.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 147634}, {2.4000000000000004`, 147648.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 69257}, {3.4000000000000004`, 69272.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 718696}, {4.4, 719440.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 521136}, {5.3999999999999995`, 546569.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 128113}, {6.3999999999999995`, 128237.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 124025}, {7.3999999999999995`, 124080.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 107532}, {8.4, 107576.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 50188}, {9.4, 50495.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49743}, {10.4, 49812.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 200136}, {11.4, 202596.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 76157}, {12.4, 76762.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 109620}, {13.4, 109812.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 30530}, {14.4, 30553.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 37093}, {15.4, 38386.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 365052}, {16.4, 365251.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 698013}, {17.400000000000002`, 698029.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 501085}, {18.400000000000002`, 501143.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 224480}, {19.400000000000002`, 224480.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 2405256}, {20.400000000000002`, 2.409371*^6}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 29097}, {21.400000000000002`, 270925.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"B-1\"", TraditionalForm], 0}, {2,
FormBox["\"B-2\"", TraditionalForm], 0}, {3,
FormBox["\"B-3\"", TraditionalForm], 0}, {4,
FormBox["\"C-1\"", TraditionalForm], 0}, {5,
FormBox["\"C-2\"", TraditionalForm], 0}, {6,
FormBox["\"Ca\"", TraditionalForm], 0}, {7,
FormBox["\"Cp\"", TraditionalForm], 0}, {8,
FormBox["\"E-1\"", TraditionalForm], 0}, {9,
FormBox["\"E-2\"", TraditionalForm], 0}, {10,
FormBox["\"E-3\"", TraditionalForm], 0}, {11,
FormBox["\"G-1\"", TraditionalForm], 0}, {12,
FormBox["\"G-2\"", TraditionalForm], 0}, {13,
FormBox["\"I-1\"", TraditionalForm], 0}, {14,
FormBox["\"I-2\"", TraditionalForm], 0}, {15,
FormBox["\"M\"", TraditionalForm], 0}, {16,
FormBox["\"Me-1\"", TraditionalForm], 0}, {17,
FormBox["\"Me-2\"", TraditionalForm], 0}, {18,
FormBox["\"Me-3\"", TraditionalForm], 0}, {19,
FormBox["\"Me-4\"", TraditionalForm], 0}, {20,
FormBox["\"Mo\"", TraditionalForm], 0}, {21,
FormBox["\"Q\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"B-1\"", TraditionalForm], 0}, {2,
FormBox["\"B-2\"", TraditionalForm], 0}, {3,
FormBox["\"B-3\"", TraditionalForm], 0}, {4,
FormBox["\"C-1\"", TraditionalForm], 0}, {5,
FormBox["\"C-2\"", TraditionalForm], 0}, {6,
FormBox["\"Ca\"", TraditionalForm], 0}, {7,
FormBox["\"Cp\"", TraditionalForm], 0}, {8,
FormBox["\"E-1\"", TraditionalForm], 0}, {9,
FormBox["\"E-2\"", TraditionalForm], 0}, {10,
FormBox["\"E-3\"", TraditionalForm], 0}, {11,
FormBox["\"G-1\"", TraditionalForm], 0}, {12,
FormBox["\"G-2\"", TraditionalForm], 0}, {13,
FormBox["\"I-1\"", TraditionalForm], 0}, {14,
FormBox["\"I-2\"", TraditionalForm], 0}, {15,
FormBox["\"M\"", TraditionalForm], 0}, {16,
FormBox["\"Me-1\"", TraditionalForm], 0}, {17,
FormBox["\"Me-2\"", TraditionalForm], 0}, {18,
FormBox["\"Me-3\"", TraditionalForm], 0}, {19,
FormBox["\"Me-4\"", TraditionalForm], 0}, {20,
FormBox["\"Mo\"", TraditionalForm], 0}, {21,
FormBox["\"Q\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwBmL1H9fXXpj+0vHbfo1PajNeOq64v1rDAUh/aLseAqJX
3LVb4QqkHzR9q/EE0klamR+zgLTTorSD2UA6oS0jvgBIv3t4hbUMSD96+ray
HEhbXnL03vD6peP2P7ujNwPpA0Li2zwZXjlWsdu3nzB/5RhlJfnX0vaV43Gr
qtwddq8ctwh1iO4C0l2u7Eog+syiGFMQbbUg+Pc+IM2nWqK3H0jP+f2lDkRz
JpqW3vF/5Ricofr8LpAW4a5VYQ145XjkvrQlJ5De4efjxA2ki6T9KnmA9N/J
fw+B6DSf11GmIHoqG3sIkLaprHobBaSVWYqdooG0T/wfh8tAepWO2OUrQNqv
5gfPHSAdJKUW+g9Ib2CaL704/JUjBwNXFog2nWEdVRX1yvGDUEOiUDRQfr6l
rAKQLjsW+M4DSC/jTZbzBtJCXl3XfYC0rauwwUsg/Sxyl7doDNCe+ZtEniS+
cvyf9f8cS9IrxzCPZ3/35LxyBAA4mcjo
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData["ClNames21"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "\<\"B-2\"\>", ",", "\<\"B-3\"\>",
",", "\<\"C-1\"\>", ",", "\<\"C-2\"\>", ",", "\<\"Ca\"\>",
",", "\<\"Cp\"\>", ",", "\<\"E-1\"\>", ",", "\<\"E-2\"\>",
",", "\<\"E-3\"\>", ",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>",
",", "\<\"I-1\"\>", ",", "\<\"I-2\"\>", ",", "\<\"M\"\>",
",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>", ",", "\<\"Me-3\"\>",
",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>", ",", "\<\"Q\"\>"}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBWKDtJBuzxkvHV8tdPyUBaSvqNodygbSyi8z4wuA9K0n
t1nLgHSm5vvKciC9R9/De8Prl47favdEbwbSfC3i2zwZXjleqrNvP2H+ypG5
U/Kvpe0rR4VlVbk77F451k1QEtsFpI/sjTcF0WsyQn/vA9LFTKV6+4E027Wv
dSA6gNes9I7/K8cEAc3nd4F08bNaFdaAV45b38tYcgLpqBB/J24gLXHRr5IH
SN/x+XcIRDv8fB1lCqRfHGZnDwHSYqU1b6OA9LcHxU7RQFoo4q/DZSC9+qXY
5StAut34J88dIH3golroPyDN4blSZnH4K8eyQp4sEB2p7BpVFfXKsSe9KVEo
+pVjXJ+1rAKQPncg+J0HkF7/JkXOG0ifce+57gOke4xFDV4CaQ3HPd6iMa8c
Cxy2iDxJfOW4x4rjPEvSK8cKhpd/9+S8cgQA7YywXg==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClJNames21", "=",
RowBox[{"{",
RowBox[{
"\"\<\:52d5\:690d\>\"", ",", "\"\<\:8fb2\:5b66\>\"", ",",
"\"\<\:6c34\:7523\>\"", ",", "\"\<\:5316\:5b66\>\"", ",",
"\"\<\:7269\:6027\>\"", ",", "\"\<\:5206\:6790\>\"", ",",
"\"\<\:5fdc\:5316\>\"", ",", "\"\<\:91d1\:5c5e\>\"", ",",
"\"\<\:6a5f\:68b0\>\"", ",", "\"\<\:5316\:5de5\>\"", ",",
"\"\<\:6c17\:8c61\>\"", ",", "\"\<\:5730\:7403\>\"", ",",
"\"\<\:96fb\:5b50\>\"", ",", "\"\<\:6570\:7406\>\"", ",",
"\"\<\:6570\:5b66\>\"", ",", "\"\<\:81e8\:5e8a1\>\"", ",",
"\"\<\:81e8\:5e8a2\>\"", ",", "\"\<\:795e\:7d4c\>\"", ",",
"\"\<\:7363\:533b\>\"", ",", "\"\<\:751f\:5316\>\"", ",",
"\"\<\:91cf\:5b50\>\""}], "}"}]}]], "Input",
CellChangeTimes->{{3.4352856016115513`*^9, 3.4352856189882*^9}, {
3.435285655613302*^9, 3.4352858389426107`*^9}, {3.435285869592226*^9,
3.4352860594257812`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\"\>", ",", "\<\"\:8fb2\:5b66\"\>",
",", "\<\"\:6c34\:7523\"\>", ",", "\<\"\:5316\:5b66\"\>",
",", "\<\"\:7269\:6027\"\>", ",", "\<\"\:5206\:6790\"\>",
",", "\<\"\:5fdc\:5316\"\>", ",", "\<\"\:91d1\:5c5e\"\>",
",", "\<\"\:6a5f\:68b0\"\>", ",", "\<\"\:5316\:5de5\"\>",
",", "\<\"\:6c17\:8c61\"\>", ",", "\<\"\:5730\:7403\"\>",
",", "\<\"\:96fb\:5b50\"\>", ",", "\<\"\:6570\:7406\"\>",
",", "\<\"\:6570\:5b66\"\>", ",", "\<\"\:81e8\:5e8a1\"\>",
",", "\<\"\:81e8\:5e8a2\"\>", ",", "\<\"\:795e\:7d4c\"\>",
",", "\<\"\:7363\:533b\"\>", ",", "\<\"\:751f\:5316\"\>",
",", "\<\"\:91cf\:5b50\"\>"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBWKVrY+Pes546cgioPI5C0hPiVc7nA2knX6XxBcAaTW+
Z6xlQLps2/fKciB9Z0Gg94bXLx3rOPdHbwbSwqskt3kyvHK88tW+/YT5K8eo
Zum/lravHNV4qnN32L1y5Nn/SWUXkF6klWAKok/Khf3eB6TffqrQ2w+kVeK/
14HooBNmpXf8XznWLdV6fhdI3/xVr8Ia8MrRoELOkhNIz9jv78QNpPsM/Ct5
gPTRVf8OgWiu0DdRpkD6gTIHewiQDuesfxsFpBe3lDpFA2mJfX8dLgPpADfx
y1eA9L8JP3nuAGk3U/XQfyDzIl1kF4e/cjxQwZcFovdNc4+qinrluCytJVEo
GuieRFtZBSAtZh/6zgNIq11Nk/MG0i3Sfdd9gHQQp7jBSyBtx7nPWzTmlWO7
2DaRJ4mvHJO3cp5nSXrlGOj76u+enFeOAL7lrXI=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citedciting21Data", ",",
RowBox[{"BarLabels", "\[Rule]", "ClNames21"}], ",",
RowBox[{"BarStyle", "\[Rule]", "colors21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.435014068576029*^9, 3.4350140803502617`*^9},
3.4350141253521137`*^9, {3.435014157001917*^9, 3.435014191119093*^9}, {
3.435014240591082*^9, 3.4350142449419117`*^9}, {3.435014277362636*^9,
3.435014281223608*^9}, {3.435014312170826*^9, 3.435014315824049*^9}, {
3.435014693790732*^9, 3.435014733585299*^9}, {3.435019349305735*^9,
3.435019362032257*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 188946.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 8916.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 9838.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 934.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 562.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 0}, {6.3999999999999995`, 1011.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 0}, {7.3999999999999995`, 394.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 0}, {8.4, 23.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 0}, {9.4, 74.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 0}, {10.4, 163.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 0}, {11.4, 8033.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 0}, {12.4, 2100.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 0}, {13.4, 333.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 0}, {14.4, 115.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 0}, {15.4, 218.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 0}, {16.4, 144.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 0}, {17.400000000000002`, 293.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 0}, {18.400000000000002`, 1756.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 0}, {19.400000000000002`, 2839.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 0}, {20.400000000000002`, 24853.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 0}, {21.400000000000002`, 17.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 188946}, {1.4, 196103.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 8916}, {2.4000000000000004`, 92081.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 9838}, {3.4000000000000004`, 12167.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 934}, {4.4, 7362.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 562}, {5.3999999999999995`, 708.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 1011}, {6.3999999999999995`, 7225.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 394}, {7.3999999999999995`, 2731.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 23}, {8.4, 104.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 74}, {9.4, 97.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 163}, {10.4, 1781.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 8033}, {11.4, 12918.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 2100}, {12.4, 2721.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 333}, {13.4, 411.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 115}, {14.4, 157.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 218}, {15.4, 231.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 144}, {16.4, 1113.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 293}, {17.400000000000002`, 4716.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 1756}, {18.400000000000002`, 2774.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 2839}, {19.400000000000002`, 9288.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 24853}, {20.400000000000002`, 44491.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 17}, {21.400000000000002`, 31.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 196103}, {1.4, 204531.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 92081}, {2.4000000000000004`, 93854.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 12167}, {3.4000000000000004`, 56006.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 7362}, {4.4, 7697.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 708}, {5.3999999999999995`, 799.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 7225}, {6.3999999999999995`, 7641.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2731}, {7.3999999999999995`, 2799.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 104}, {8.4, 116.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 97}, {9.4, 319.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1781}, {10.4, 1802.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 12918}, {11.4, 19215.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 2721}, {12.4, 3811.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 411}, {13.4, 437.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 157}, {14.4, 167.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 231}, {15.4, 234.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1113}, {16.4, 1230.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 4716}, {17.400000000000002`, 4781.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 2774}, {18.400000000000002`, 3917.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 9288}, {19.400000000000002`, 10401.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 44491}, {20.400000000000002`, 48679.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31}, {21.400000000000002`, 46.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 204531}, {1.4, 205223.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 93854}, {2.4000000000000004`, 98780.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56006}, {3.4000000000000004`, 56274.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 7697}, {4.4, 579243.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 799}, {5.3999999999999995`, 40314.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 7641}, {6.3999999999999995`, 23197.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2799}, {7.3999999999999995`, 27221.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 116}, {8.4, 11965.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 319}, {9.4, 826.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1802}, {10.4, 9382.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 19215}, {11.4, 22937.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 3811}, {12.4, 5424.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 437}, {13.4, 916.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 167}, {14.4, 220.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 234}, {15.4, 330.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1230}, {16.4, 2189.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 4781}, {17.400000000000002`, 5203.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 3917}, {18.400000000000002`, 4985.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 10401}, {19.400000000000002`, 11259.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 48679}, {20.400000000000002`, 81244.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 46}, {21.400000000000002`, 790.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 205223}, {1.4, 205560.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 98780}, {2.4000000000000004`, 98970.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56274}, {3.4000000000000004`, 56403.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 579243}, {4.4, 629908.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 40314}, {5.3999999999999995`, 444077.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 23197}, {6.3999999999999995`, 28026.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 27221}, {7.3999999999999995`, 34260.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 11965}, {8.4, 36011.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 826}, {9.4, 4176.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 9382}, {10.4, 11756.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 22937}, {11.4, 26544.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 5424}, {12.4, 9964.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 916}, {13.4, 5643.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 220}, {14.4, 2044.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 330}, {15.4, 2724.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 2189}, {16.4, 3335.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 5203}, {17.400000000000002`, 5302.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 4985}, {18.400000000000002`, 5736.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 11259}, {19.400000000000002`, 11528.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 81244}, {20.400000000000002`, 86301.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 790}, {21.400000000000002`, 26223.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 205560}, {1.4, 206158.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 98970}, {2.4000000000000004`, 103293.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56403}, {3.4000000000000004`, 56622.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 629908}, {4.4, 644023.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 444077}, {5.3999999999999995`, 447669.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 28026}, {6.3999999999999995`, 113294.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 34260}, {7.3999999999999995`, 36521.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 36011}, {8.4, 36950.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 4176}, {9.4, 4365.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 11756}, {10.4, 13032.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 26544}, {11.4, 29499.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 9964}, {12.4, 10592.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5643}, {13.4, 5925.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2044}, {14.4, 2104.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2724}, {15.4, 2733.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 3335}, {16.4, 3753.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 5302}, {17.400000000000002`, 6671.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 5736}, {18.400000000000002`, 6596.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 11528}, {19.400000000000002`, 11992.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 86301}, {20.400000000000002`, 94589.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26223}, {21.400000000000002`, 26347.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206158}, {1.4, 206466.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 103293}, {2.4000000000000004`, 105275.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56622}, {3.4000000000000004`, 56692.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 644023}, {4.4, 664136.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 447669}, {5.3999999999999995`, 452087.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 113294}, {6.3999999999999995`, 116014.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 36521}, {7.3999999999999995`, 114206.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 36950}, {8.4, 40837.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 4365}, {9.4, 5399.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 13032}, {10.4, 15815.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 29499}, {11.4, 30097.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 10592}, {12.4, 10749.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5925}, {13.4, 5993.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2104}, {14.4, 2127.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2733}, {15.4, 2757.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 3753}, {16.4, 5845.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 6671}, {17.400000000000002`, 7096.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 6596}, {18.400000000000002`, 6957.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 11992}, {19.400000000000002`, 12455.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 94589}, {20.400000000000002`, 99403.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26347}, {21.400000000000002`, 26402.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206466}, {1.4, 206479.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105275}, {2.4000000000000004`, 105334.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56692}, {3.4000000000000004`, 56702.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 664136}, {4.4, 676014.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 452087}, {5.3999999999999995`, 470281.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116014}, {6.3999999999999995`, 116998.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 114206}, {7.3999999999999995`, 117231.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 40837}, {8.4, 108300.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 5399}, {9.4, 7890.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 15815}, {10.4, 17364.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 30097}, {11.4, 30406.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 10749}, {12.4, 11122.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5993}, {13.4, 6372.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2127}, {14.4, 2414.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2757}, {15.4, 2779.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 5845}, {16.4, 6116.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7096}, {17.400000000000002`, 7107.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 6957}, {18.400000000000002`, 6967.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12455}, {19.400000000000002`, 12459.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99403}, {20.400000000000002`, 99603.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26402}, {21.400000000000002`, 26446.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206479}, {1.4, 206569.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105334}, {2.4000000000000004`, 105376.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56702}, {3.4000000000000004`, 56959.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 676014}, {4.4, 676323.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 470281}, {5.3999999999999995`, 473524.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116998}, {6.3999999999999995`, 117200.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 117231}, {7.3999999999999995`, 118264.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 108300}, {8.4, 111395.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 7890}, {9.4, 41576.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 17364}, {10.4, 19242.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 30406}, {11.4, 32110.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 11122}, {12.4, 11432.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 6372}, {13.4, 8323.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2414}, {14.4, 2606.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2779}, {15.4, 3761.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6116}, {16.4, 6603.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7107}, {17.400000000000002`, 7166.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 6967}, {18.400000000000002`, 7409.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12459}, {19.400000000000002`, 12475.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99603}, {20.400000000000002`, 99813.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26446}, {21.400000000000002`, 26753.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206569}, {1.4, 206784.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105376}, {2.4000000000000004`, 106544.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56959}, {3.4000000000000004`, 57005.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 676323}, {4.4, 682314.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 473524}, {5.3999999999999995`, 475342.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 117200}, {6.3999999999999995`, 118360.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 118264}, {7.3999999999999995`, 120784.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 111395}, {8.4, 112866.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 41576}, {9.4, 43126.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 19242}, {10.4, 49298.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 32110}, {11.4, 34559.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 11432}, {12.4, 11716.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 8323}, {13.4, 8877.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2606}, {14.4, 2750.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3761}, {15.4, 3867.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6603}, {16.4, 6656.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7166}, {17.400000000000002`, 7191.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7409}, {18.400000000000002`, 7426.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12475}, {19.400000000000002`, 12487.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99813}, {20.400000000000002`, 99917.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26753}, {21.400000000000002`, 26822.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206784}, {1.4, 214975.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 106544}, {2.4000000000000004`, 111339.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 57005}, {3.4000000000000004`, 63362.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682314}, {4.4, 686957.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 475342}, {5.3999999999999995`, 478442.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 118360}, {6.3999999999999995`, 124600.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 120784}, {7.3999999999999995`, 121656.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 112866}, {8.4, 113249.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 43126}, {9.4, 44640.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49298}, {10.4, 52763.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 34559}, {11.4, 172355.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 11716}, {12.4, 22265.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 8877}, {13.4, 9432.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2750}, {14.4, 3020.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3867}, {15.4, 4077.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6656}, {16.4, 7040.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7191}, {17.400000000000002`, 9418.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7426}, {18.400000000000002`, 7851.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12487}, {19.400000000000002`, 13057.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99917}, {20.400000000000002`, 107507.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26822}, {21.400000000000002`, 29282.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 214975}, {1.4, 216465.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111339}, {2.4000000000000004`, 111593.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 63362}, {3.4000000000000004`, 64150.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 686957}, {4.4, 688176.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 478442}, {5.3999999999999995`, 479664.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 124600}, {6.3999999999999995`, 125433.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121656}, {7.3999999999999995`, 121826.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 113249}, {8.4, 113543.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 44640}, {9.4, 44718.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 52763}, {10.4, 52958.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 172355}, {11.4, 181353.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 22265}, {12.4, 81102.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9432}, {13.4, 9458.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3020}, {14.4, 3020.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 4077}, {15.4, 4149.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 7040}, {16.4, 7139.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9418}, {17.400000000000002`, 9432.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7851}, {18.400000000000002`, 7875.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13057}, {19.400000000000002`, 13095.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 107507}, {20.400000000000002`, 109013.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 29282}, {21.400000000000002`, 29887.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 216465}, {1.4, 216784.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111593}, {2.4000000000000004`, 111674.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64150}, {3.4000000000000004`, 64203.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688176}, {4.4, 688684.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 479664}, {5.3999999999999995`, 483580.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125433}, {6.3999999999999995`, 125656.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121826}, {7.3999999999999995`, 121935.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 113543}, {8.4, 114063.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 44718}, {9.4, 46479.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 52958}, {10.4, 53904.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 181353}, {11.4, 182026.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81102}, {12.4, 81234.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9458}, {13.4, 98210.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3020}, {14.4, 6345.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 4149}, {15.4, 7432.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 7139}, {16.4, 8369.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9432}, {17.400000000000002`, 10025.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7875}, {18.400000000000002`, 9498.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13095}, {19.400000000000002`, 13155.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 109013}, {20.400000000000002`, 110526.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 29887}, {21.400000000000002`, 30079.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 216784}, {1.4, 217155.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111674}, {2.4000000000000004`, 111727.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64203}, {3.4000000000000004`, 64286.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688684}, {4.4, 688779.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 483580}, {5.3999999999999995`, 485409.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125656}, {6.3999999999999995`, 125741.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121935}, {7.3999999999999995`, 121986.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 114063}, {8.4, 114513.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 46479}, {9.4, 46870.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 53904}, {10.4, 54220.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 182026}, {11.4, 182570.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81234}, {12.4, 81282.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 98210}, {13.4, 101770.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 6345}, {14.4, 26500.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 7432}, {15.4, 8050.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 8369}, {16.4, 8629.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 10025}, {17.400000000000002`, 10873.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9498}, {18.400000000000002`, 9681.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13155}, {19.400000000000002`, 13217.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 110526}, {20.400000000000002`, 111054.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 30079}, {21.400000000000002`, 30102.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 217155}, {1.4, 217420.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111727}, {2.4000000000000004`, 111740.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64286}, {3.4000000000000004`, 64298.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688779}, {4.4, 688889.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 485409}, {5.3999999999999995`, 487420.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125741}, {6.3999999999999995`, 125745.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121986}, {7.3999999999999995`, 122005.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 114513}, {8.4, 114557.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 46870}, {9.4, 47819.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54220}, {10.4, 54335.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 182570}, {11.4, 182646.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81282}, {12.4, 81400.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 101770}, {13.4, 105536.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 26500}, {14.4, 27029.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 8050}, {15.4, 36842.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 8629}, {16.4, 8671.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 10873}, {17.400000000000002`, 10895.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9681}, {18.400000000000002`, 9713.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13217}, {19.400000000000002`, 13234.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 111054}, {20.400000000000002`, 111211.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 30102}, {21.400000000000002`, 31395.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 217420}, {1.4, 217632.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111740}, {2.4000000000000004`, 113043.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64298}, {3.4000000000000004`, 64465.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688889}, {4.4, 691424.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 487420}, {5.3999999999999995`, 488809.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125745}, {6.3999999999999995`, 126639.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 122005}, {7.3999999999999995`, 126635.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 114557}, {8.4, 115420.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 47819}, {9.4, 48435.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54335}, {10.4, 54400.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 182646}, {11.4, 183337.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81400}, {12.4, 81510.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 105536}, {13.4, 107336.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 27029}, {14.4, 27233.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36842}, {15.4, 36871.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 8671}, {16.4, 248560.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 10895}, {17.400000000000002`, 48770.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9713}, {18.400000000000002`, 22986.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13234}, {19.400000000000002`, 18679.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 111211}, {20.400000000000002`, 164273.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31395}, {21.400000000000002`, 31594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 217632}, {1.4, 218267.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 113043}, {2.4000000000000004`, 121762.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64465}, {3.4000000000000004`, 64831.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 691424}, {4.4, 694881.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 488809}, {5.3999999999999995`, 489078.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 126639}, {6.3999999999999995`, 129617.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 126635}, {7.3999999999999995`, 127902.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115420}, {8.4, 115438.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 48435}, {9.4, 48533.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54400}, {10.4, 54493.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 183337}, {11.4, 187853.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81510}, {12.4, 81594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 107336}, {13.4, 108397.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 27233}, {14.4, 28022.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36871}, {15.4, 36880.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 248560}, {16.4, 303932.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 48770}, {17.400000000000002`, 463648.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 22986}, {18.400000000000002`, 55909.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 18679}, {19.400000000000002`, 46762.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 164273}, {20.400000000000002`, 306671.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31594}, {21.400000000000002`, 31610.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 218267}, {1.4, 220185.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 121762}, {2.4000000000000004`, 123117.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64831}, {3.4000000000000004`, 66554.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 694881}, {4.4, 699135.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 489078}, {5.3999999999999995`, 489843.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 129617}, {6.3999999999999995`, 130809.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 127902}, {7.3999999999999995`, 128529.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115438}, {8.4, 115449.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 48533}, {9.4, 49029.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54493}, {10.4, 54528.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 187853}, {11.4, 188948.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81594}, {12.4, 81767.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 108397}, {13.4, 111222.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28022}, {14.4, 28200.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36880}, {15.4, 36944.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 303932}, {16.4, 317805.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 463648}, {17.400000000000002`, 492239.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 55909}, {18.400000000000002`, 398972.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 46762}, {19.400000000000002`, 51501.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 306671}, {20.400000000000002`, 400779.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31610}, {21.400000000000002`, 31668.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 220185}, {1.4, 222920.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 123117}, {2.4000000000000004`, 129951.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 66554}, {3.4000000000000004`, 67790.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 699135}, {4.4, 701105.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 489843}, {5.3999999999999995`, 490218.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 130809}, {6.3999999999999995`, 131598.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 128529}, {7.3999999999999995`, 129321.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115449}, {8.4, 115458.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49029}, {9.4, 49040.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54528}, {10.4, 54538.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188948}, {11.4, 189628.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81767}, {12.4, 81892.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 111222}, {13.4, 111313.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28200}, {14.4, 28249.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36944}, {15.4, 36966.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 317805}, {16.4, 322980.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 492239}, {17.400000000000002`, 510035.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 398972}, {18.400000000000002`, 402521.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 51501}, {19.400000000000002`, 192277.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 400779}, {20.400000000000002`, 442235.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31668}, {21.400000000000002`, 31668.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 222920}, {1.4, 283238.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 129951}, {2.4000000000000004`, 168499.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 67790}, {3.4000000000000004`, 79964.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 701105}, {4.4, 789726.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 490218}, {5.3999999999999995`, 520254.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 131598}, {6.3999999999999995`, 151901.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 129321}, {7.3999999999999995`, 141215.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115458}, {8.4, 117054.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49040}, {9.4, 49621.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54538}, {10.4, 55270.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 189628}, {11.4, 206666.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81892}, {12.4, 90419.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 111313}, {13.4, 116451.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28249}, {14.4, 28989.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36966}, {15.4, 37368.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 322980}, {16.4, 401574.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 510035}, {17.400000000000002`, 645485.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 402521}, {18.400000000000002`, 526226.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 192277}, {19.400000000000002`, 259581.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 442235}, {20.400000000000002`, 2.14579*^6}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31668}, {21.400000000000002`, 35783.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 283238}, {1.4, 283249.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 168499}, {2.4000000000000004`, 168506.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 79964}, {3.4000000000000004`, 79966.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 789726}, {4.4, 791161.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 520254}, {5.3999999999999995`, 540027.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 151901}, {6.3999999999999995`, 152114.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 141215}, {7.3999999999999995`, 141343.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 117054}, {8.4, 117183.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49621}, {9.4, 49912.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 55270}, {10.4, 55338.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 206666}, {11.4, 210092.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 90419}, {12.4, 91243.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 116451}, {13.4, 116817.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28989}, {14.4, 29059.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 37368}, {15.4, 38370.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 401574}, {16.4, 401799.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 645485}, {17.400000000000002`, 645498.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 526226}, {18.400000000000002`, 526238.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 259581}, {19.400000000000002`, 259584.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 2145790}, {20.400000000000002`, 2.146889*^6}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 35783}, {21.400000000000002`, 277611.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"B-1\"", TraditionalForm], 0}, {2,
FormBox["\"B-2\"", TraditionalForm], 0}, {3,
FormBox["\"B-3\"", TraditionalForm], 0}, {4,
FormBox["\"C-1\"", TraditionalForm], 0}, {5,
FormBox["\"C-2\"", TraditionalForm], 0}, {6,
FormBox["\"Ca\"", TraditionalForm], 0}, {7,
FormBox["\"Cp\"", TraditionalForm], 0}, {8,
FormBox["\"E-1\"", TraditionalForm], 0}, {9,
FormBox["\"E-2\"", TraditionalForm], 0}, {10,
FormBox["\"E-3\"", TraditionalForm], 0}, {11,
FormBox["\"G-1\"", TraditionalForm], 0}, {12,
FormBox["\"G-2\"", TraditionalForm], 0}, {13,
FormBox["\"I-1\"", TraditionalForm], 0}, {14,
FormBox["\"I-2\"", TraditionalForm], 0}, {15,
FormBox["\"M\"", TraditionalForm], 0}, {16,
FormBox["\"Me-1\"", TraditionalForm], 0}, {17,
FormBox["\"Me-2\"", TraditionalForm], 0}, {18,
FormBox["\"Me-3\"", TraditionalForm], 0}, {19,
FormBox["\"Me-4\"", TraditionalForm], 0}, {20,
FormBox["\"Mo\"", TraditionalForm], 0}, {21,
FormBox["\"Q\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"B-1\"", TraditionalForm], 0}, {2,
FormBox["\"B-2\"", TraditionalForm], 0}, {3,
FormBox["\"B-3\"", TraditionalForm], 0}, {4,
FormBox["\"C-1\"", TraditionalForm], 0}, {5,
FormBox["\"C-2\"", TraditionalForm], 0}, {6,
FormBox["\"Ca\"", TraditionalForm], 0}, {7,
FormBox["\"Cp\"", TraditionalForm], 0}, {8,
FormBox["\"E-1\"", TraditionalForm], 0}, {9,
FormBox["\"E-2\"", TraditionalForm], 0}, {10,
FormBox["\"E-3\"", TraditionalForm], 0}, {11,
FormBox["\"G-1\"", TraditionalForm], 0}, {12,
FormBox["\"G-2\"", TraditionalForm], 0}, {13,
FormBox["\"I-1\"", TraditionalForm], 0}, {14,
FormBox["\"I-2\"", TraditionalForm], 0}, {15,
FormBox["\"M\"", TraditionalForm], 0}, {16,
FormBox["\"Me-1\"", TraditionalForm], 0}, {17,
FormBox["\"Me-2\"", TraditionalForm], 0}, {18,
FormBox["\"Me-3\"", TraditionalForm], 0}, {19,
FormBox["\"Me-4\"", TraditionalForm], 0}, {20,
FormBox["\"Mo\"", TraditionalForm], 0}, {21,
FormBox["\"Q\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwBeJV6S89j05/6agXUt5zHEj/O5SbeQJIv1vosPQCkL5T
lvJJbcZLRzO5MxoOQFpDlykURM9R/bfCFUiHCK2r9QTS+WGOX7KA9KU9ukez
gTRD6Oz4AiCtd52HrQxIlzkrVJUD6awjtd4bXgP1v3kcvRlIP0t32+bJ8MpR
Wr6w/YT5K8eM6z5/LW1fOT5UXZO7w+6Vo0fDNLVdQNqCc4IpiD6xoe33PiCd
4L1Kbz+Qdj2hXg+iJ+xJK73j/8px3tGo53eBtETFBhXWgFeOJXF+lpxA+l9u
qxM3kN4dXF/JA6SFDugdBtH8WjLRpkDadoUFewiQfrVs09soID3nz3KnaCB9
+pmu42UgvWqd6+UrQHrZUy3eO0D6xpfw0H9A+sX8QrnF4a8c7x+2zALRPFNK
oqqiXjkWLdmQKBT9yrHhXaasApB2m9n4zgNId+dNlvMG0lxtu677AGm+ac4G
L0F8n1feojGvHFusHok8SXzluOW62XmWpFeOIpPF/u3JeeUIAKs41H0=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citedciting21Data", ",",
RowBox[{"BarLabels", "\[Rule]", "ClJNames21"}], ",",
RowBox[{"BarStyle", "\[Rule]", "colors21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.435014068576029*^9, 3.4350140803502617`*^9},
3.4350141253521137`*^9, {3.435014157001917*^9, 3.435014191119093*^9}, {
3.435014240591082*^9, 3.4350142449419117`*^9}, {3.435014277362636*^9,
3.435014281223608*^9}, {3.435014312170826*^9, 3.435014315824049*^9}, {
3.435014693790732*^9, 3.435014733585299*^9}, {3.435019349305735*^9,
3.435019362032257*^9}, 3.4352861043788633`*^9}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 188946.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 8916.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 9838.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 934.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 562.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 0}, {6.3999999999999995`, 1011.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 0}, {7.3999999999999995`, 394.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 0}, {8.4, 23.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 0}, {9.4, 74.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 0}, {10.4, 163.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 0}, {11.4, 8033.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 0}, {12.4, 2100.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 0}, {13.4, 333.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 0}, {14.4, 115.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 0}, {15.4, 218.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 0}, {16.4, 144.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 0}, {17.400000000000002`, 293.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 0}, {18.400000000000002`, 1756.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 0}, {19.400000000000002`, 2839.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 0}, {20.400000000000002`, 24853.}]},
{RGBColor[1, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 0}, {21.400000000000002`, 17.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 188946}, {1.4, 196103.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 8916}, {2.4000000000000004`, 92081.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 9838}, {3.4000000000000004`, 12167.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 934}, {4.4, 7362.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 562}, {5.3999999999999995`, 708.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 1011}, {6.3999999999999995`, 7225.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 394}, {7.3999999999999995`, 2731.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 23}, {8.4, 104.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 74}, {9.4, 97.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 163}, {10.4, 1781.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 8033}, {11.4, 12918.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 2100}, {12.4, 2721.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 333}, {13.4, 411.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 115}, {14.4, 157.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 218}, {15.4, 231.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 144}, {16.4, 1113.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 293}, {17.400000000000002`, 4716.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 1756}, {18.400000000000002`, 2774.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 2839}, {19.400000000000002`, 9288.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 24853}, {20.400000000000002`, 44491.}]},
{RGBColor[0, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 17}, {21.400000000000002`, 31.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 196103}, {1.4, 204531.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 92081}, {2.4000000000000004`, 93854.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 12167}, {3.4000000000000004`, 56006.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 7362}, {4.4, 7697.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 708}, {5.3999999999999995`, 799.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 7225}, {6.3999999999999995`, 7641.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2731}, {7.3999999999999995`, 2799.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 104}, {8.4, 116.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 97}, {9.4, 319.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1781}, {10.4, 1802.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 12918}, {11.4, 19215.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 2721}, {12.4, 3811.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 411}, {13.4, 437.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 157}, {14.4, 167.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 231}, {15.4, 234.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1113}, {16.4, 1230.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 4716}, {17.400000000000002`, 4781.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 2774}, {18.400000000000002`, 3917.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 9288}, {19.400000000000002`, 10401.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 44491}, {20.400000000000002`, 48679.}]},
{RGBColor[0, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31}, {21.400000000000002`, 46.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 204531}, {1.4, 205223.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 93854}, {2.4000000000000004`, 98780.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56006}, {3.4000000000000004`, 56274.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 7697}, {4.4, 579243.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 799}, {5.3999999999999995`, 40314.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 7641}, {6.3999999999999995`, 23197.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 2799}, {7.3999999999999995`, 27221.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 116}, {8.4, 11965.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 319}, {9.4, 826.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 1802}, {10.4, 9382.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 19215}, {11.4, 22937.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 3811}, {12.4, 5424.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 437}, {13.4, 916.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 167}, {14.4, 220.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 234}, {15.4, 330.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 1230}, {16.4, 2189.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 4781}, {17.400000000000002`, 5203.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 3917}, {18.400000000000002`, 4985.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 10401}, {19.400000000000002`, 11259.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 48679}, {20.400000000000002`, 81244.}]},
{RGBColor[0, 1, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 46}, {21.400000000000002`, 790.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 205223}, {1.4, 205560.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 98780}, {2.4000000000000004`, 98970.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56274}, {3.4000000000000004`, 56403.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 579243}, {4.4, 629908.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 40314}, {5.3999999999999995`, 444077.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 23197}, {6.3999999999999995`, 28026.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 27221}, {7.3999999999999995`, 34260.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 11965}, {8.4, 36011.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 826}, {9.4, 4176.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 9382}, {10.4, 11756.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 22937}, {11.4, 26544.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 5424}, {12.4, 9964.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 916}, {13.4, 5643.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 220}, {14.4, 2044.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 330}, {15.4, 2724.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 2189}, {16.4, 3335.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 5203}, {17.400000000000002`, 5302.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 4985}, {18.400000000000002`, 5736.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 11259}, {19.400000000000002`, 11528.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 81244}, {20.400000000000002`, 86301.}]},
{RGBColor[1, 0, 1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 790}, {21.400000000000002`, 26223.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 205560}, {1.4, 206158.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 98970}, {2.4000000000000004`, 103293.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56403}, {3.4000000000000004`, 56622.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 629908}, {4.4, 644023.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 444077}, {5.3999999999999995`, 447669.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 28026}, {6.3999999999999995`, 113294.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 34260}, {7.3999999999999995`, 36521.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 36011}, {8.4, 36950.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 4176}, {9.4, 4365.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 11756}, {10.4, 13032.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 26544}, {11.4, 29499.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 9964}, {12.4, 10592.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5643}, {13.4, 5925.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2044}, {14.4, 2104.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2724}, {15.4, 2733.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 3335}, {16.4, 3753.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 5302}, {17.400000000000002`, 6671.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 5736}, {18.400000000000002`, 6596.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 11528}, {19.400000000000002`, 11992.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 86301}, {20.400000000000002`, 94589.}]},
{RGBColor[1, 1, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26223}, {21.400000000000002`, 26347.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206158}, {1.4, 206466.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 103293}, {2.4000000000000004`, 105275.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56622}, {3.4000000000000004`, 56692.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 644023}, {4.4, 664136.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 447669}, {5.3999999999999995`, 452087.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 113294}, {6.3999999999999995`, 116014.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 36521}, {7.3999999999999995`, 114206.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 36950}, {8.4, 40837.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 4365}, {9.4, 5399.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 13032}, {10.4, 15815.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 29499}, {11.4, 30097.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 10592}, {12.4, 10749.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5925}, {13.4, 5993.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2104}, {14.4, 2127.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2733}, {15.4, 2757.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 3753}, {16.4, 5845.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 6671}, {17.400000000000002`, 7096.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 6596}, {18.400000000000002`, 6957.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 11992}, {19.400000000000002`, 12455.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 94589}, {20.400000000000002`, 99403.}]},
{GrayLevel[0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26347}, {21.400000000000002`, 26402.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206466}, {1.4, 206479.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105275}, {2.4000000000000004`, 105334.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56692}, {3.4000000000000004`, 56702.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 664136}, {4.4, 676014.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 452087}, {5.3999999999999995`, 470281.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116014}, {6.3999999999999995`, 116998.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 114206}, {7.3999999999999995`, 117231.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 40837}, {8.4, 108300.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 5399}, {9.4, 7890.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 15815}, {10.4, 17364.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 30097}, {11.4, 30406.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 10749}, {12.4, 11122.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 5993}, {13.4, 6372.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2127}, {14.4, 2414.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2757}, {15.4, 2779.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 5845}, {16.4, 6116.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7096}, {17.400000000000002`, 7107.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 6957}, {18.400000000000002`, 6967.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12455}, {19.400000000000002`, 12459.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99403}, {20.400000000000002`, 99603.}]},
{GrayLevel[0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26402}, {21.400000000000002`, 26446.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206479}, {1.4, 206569.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105334}, {2.4000000000000004`, 105376.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56702}, {3.4000000000000004`, 56959.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 676014}, {4.4, 676323.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 470281}, {5.3999999999999995`, 473524.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 116998}, {6.3999999999999995`, 117200.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 117231}, {7.3999999999999995`, 118264.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 108300}, {8.4, 111395.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 7890}, {9.4, 41576.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 17364}, {10.4, 19242.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 30406}, {11.4, 32110.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 11122}, {12.4, 11432.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 6372}, {13.4, 8323.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2414}, {14.4, 2606.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 2779}, {15.4, 3761.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6116}, {16.4, 6603.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7107}, {17.400000000000002`, 7166.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 6967}, {18.400000000000002`, 7409.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12459}, {19.400000000000002`, 12475.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99603}, {20.400000000000002`, 99813.}]},
{GrayLevel[0.4], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26446}, {21.400000000000002`, 26753.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206569}, {1.4, 206784.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 105376}, {2.4000000000000004`, 106544.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 56959}, {3.4000000000000004`, 57005.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 676323}, {4.4, 682314.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 473524}, {5.3999999999999995`, 475342.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 117200}, {6.3999999999999995`, 118360.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 118264}, {7.3999999999999995`, 120784.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 111395}, {8.4, 112866.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 41576}, {9.4, 43126.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 19242}, {10.4, 49298.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 32110}, {11.4, 34559.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 11432}, {12.4, 11716.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 8323}, {13.4, 8877.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2606}, {14.4, 2750.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3761}, {15.4, 3867.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6603}, {16.4, 6656.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7166}, {17.400000000000002`, 7191.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7409}, {18.400000000000002`, 7426.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12475}, {19.400000000000002`, 12487.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99813}, {20.400000000000002`, 99917.}]},
{GrayLevel[0.6], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26753}, {21.400000000000002`, 26822.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 206784}, {1.4, 214975.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 106544}, {2.4000000000000004`, 111339.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 57005}, {3.4000000000000004`, 63362.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 682314}, {4.4, 686957.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 475342}, {5.3999999999999995`, 478442.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 118360}, {6.3999999999999995`, 124600.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 120784}, {7.3999999999999995`, 121656.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 112866}, {8.4, 113249.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 43126}, {9.4, 44640.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 49298}, {10.4, 52763.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 34559}, {11.4, 172355.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 11716}, {12.4, 22265.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 8877}, {13.4, 9432.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 2750}, {14.4, 3020.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 3867}, {15.4, 4077.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 6656}, {16.4, 7040.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 7191}, {17.400000000000002`, 9418.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7426}, {18.400000000000002`, 7851.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 12487}, {19.400000000000002`, 13057.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 99917}, {20.400000000000002`, 107507.}]},
{GrayLevel[0.8], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 26822}, {21.400000000000002`, 29282.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 214975}, {1.4, 216465.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111339}, {2.4000000000000004`, 111593.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 63362}, {3.4000000000000004`, 64150.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 686957}, {4.4, 688176.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 478442}, {5.3999999999999995`, 479664.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 124600}, {6.3999999999999995`, 125433.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121656}, {7.3999999999999995`, 121826.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 113249}, {8.4, 113543.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 44640}, {9.4, 44718.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 52763}, {10.4, 52958.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 172355}, {11.4, 181353.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 22265}, {12.4, 81102.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9432}, {13.4, 9458.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3020}, {14.4, 3020.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 4077}, {15.4, 4149.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 7040}, {16.4, 7139.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9418}, {17.400000000000002`, 9432.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7851}, {18.400000000000002`, 7875.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13057}, {19.400000000000002`, 13095.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 107507}, {20.400000000000002`, 109013.}]},
{GrayLevel[1], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 29282}, {21.400000000000002`, 29887.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 216465}, {1.4, 216784.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111593}, {2.4000000000000004`, 111674.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64150}, {3.4000000000000004`, 64203.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688176}, {4.4, 688684.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 479664}, {5.3999999999999995`, 483580.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125433}, {6.3999999999999995`, 125656.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121826}, {7.3999999999999995`, 121935.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 113543}, {8.4, 114063.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 44718}, {9.4, 46479.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 52958}, {10.4, 53904.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 181353}, {11.4, 182026.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81102}, {12.4, 81234.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 9458}, {13.4, 98210.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 3020}, {14.4, 6345.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 4149}, {15.4, 7432.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 7139}, {16.4, 8369.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 9432}, {17.400000000000002`, 10025.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 7875}, {18.400000000000002`, 9498.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13095}, {19.400000000000002`, 13155.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 109013}, {20.400000000000002`, 110526.}]},
{RGBColor[0.7, 0, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 29887}, {21.400000000000002`, 30079.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 216784}, {1.4, 217155.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111674}, {2.4000000000000004`, 111727.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64203}, {3.4000000000000004`, 64286.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688684}, {4.4, 688779.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 483580}, {5.3999999999999995`, 485409.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125656}, {6.3999999999999995`, 125741.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121935}, {7.3999999999999995`, 121986.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 114063}, {8.4, 114513.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 46479}, {9.4, 46870.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 53904}, {10.4, 54220.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 182026}, {11.4, 182570.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81234}, {12.4, 81282.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 98210}, {13.4, 101770.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 6345}, {14.4, 26500.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 7432}, {15.4, 8050.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 8369}, {16.4, 8629.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 10025}, {17.400000000000002`, 10873.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9498}, {18.400000000000002`, 9681.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13155}, {19.400000000000002`, 13217.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 110526}, {20.400000000000002`, 111054.}]},
{RGBColor[0, 0.7, 0], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 30079}, {21.400000000000002`, 30102.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 217155}, {1.4, 217420.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111727}, {2.4000000000000004`, 111740.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64286}, {3.4000000000000004`, 64298.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688779}, {4.4, 688889.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 485409}, {5.3999999999999995`, 487420.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125741}, {6.3999999999999995`, 125745.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 121986}, {7.3999999999999995`, 122005.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 114513}, {8.4, 114557.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 46870}, {9.4, 47819.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54220}, {10.4, 54335.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 182570}, {11.4, 182646.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81282}, {12.4, 81400.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 101770}, {13.4, 105536.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 26500}, {14.4, 27029.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 8050}, {15.4, 36842.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 8629}, {16.4, 8671.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 10873}, {17.400000000000002`, 10895.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9681}, {18.400000000000002`, 9713.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13217}, {19.400000000000002`, 13234.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 111054}, {20.400000000000002`, 111211.}]},
{RGBColor[0, 0, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 30102}, {21.400000000000002`, 31395.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 217420}, {1.4, 217632.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 111740}, {2.4000000000000004`, 113043.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64298}, {3.4000000000000004`, 64465.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 688889}, {4.4, 691424.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 487420}, {5.3999999999999995`, 488809.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 125745}, {6.3999999999999995`, 126639.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 122005}, {7.3999999999999995`, 126635.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 114557}, {8.4, 115420.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 47819}, {9.4, 48435.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54335}, {10.4, 54400.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 182646}, {11.4, 183337.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81400}, {12.4, 81510.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 105536}, {13.4, 107336.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 27029}, {14.4, 27233.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36842}, {15.4, 36871.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 8671}, {16.4, 248560.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 10895}, {17.400000000000002`, 48770.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 9713}, {18.400000000000002`, 22986.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 13234}, {19.400000000000002`, 18679.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 111211}, {20.400000000000002`, 164273.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31395}, {21.400000000000002`, 31594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 217632}, {1.4, 218267.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 113043}, {2.4000000000000004`, 121762.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64465}, {3.4000000000000004`, 64831.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 691424}, {4.4, 694881.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 488809}, {5.3999999999999995`, 489078.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 126639}, {6.3999999999999995`, 129617.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 126635}, {7.3999999999999995`, 127902.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115420}, {8.4, 115438.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 48435}, {9.4, 48533.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54400}, {10.4, 54493.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 183337}, {11.4, 187853.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81510}, {12.4, 81594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 107336}, {13.4, 108397.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 27233}, {14.4, 28022.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36871}, {15.4, 36880.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 248560}, {16.4, 303932.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 48770}, {17.400000000000002`, 463648.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 22986}, {18.400000000000002`, 55909.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 18679}, {19.400000000000002`, 46762.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 164273}, {20.400000000000002`, 306671.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31594}, {21.400000000000002`, 31610.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 218267}, {1.4, 220185.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 121762}, {2.4000000000000004`, 123117.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 64831}, {3.4000000000000004`, 66554.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 694881}, {4.4, 699135.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 489078}, {5.3999999999999995`, 489843.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 129617}, {6.3999999999999995`, 130809.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 127902}, {7.3999999999999995`, 128529.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115438}, {8.4, 115449.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 48533}, {9.4, 49029.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54493}, {10.4, 54528.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 187853}, {11.4, 188948.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81594}, {12.4, 81767.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 108397}, {13.4, 111222.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28022}, {14.4, 28200.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36880}, {15.4, 36944.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 303932}, {16.4, 317805.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 463648}, {17.400000000000002`, 492239.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 55909}, {18.400000000000002`, 398972.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 46762}, {19.400000000000002`, 51501.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 306671}, {20.400000000000002`, 400779.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31610}, {21.400000000000002`, 31668.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 220185}, {1.4, 222920.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 123117}, {2.4000000000000004`, 129951.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 66554}, {3.4000000000000004`, 67790.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 699135}, {4.4, 701105.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 489843}, {5.3999999999999995`, 490218.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 130809}, {6.3999999999999995`, 131598.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 128529}, {7.3999999999999995`, 129321.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115449}, {8.4, 115458.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49029}, {9.4, 49040.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54528}, {10.4, 54538.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 188948}, {11.4, 189628.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81767}, {12.4, 81892.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 111222}, {13.4, 111313.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28200}, {14.4, 28249.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36944}, {15.4, 36966.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 317805}, {16.4, 322980.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 492239}, {17.400000000000002`, 510035.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 398972}, {18.400000000000002`, 402521.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 51501}, {19.400000000000002`, 192277.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 400779}, {20.400000000000002`, 442235.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31668}, {21.400000000000002`, 31668.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 222920}, {1.4, 283238.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 129951}, {2.4000000000000004`, 168499.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 67790}, {3.4000000000000004`, 79964.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 701105}, {4.4, 789726.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 490218}, {5.3999999999999995`, 520254.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 131598}, {6.3999999999999995`, 151901.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 129321}, {7.3999999999999995`, 141215.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 115458}, {8.4, 117054.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49040}, {9.4, 49621.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 54538}, {10.4, 55270.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 189628}, {11.4, 206666.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 81892}, {12.4, 90419.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 111313}, {13.4, 116451.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28249}, {14.4, 28989.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 36966}, {15.4, 37368.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 322980}, {16.4, 401574.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 510035}, {17.400000000000002`, 645485.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 402521}, {18.400000000000002`, 526226.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 192277}, {19.400000000000002`, 259581.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 442235}, {20.400000000000002`, 2.14579*^6}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 31668}, {21.400000000000002`, 35783.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 283238}, {1.4, 283249.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 168499}, {2.4000000000000004`, 168506.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 79964}, {3.4000000000000004`, 79966.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 789726}, {4.4, 791161.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 520254}, {5.3999999999999995`, 540027.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{5.6, 151901}, {6.3999999999999995`, 152114.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{6.6, 141215}, {7.3999999999999995`, 141343.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{7.6, 117054}, {8.4, 117183.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{8.6, 49621}, {9.4, 49912.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{9.6, 55270}, {10.4, 55338.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{10.6, 206666}, {11.4, 210092.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{11.6, 90419}, {12.4, 91243.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{12.6, 116451}, {13.4, 116817.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{13.6, 28989}, {14.4, 29059.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{14.6, 37368}, {15.4, 38370.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{15.6, 401574}, {16.4, 401799.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{16.6, 645485}, {17.400000000000002`, 645498.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{17.6, 526226}, {18.400000000000002`, 526238.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{18.6, 259581}, {19.400000000000002`, 259584.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{19.6, 2145790}, {20.400000000000002`, 2.146889*^6}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{20.6, 35783}, {21.400000000000002`, 277611.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"\:52d5\:690d\"", TraditionalForm], 0}, {2,
FormBox["\"\:8fb2\:5b66\"", TraditionalForm], 0}, {3,
FormBox["\"\:6c34\:7523\"", TraditionalForm], 0}, {4,
FormBox["\"\:5316\:5b66\"", TraditionalForm], 0}, {5,
FormBox["\"\:7269\:6027\"", TraditionalForm], 0}, {6,
FormBox["\"\:5206\:6790\"", TraditionalForm], 0}, {7,
FormBox["\"\:5fdc\:5316\"", TraditionalForm], 0}, {8,
FormBox["\"\:91d1\:5c5e\"", TraditionalForm], 0}, {9,
FormBox["\"\:6a5f\:68b0\"", TraditionalForm], 0}, {10,
FormBox["\"\:5316\:5de5\"", TraditionalForm], 0}, {11,
FormBox["\"\:6c17\:8c61\"", TraditionalForm], 0}, {12,
FormBox["\"\:5730\:7403\"", TraditionalForm], 0}, {13,
FormBox["\"\:96fb\:5b50\"", TraditionalForm], 0}, {14,
FormBox["\"\:6570\:7406\"", TraditionalForm], 0}, {15,
FormBox["\"\:6570\:5b66\"", TraditionalForm], 0}, {16,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {17,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {18,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {19,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {20,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}, {21,
FormBox["\"\:91cf\:5b50\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"\:52d5\:690d\"", TraditionalForm], 0}, {2,
FormBox["\"\:8fb2\:5b66\"", TraditionalForm], 0}, {3,
FormBox["\"\:6c34\:7523\"", TraditionalForm], 0}, {4,
FormBox["\"\:5316\:5b66\"", TraditionalForm], 0}, {5,
FormBox["\"\:7269\:6027\"", TraditionalForm], 0}, {6,
FormBox["\"\:5206\:6790\"", TraditionalForm], 0}, {7,
FormBox["\"\:5fdc\:5316\"", TraditionalForm], 0}, {8,
FormBox["\"\:91d1\:5c5e\"", TraditionalForm], 0}, {9,
FormBox["\"\:6a5f\:68b0\"", TraditionalForm], 0}, {10,
FormBox["\"\:5316\:5de5\"", TraditionalForm], 0}, {11,
FormBox["\"\:6c17\:8c61\"", TraditionalForm], 0}, {12,
FormBox["\"\:5730\:7403\"", TraditionalForm], 0}, {13,
FormBox["\"\:96fb\:5b50\"", TraditionalForm], 0}, {14,
FormBox["\"\:6570\:7406\"", TraditionalForm], 0}, {15,
FormBox["\"\:6570\:5b66\"", TraditionalForm], 0}, {16,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {17,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {18,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {19,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {20,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}, {21,
FormBox["\"\:91cf\:5b50\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBeJH7cGnPWe8dNyzedKXLCC9Rqb+aDaQdpI6FF8ApGec
N2QrA9INOq5V5UBa4MVy7w2vXzq2PeeM2QykHVNyt3kyvHJ81bq4/YT5K8dL
8g1/LW1fOd4ofJC7w+6V4+qNPOq7gHTAikOmIFoqePvvfUC65/ktvf1A+t+1
iHoQbZY8q/SO/ytHtSddz+8CafdrD1RYA145Zj2rs+QE0nyLtztxA+krhzZU
8gDpdSkJh0H0x89+0aZAWkw8iz0ESK+Mfvo2CkjfOHbLKRpIc8glOF4G0vvO
ll6+AqQbHsfw3gHS/zd1hP4Diduoyi8Of+X4ITI9C0SvMV8cVRX1ytFT/36i
UPQrx7XGM2UVgLSExoZ3HkC60/mwnDeQtjV/dd0HSPc0FRm8BNJ8BpI+ojGv
HA82CIo+SXzlOEcs5zxL0ivHsAzXf3tyXjkCAMK/tjQ=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"biomedPosition", "=",
RowBox[{"{",
RowBox[{"16", ",", "17", ",", "18", ",", "19", ",", "20"}],
"}"}]}]], "Input",
CellChangeTimes->{{3.435038217629776*^9, 3.4350382528928833`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"16", ",", "17", ",", "18", ",", "19", ",", "20"}], "}"}]], "Output",\
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwAGKZ+xmf1Ga8dJS4fFnDAUjPeikQCqIdtsqsdAXSDBZH
aj2BNN+NdV+ygDRH+5yj2UBalvl0fAGQbrhpxlYGpJnv+laVA+lTHeu9N7x+
6fjpMm/MZiAdsbJ0myfDK8cQvVXtJ8xfOd7navxrafvKcVbdk9wddq8c8+cf
Nd0FpG/I7fi9D0jPOHRbbz+Q3rU5sh5ECwnOLr3j/8rRZWr387tA+tvVhyqs
Aa8cn32tt+QE0ktW7nLiBtKBFRsreYB0gnTiYRBttd4/2hRId/hks4cAac0l
z95GAennZnecooG0l1mi42UgbTav7PIVIM29Ipb3DpBemdUZ+g+kf+9k+cXh
rxwb1LOzQPRkmaVRVVFAfzA9TBSKfuV4Xn+2rAKQXvl64zsPIB2ifVTOG0h3
Mby57gOk2xJKDF4C6aznUj6iMa8c93wSEn2S+Mqx7/Sv8yxJrxzDtD3+7cl5
5QgAXkzBJA==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"exbiomedPosition", "=",
RowBox[{"Flatten", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[",
RowBox[{"1", ",", "15"}], "]"}], ",", "21"}], "}"}], "]"}]}]], "Input",
CellChangeTimes->{{3.435354138511841*^9, 3.4353541815259333`*^9}, {
3.435354317249127*^9, 3.435354317775854*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", "8",
",", "9", ",", "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15",
",", "21"}], "}"}]], "Output",
CellChangeTimes->{{3.4353541630583763`*^9, 3.435354181870062*^9},
3.43535431967358*^9, 3.435355694149644*^9, 3.435365118561648*^9,
3.4353766900486593`*^9, 3.435379666672179*^9, 3.4790119335787086`*^9,
3.479018208496169*^9, 3.489811891836174*^9, 3.518907453420495*^9,
3.5217612600536623`*^9, 3.522544495150839*^9, 3.5225481422863493`*^9,
3.522557917762683*^9, 3.522558326876466*^9, 3.5225589708128757`*^9,
3.5315311808553047`*^9, 3.531534140371667*^9, 3.5316145030889606`*^9,
3.531622860009904*^9, 3.531627029844143*^9, 3.5316295175560713`*^9,
3.531630107044633*^9, 3.5317132424999037`*^9, 3.531776059363636*^9,
3.531790191276074*^9, 3.531790870919146*^9, 3.532036619067911*^9,
3.532039835717415*^9, 3.532054634936667*^9, 3.5321248443053503`*^9,
3.535608064895298*^9, 3.535608659501692*^9, 3.5370974292021923`*^9,
3.537408783087461*^9, 3.537436908894121*^9, 3.537520501616108*^9,
3.5375249822213306`*^9, 3.5375285114191113`*^9, 3.537848707700111*^9,
3.537939040902103*^9, 3.5409839766492777`*^9, 3.541051008445694*^9,
3.54667109029547*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"biomedNames5", "=",
RowBox[{"ClNames21", "[",
RowBox[{"[", "biomedPosition", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.435038791493435*^9, 3.435038824584484*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "\<\"Me-2\"\>", ",", "\<\"Me-3\"\>",
",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwBGK36IeCF6e/dBSbXPFJbcZLR4O/tzUcgLTaV+lQEB11
dfFKVyB9Sqm0zhNIz7x26EsWkHZufHg0G0izKV6OLwDSRw45sZUBafW9YVXl
QPrvxq3eG16/dNT6IBizGUhHLqnd5snwyvFR7/r2E+avHO+FN/21tH3lKKX5
NHeH3StHs9NnTHcB6Qnrd/zeB6R/BN3R2w+kMwKi6kG0z+rZpXf8XzkuMux5
fhdIX/n6WIU14JXjjYUNlpwgOn63EzeQtpPbVMkDpGfsSzwMovf5BkSbAumJ
FjnsIUB6bcybt1FA2ufDPadoIP1IJtnxMki/R/nlK0B6m0cc7x0gvUyiK/Qf
kP52OF9hcfgrx3WNhVkg+rboiqiqqFeOf388SRSKfuW4adE8WQUgzXFz6zsP
IL15+Qk5byB9quj9dR8gvVS40uAlkFY4LucjGvPK8cFtMdEniUD3cwhdYEl6
5Xj4ute/PTmvHAECNMzE
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"biomedJNames5", "=",
RowBox[{"{",
RowBox[{
"\"\<\:81e8\:5e8a1\>\"", ",", "\"\<\:81e8\:5e8a2\>\"", ",",
"\"\<\:795e\:7d4c\>\"", ",", "\"\<\:7363\:533b\>\"", ",",
"\"\<\:751f\:5316\>\""}], "}"}]}]], "Input",
CellChangeTimes->{{3.435278055455193*^9, 3.435278134185513*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a1\"\>", ",", "\<\"\:81e8\:5e8a2\"\>",
",", "\<\"\:795e\:7d4c\"\>", ",", "\<\"\:7363\:533b\"\>",
",", "\<\"\:751f\:5316\"\>"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBeLvTGnPXWe8dNyodrPOE0hPbfzzJQtIX0kVOZYNpJ+b
X4kvANIn+FzYyoD0d8+4qnIgHau2x3vD65eO6iIiMZuBdMX++m2eDK8cg9dv
bD9h/spx7/+mv5a2rxyn1j3N3WH3yvGC8lnTXUD6VMDO3/uAdMqcO3r7gbTG
n6h6EL3tx+zSO/6vHB/I9D6/C6Qv/X2iwhrwylGqtdGSE0grdO114gbSMws3
VfIAaXWRpMMg+s7cgGhTIH1LP5c9BEhPOvTubRSQnj73gVM0kO4STHG8DKR7
zpRfvgKkOaISeO8A6Rm/ukL/geic3QqLw185RjoUZ4HolxaroqqiXjke0H+e
KBT9ynEDwwJZBSCt47z9nQeQtph+Ss4bSHsIf7ruA6Q9W6oNXgLpc9oKPqIx
rxynMUmKPkkEqtcTucCSBPQHs8+/PTmvHAFKIrXs
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"colors5", "=",
RowBox[{"colors21", "[",
RowBox[{"[", "biomedPosition", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.4350385527940483`*^9, 3.435038567239362*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"CMYKColor", "[",
RowBox[{"0.75`", ",", "0", ",", "0", ",", "0.5`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0.75`", ",", "0", ",", "0.5`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0", ",", "0.75`", ",", "0.5`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.7`", ",", "0.5`", ",", "0.2`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.2`", ",", "0.7`", ",", "0.5`"}], "]"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwBOKEFzxvL0x/6bgsv+OT2oyXjo+Mn2g4AOnslWqhIPqB
ouwqVyBt9ftjnSeQLlxt/DULSLcVVB7LBtJJbVfjC4B0T4wrWxmQ/l8WX1UO
pEX793tveP3SUS1VLGYzkG6Pb9rmyfDK8YPepvYT5q8ci5Y0/7W0feUYdPRZ
7g67V45Vhy+Y7gLSAXN3/t4HpH/b3tXbD6R1gqLrQfSVmXNL7/i/clyR1/v8
LpBWuPdUhTXglWPbjUZLTiDt4L3fiRtI3xTdUskDpF/sST4MonkcgqNNgfSh
rlz2ECCtt/3D2yggnXf2oVM0kK5iT3W8DKQnKFdcvgKki9cm8N4B0m8CukP/
AekHL6sUF4e/ctTaVZIFoq0T1kRVRb1y5HZ+mSgUDTTv2kJZBSDN92THOw8g
PU/9jJw3kC5p+HzdB0h7P6sxeAmkHdIVfURjXjnafZESfZL4ylEqWOwCS9Ir
R/F5vv/25LxyBAAjFcbN
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedciting5BiomedData", "=",
RowBox[{"Transpose", "[",
RowBox[{
RowBox[{"Transpose", "[",
RowBox[{"citedciting21Data", "[",
RowBox[{"[", "biomedPosition", "]"}], "]"}], "]"}], "[",
RowBox[{"[", "biomedPosition", "]"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.43503828968388*^9, 3.4350383710553827`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"239889", ",", "37875", ",", "13273", ",", "5445", ",", "53062"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"55372", ",", "414878", ",", "32923", ",", "28083", ",", "142398"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"13873", ",", "28591", ",", "343063", ",", "4739", ",", "94108"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"5175", ",", "17796", ",", "3549", ",", "140776", ",", "41456"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"78594", ",", "135450", ",", "123705", ",", "67304", ",", "1703555"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwAeIPKtuPXpj+0pFp0r3TIPrHSvsLIDrLYP4VEM0zccYn
tRkvHYNmvtFwANJPTjiFgmix6gmrXIE0j4JbvSeQ3ps4/2sWkJ6x/eyxbCA9
RfVOfAGQzvnpw1YGpJ/dS6sqB+kzPey94fVLR59jEjGbgfSsBR3bPBleOV6Z
uKn9hPkrR+7Alr+Wtq8cD8k/z91h98pRJe+K6S4gnfJm5+99QLqr567efiCt
sDy6HkTLvZtbesf/laPVwd7nd4F01tfnKqwBrxxVDZosOYG0g8JBJ24gLZa7
pZIHSB8TTTkMopdVhUWbAunvz3LZQ4D0CeGPb6OA9Ll7j5yigbSKVrrjZSB9
pari8hUgncOcyHsHSIuu6g79B6Q15n1QXBwOdEdRWRaIPjZpXVRV1CvH3+mv
E4WiXzmWGS2WVQDSz/p2vfMA0hc+n5XzBtLL5L9e9wHSSTvrDF4CabUnSj6i
Ma8cnzTLiD5JfOUYVCxxgSUJ6B5z/397cl45AgCAPteP
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedcitingExBiomedData", "=",
RowBox[{"Transpose", "[",
RowBox[{
RowBox[{"Transpose", "[",
RowBox[{"citedciting21Data", "[",
RowBox[{"[", "exbiomedPosition", "]"}], "]"}], "]"}], "[",
RowBox[{"[", "exbiomedPosition", "]"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.435354225547122*^9, 3.435354293593422*^9}, {
3.435354328976078*^9, 3.435354329572462*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"188946", ",", "8916", ",", "9838", ",", "934", ",", "562", ",", "1011",
",", "394", ",", "23", ",", "74", ",", "163", ",", "8033", ",", "2100",
",", "333", ",", "115", ",", "218", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"7157", ",", "83165", ",", "2329", ",", "6428", ",", "146", ",", "6214",
",", "2337", ",", "81", ",", "23", ",", "1618", ",", "4885", ",", "621",
",", "78", ",", "42", ",", "13", ",", "14"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"8428", ",", "1773", ",", "43839", ",", "335", ",", "91", ",", "416", ",",
"68", ",", "12", ",", "222", ",", "21", ",", "6297", ",", "1090", ",",
"26", ",", "10", ",", "3", ",", "15"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"692", ",", "4926", ",", "268", ",", "571546", ",", "39515", ",", "15556",
",", "24422", ",", "11849", ",", "507", ",", "7580", ",", "3722", ",",
"1613", ",", "479", ",", "53", ",", "96", ",", "744"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"337", ",", "190", ",", "129", ",", "50665", ",", "403763", ",", "4829",
",", "7039", ",", "24046", ",", "3350", ",", "2374", ",", "3607", ",",
"4540", ",", "4727", ",", "1824", ",", "2394", ",", "25433"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"598", ",", "4323", ",", "219", ",", "14115", ",", "3592", ",", "85268",
",", "2261", ",", "939", ",", "189", ",", "1276", ",", "2955", ",",
"628", ",", "282", ",", "60", ",", "9", ",", "124"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"308", ",", "1982", ",", "70", ",", "20113", ",", "4418", ",", "2720",
",", "77685", ",", "3887", ",", "1034", ",", "2783", ",", "598", ",",
"157", ",", "68", ",", "23", ",", "24", ",", "55"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"13", ",", "59", ",", "10", ",", "11878", ",", "18194", ",", "984", ",",
"3025", ",", "67463", ",", "2491", ",", "1549", ",", "309", ",", "373",
",", "379", ",", "287", ",", "22", ",", "44"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"90", ",", "42", ",", "257", ",", "309", ",", "3243", ",", "202", ",",
"1033", ",", "3095", ",", "33686", ",", "1878", ",", "1704", ",", "310",
",", "1951", ",", "192", ",", "982", ",", "307"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"215", ",", "1168", ",", "46", ",", "5991", ",", "1818", ",", "1160", ",",
"2520", ",", "1471", ",", "1550", ",", "30056", ",", "2449", ",", "284",
",", "554", ",", "144", ",", "106", ",", "69"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"8191", ",", "4795", ",", "6357", ",", "4643", ",", "3100", ",", "6240",
",", "872", ",", "383", ",", "1514", ",", "3465", ",", "137796", ",",
"10549", ",", "555", ",", "270", ",", "210", ",", "2460"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"1490", ",", "254", ",", "788", ",", "1219", ",", "1222", ",", "833", ",",
"170", ",", "294", ",", "78", ",", "195", ",", "8998", ",", "58837",
",", "26", ",", "0", ",", "72", ",", "605"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"319", ",", "81", ",", "53", ",", "508", ",", "3916", ",", "223", ",",
"109", ",", "520", ",", "1761", ",", "946", ",", "673", ",", "132", ",",
"88752", ",", "3325", ",", "3283", ",", "192"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"371", ",", "53", ",", "83", ",", "95", ",", "1829", ",", "85", ",", "51",
",", "450", ",", "391", ",", "316", ",", "544", ",", "48", ",", "3560",
",", "20155", ",", "618", ",", "23"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"265", ",", "13", ",", "12", ",", "110", ",", "2011", ",", "4", ",", "19",
",", "44", ",", "949", ",", "115", ",", "76", ",", "118", ",", "3766",
",", "529", ",", "28792", ",", "1293"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"11", ",", "7", ",", "2", ",", "1435", ",", "19773", ",", "213", ",",
"128", ",", "129", ",", "291", ",", "68", ",", "3426", ",", "824", ",",
"366", ",", "70", ",", "1002", ",", "241828"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBuJ785dJZ8946XjlsOlxEG3w5VF8AZC2mhfMVgak67Qy
q8qB9Amz494bXr90vPBbKmYzkPa63LPNk+GV4w6Gze0nzF85Wqm2/rW0feV4
ovV57g67V452YjdMdwHpshW7fu8D0kwf7+rtB9KbCmLqQXRp5LzSO/6vHP8c
73t+F0hveP5ChTXglaOeXrMlJ5C2/3/IiRtIf7q9pZIHSGu3pRwG0clHI6JN
gfScf3nsIUB6UufHt1FA+lzQY6doIG3in+F4GUhzcldevgKkb2kn894B0nxr
ekL/AemKYy5Ki8NfOV77XJ4Fomcf3xBVFfXKsWfv20Sh6FeOIvpLZRWA9A2z
Pe88gLRN6Xk5byDNcePbdR8gnWreYPASSB+ZrOIjGvPKUb1cTvRJItCcNVIX
WJJeOYbfDfi3J+eVIwDAirBu
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedcitingExBiomedDataZeroSelf", "=",
RowBox[{"Transpose", "[",
RowBox[{
RowBox[{"Transpose", "[",
RowBox[{"citedciting21DataZeroSelf", "[",
RowBox[{"[", "exbiomedPosition", "]"}], "]"}], "]"}], "[",
RowBox[{"[", "exbiomedPosition", "]"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.435354225547122*^9, 3.435354293593422*^9}, {
3.435354328976078*^9, 3.435354329572462*^9}, {3.43535450337381*^9,
3.435354515364583*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"0", ",", "8916", ",", "9838", ",", "934", ",", "562", ",", "1011", ",",
"394", ",", "23", ",", "74", ",", "163", ",", "8033", ",", "2100", ",",
"333", ",", "115", ",", "218", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"7157", ",", "0", ",", "2329", ",", "6428", ",", "146", ",", "6214", ",",
"2337", ",", "81", ",", "23", ",", "1618", ",", "4885", ",", "621", ",",
"78", ",", "42", ",", "13", ",", "14"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"8428", ",", "1773", ",", "0", ",", "335", ",", "91", ",", "416", ",",
"68", ",", "12", ",", "222", ",", "21", ",", "6297", ",", "1090", ",",
"26", ",", "10", ",", "3", ",", "15"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"692", ",", "4926", ",", "268", ",", "0", ",", "39515", ",", "15556", ",",
"24422", ",", "11849", ",", "507", ",", "7580", ",", "3722", ",",
"1613", ",", "479", ",", "53", ",", "96", ",", "744"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"337", ",", "190", ",", "129", ",", "50665", ",", "0", ",", "4829", ",",
"7039", ",", "24046", ",", "3350", ",", "2374", ",", "3607", ",", "4540",
",", "4727", ",", "1824", ",", "2394", ",", "25433"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"598", ",", "4323", ",", "219", ",", "14115", ",", "3592", ",", "0", ",",
"2261", ",", "939", ",", "189", ",", "1276", ",", "2955", ",", "628",
",", "282", ",", "60", ",", "9", ",", "124"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"308", ",", "1982", ",", "70", ",", "20113", ",", "4418", ",", "2720",
",", "0", ",", "3887", ",", "1034", ",", "2783", ",", "598", ",", "157",
",", "68", ",", "23", ",", "24", ",", "55"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"13", ",", "59", ",", "10", ",", "11878", ",", "18194", ",", "984", ",",
"3025", ",", "0", ",", "2491", ",", "1549", ",", "309", ",", "373", ",",
"379", ",", "287", ",", "22", ",", "44"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"90", ",", "42", ",", "257", ",", "309", ",", "3243", ",", "202", ",",
"1033", ",", "3095", ",", "0", ",", "1878", ",", "1704", ",", "310", ",",
"1951", ",", "192", ",", "982", ",", "307"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"215", ",", "1168", ",", "46", ",", "5991", ",", "1818", ",", "1160", ",",
"2520", ",", "1471", ",", "1550", ",", "0", ",", "2449", ",", "284",
",", "554", ",", "144", ",", "106", ",", "69"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"8191", ",", "4795", ",", "6357", ",", "4643", ",", "3100", ",", "6240",
",", "872", ",", "383", ",", "1514", ",", "3465", ",", "0", ",", "10549",
",", "555", ",", "270", ",", "210", ",", "2460"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"1490", ",", "254", ",", "788", ",", "1219", ",", "1222", ",", "833", ",",
"170", ",", "294", ",", "78", ",", "195", ",", "8998", ",", "0", ",",
"26", ",", "0", ",", "72", ",", "605"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"319", ",", "81", ",", "53", ",", "508", ",", "3916", ",", "223", ",",
"109", ",", "520", ",", "1761", ",", "946", ",", "673", ",", "132", ",",
"0", ",", "3325", ",", "3283", ",", "192"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"371", ",", "53", ",", "83", ",", "95", ",", "1829", ",", "85", ",", "51",
",", "450", ",", "391", ",", "316", ",", "544", ",", "48", ",", "3560",
",", "0", ",", "618", ",", "23"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"265", ",", "13", ",", "12", ",", "110", ",", "2011", ",", "4", ",", "19",
",", "44", ",", "949", ",", "115", ",", "76", ",", "118", ",", "3766",
",", "529", ",", "0", ",", "1293"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"11", ",", "7", ",", "2", ",", "1435", ",", "19773", ",", "213", ",",
"128", ",", "129", ",", "291", ",", "68", ",", "3426", ",", "824", ",",
"366", ",", "70", ",", "1002", ",", "0"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBuI1V8KNs2e8dDR/9PY4iM61ehJfAKSvcIaylQFpu8UF
VeVA2oH5rPeG1y8d03RlYzYD6WPRU7Z5MrxyNArZ2n7C/JWj+f22v5a2rxyP
3HuRu8PulWPLwhumu4A0g+Du3/uA9KWQe3r7gXTT/Zh6MH10Xukd/1eOaqb9
z+8C6Q03XqqwBrxy3Dm72ZITSPdVHXbiBtItXlsreYD08u8ph0H05/DoaFMg
XVSWzx4CpNf/+PI2Ckj/OPbYKRpIzzqX4XgZSM/Lr7x8BUirbErmvQOkhZR7
Q/8B6by420qLw185fmmvzALRDjGboqqiXjn2PnifKBT9ypG7bpmsApA+f2rv
Ow8gbaB7Uc4bSMcU/rjuA6TPXW80eAmkZ+qo+YjGvHKUvyEv+iQRqO6szAWW
pFeOt/KC/u3JeeUIABs3sUc=
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citingcitedExBiomedData", "=",
RowBox[{"Transpose", "[", "citedcitingExBiomedData", "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.435354225547122*^9, 3.435354293593422*^9}, {
3.435354328976078*^9, 3.435354329572462*^9}, {3.435354425640327*^9,
3.435354464159573*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citingcitedExBiomedDataZeroSelf", "=",
RowBox[{"Transpose", "[", "citedcitingExBiomedDataZeroSelf", "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.435354225547122*^9, 3.435354293593422*^9}, {
3.435354328976078*^9, 3.435354329572462*^9}, {3.435354425640327*^9,
3.435354464159573*^9}, {3.435354552902857*^9, 3.435354564891075*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited5BiomedData", "=",
RowBox[{"Transpose", "[", "citedciting5BiomedData", "]"}]}]], "Input",
CellChangeTimes->{{3.435038382657069*^9, 3.435038408798999*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"239889", ",", "55372", ",", "13873", ",", "5175", ",", "78594"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"37875", ",", "414878", ",", "28591", ",", "17796", ",", "135450"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"13273", ",", "32923", ",", "343063", ",", "3549", ",", "123705"}], "}"}],
",",
RowBox[{"{",
RowBox[{"5445", ",", "28083", ",", "4739", ",", "140776", ",", "67304"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"53062", ",", "142398", ",", "94108", ",", "41456", ",", "1703555"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwBOJdN8xvXpj+0rHCbcUntRkvHXkvftFwANJJb5xDQbSv
0K9VrkA6jLmv3hNIu6mof8sC0pfeFZ/MBtL6qm/jC4D0rcY4tjIgrbCisqoc
SD/bedV7w+uXjka+CjGbgbRNxKxtngyvHHcFbGs/Yf7K8ZFMx19L21eOK468
zN1h98rRbv8d011A2s9kz+99QHpF3n29/UD6h2RcPYiueLug9I7/K0ellROe
3wXSLPJvVFgDXjlOYmy15ATScvuOOXED6VOV2yt5gHSdbvphEH3EOCbaFEj/
YipkDwHSd2x/vo0C0uemPnOKBtJc5zIdLwPpBblVl68A6ZjyNN47QFpncl/o
PyCddf+S8uLwV46b39Rmgegmi21RVVGvHLWOfE4Uin7l+F5mlawCkLYoPPjO
A0gf1bos5w2kXcp/X/cB0tcSWw1eAumM/Zo+ojFAf91VEn2S+MqxKkf5AkvS
K8cctrB/e3JeOQIAIdPHqQ==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedciting5BiomedDataZeroSelf", "=",
RowBox[{"ReplacePart", "[",
RowBox[{"citedciting5BiomedData", ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"5", ",", "5"}], "}"}], "\[Rule]", "0"}]}], "}"}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.435038629346808*^9, 3.435038708230297*^9},
3.4353554491813173`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "37875", ",", "13273", ",", "5445", ",", "53062"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"55372", ",", "0", ",", "32923", ",", "28083", ",", "142398"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"13873", ",", "28591", ",", "0", ",", "4739", ",", "94108"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"5175", ",", "17796", ",", "3549", ",", "0", ",", "41456"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"78594", ",", "135450", ",", "123705", ",", "67304", ",", "0"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwAuKJj1b8uzD9pWP4ve2f1Ga8dPQL/qfhAKS3fHQJBdFt
fGmrXYG0xboX9Z5Auptr+rcsIN0UcWt5NoiWm3gKRDNUf44vANIl7AlsZUD6
n3FjVTmQnlh4w3vD65eOWZlKMZuBdB/f3G2eDK8cm3p3tJ8wf+X4q6jjr6Xt
K0ct6Ve5O+xeOdpI3DXdBaR7Ovb83gek4/bf19sPpKtK4upBtJPrwtI7/q8c
ixknPr8LpKuq36iwBrxyZItpteQE0jUyx524gfSFK9sreYA0b2/6YRBt3x8T
bQqkjVIL2UOA9DuX32+jgDTD8udO0UDa4k6W42UgbX206vIVIP2gPYP3DpBe
9qkv9B+QNnuco7I4/JVje259FoiOa9oeVRX1yvHWpK+JQtGvHNOY1sgqAGkv
x8PvPIB0qf4VOW8g/enQn+s+QFpnTZvBSyDtsUzbRzTmleOVIyqiTxKB/rFX
vcCS9Mrxh1r4vz05rxwBt1/LLQ==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited5BiomedDataZeroSelf", "=",
RowBox[{"ReplacePart", "[",
RowBox[{"citingcited5BiomedData", ",",
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"5", ",", "5"}], "}"}], "\[Rule]", "0"}]}], "}"}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.435038629346808*^9, 3.435038747649374*^9},
3.4353554683997583`*^9}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "55372", ",", "13873", ",", "5175", ",", "78594"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"37875", ",", "0", ",", "28591", ",", "17796", ",", "135450"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"13273", ",", "32923", ",", "0", ",", "3549", ",", "123705"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"5445", ",", "28083", ",", "4739", ",", "0", ",", "67304"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"53062", ",", "142398", ",", "94108", ",", "41456", ",", "0"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVylsog3EYgPFhhnCx1e6MqTWsyKGRZHlJWVtIjL6tZkSzMVLmlNPU7E5u
cCeHmkNKKWY5lMPSVppYLlhRmr7/cIEsky/vd/H0u3ky23obOmI4HE4hFnr5
jrteoKGVH/iQLtIg0PFyKtDicHUT69UQ2apGubHUpBJVrIgjJnTNo9k0s/+d
2Meatfyl70PdzQaeFR132kYGUavwXrUTpuF0WqLbRTUbS3tKDoHaqGvmsoSA
zOP4Ky0n4NWHe1wKAvO9QbkbLS44+j1Go5bHvBP0O1s/wTpEVgYe6ggoP+de
gqgr8CqJrydQUmUvTULdJl9lMiobOxhOQX8VXWestjedVo7aO/oTGtFtM/NG
oaEYulKLrpeZ4QbNUI7e3KKnj8bUB9QbnG1i0FG7X7LaTEDEnzKxdsYeUCMU
gf6LiEGgJfDUvS0So43O8/ca1FgUSFeh7XLmTo1G0xz5NJqYkKsW6gjsS6XC
ZwMBYsnyc9sIWH5amMNuAv8Iz8yC
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citingcited5BiomedDataZeroSelf", ",",
RowBox[{"BarLabels", "->", "biomedNames5"}], ",",
RowBox[{"BarStyle", "->", "colors5"}]}], "]"}]], "Input",
CellChangeTimes->{{3.43503875965493*^9, 3.4350387740731993`*^9}, {
3.435038893591299*^9, 3.4350389319374*^9}, 3.435355489605218*^9}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 0.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 13873.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 5175.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 78594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 37875.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 13873}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5175}, {4.4, 22971.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 78594}, {5.3999999999999995`, 214044.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 37875}, {1.4, 51148.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 88295.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 22971}, {4.4, 26520.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 214044}, {5.3999999999999995`, 337749.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 51148}, {1.4, 56593.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 88295}, {2.4000000000000004`, 116378.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 47203.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 26520.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337749}, {5.3999999999999995`, 405053.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 56593}, {1.4, 109655.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 116378}, {2.4000000000000004`, 258776.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 47203}, {3.4000000000000004`, 141311.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 67976.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 405053}, {5.3999999999999995`, 405053.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"Me-1\"", TraditionalForm], 0}, {2,
FormBox["\"Me-2\"", TraditionalForm], 0}, {3,
FormBox["\"Me-3\"", TraditionalForm], 0}, {4,
FormBox["\"Me-4\"", TraditionalForm], 0}, {5,
FormBox["\"Mo\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"Me-1\"", TraditionalForm], 0}, {2,
FormBox["\"Me-2\"", TraditionalForm], 0}, {3,
FormBox["\"Me-3\"", TraditionalForm], 0}, {4,
FormBox["\"Me-4\"", TraditionalForm], 0}, {5,
FormBox["\"Mo\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->{{3.435038911528331*^9, 3.4350389328989983`*^9},
3.435214743214984*^9, 3.4352663764550467`*^9, 3.4352667305480757`*^9,
3.435277669843546*^9, 3.435285512324964*^9, 3.435354047788739*^9,
3.435355490915863*^9, 3.435355740858025*^9, 3.4353651198567057`*^9,
3.435376691304998*^9, 3.4353796683205557`*^9, 3.479011934996738*^9,
3.479018209225113*^9, 3.4898118931342087`*^9, 3.518907453888438*^9,
3.521761260395657*^9, 3.522544495461026*^9, 3.522548143128315*^9,
3.522557918022814*^9, 3.52255832712495*^9, 3.522558971082575*^9,
3.5315311811991987`*^9, 3.5315341406677647`*^9, 3.531614503515354*^9,
3.5316228603019543`*^9, 3.531627030558455*^9, 3.5316295179048767`*^9,
3.531630107396942*^9, 3.531713243060465*^9, 3.5317760596838627`*^9,
3.5317901921148252`*^9, 3.531790871415387*^9, 3.53203661946168*^9,
3.532039835958582*^9, 3.532054635384297*^9, 3.532124844603075*^9,
3.535608105178087*^9, 3.535608660136878*^9, 3.537097429885386*^9,
3.5374087838467493`*^9, 3.537436909522273*^9, 3.537520502247835*^9,
3.537524982763977*^9, 3.53752851204683*^9, 3.537848708355513*^9,
3.537939041509458*^9, 3.5409839772924337`*^9, 3.541051009335445*^9,
3.546671090882436*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citingcited5BiomedDataZeroSelf", ",",
RowBox[{"BarLabels", "->", "biomedJNames5"}], ",",
RowBox[{"BarStyle", "->", "colors5"}]}], "]"}]], "Input",
CellChangeTimes->{{3.43503875965493*^9, 3.4350387740731993`*^9}, {
3.435038893591299*^9, 3.4350389319374*^9}, 3.435278181903615*^9,
3.4353554965774*^9}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 0.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 13873.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 5175.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 78594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 37875.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 13873}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5175}, {4.4, 22971.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 78594}, {5.3999999999999995`, 214044.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 37875}, {1.4, 51148.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 88295.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 22971}, {4.4, 26520.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 214044}, {5.3999999999999995`, 337749.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 51148}, {1.4, 56593.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 88295}, {2.4000000000000004`, 116378.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 47203.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 26520.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337749}, {5.3999999999999995`, 405053.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 56593}, {1.4, 109655.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 116378}, {2.4000000000000004`, 258776.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 47203}, {3.4000000000000004`, 141311.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 67976.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 405053}, {5.3999999999999995`, 405053.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQA+JKIea3rjNeOh65597oCaRj3rv8yALSm0S112YDabuX
90+D6O2ujAkFQPrfrzy2MiDNFTmxqhxIN5155L3h9UtHiSqtmM1A2ppv+TZP
hleOW5IOtp8wf+Wo2Trhr6XtK0eRe59yd9i9ctQweWG6C0gXVR35vQ9IL9v1
XG8/kLYrTqsH0SLvV5be8X/l+OfjjOd3gXSd4BcV1oBXjkfn9VpyAun3ctec
uIH0nqkHKnmA9N7ggsMg2qo1NdoUSB/7XskeAqQXBLC/iwLSf0I+OkUD6Qbv
IsfLQJqDr+nyFSBttC+f9w6QZvg4LfQfkJ5TdVd1cfgrx7gX7Vkgmmvi/qiq
qFeOelH/EoWiXzlGPdssqwCkH0qdfucBpC9uuC3nDaRFd7Dc8AHS6gv7DF4C
6Yp2Yx/RmFeOXdN0RJ8kvnLM0dO7wJL0ylGtNv7fnpxXjgDHs7ql
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citingcited5BiomedData", ",",
RowBox[{"BarLabels", "->", "biomedNames5"}], ",",
RowBox[{"BarStyle", "->", "colors5"}]}], "]"}]], "Input",
CellChangeTimes->{{3.43503875965493*^9, 3.4350387740731993`*^9}, {
3.435038893591299*^9, 3.4350389319374*^9}, {3.435038966847212*^9,
3.435038968799086*^9}}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 239889.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 13873.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 5175.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 78594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 239889}, {1.4, 277764.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 470250.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 13873}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5175}, {4.4, 22971.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 78594}, {5.3999999999999995`, 214044.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 277764}, {1.4, 291037.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 470250}, {2.4000000000000004`, 503173.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 385527.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 22971}, {4.4, 26520.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 214044}, {5.3999999999999995`, 337749.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 291037}, {1.4, 296482.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 503173}, {2.4000000000000004`, 531256.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 385527}, {3.4000000000000004`, 390266.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 167296.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337749}, {5.3999999999999995`, 405053.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 296482}, {1.4, 349544.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 531256}, {2.4000000000000004`, 673654.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 390266}, {3.4000000000000004`, 484374.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 167296}, {4.4, 208752.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 405053}, {5.3999999999999995`, 2.108608*^6}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"Me-1\"", TraditionalForm], 0}, {2,
FormBox["\"Me-2\"", TraditionalForm], 0}, {3,
FormBox["\"Me-3\"", TraditionalForm], 0}, {4,
FormBox["\"Me-4\"", TraditionalForm], 0}, {5,
FormBox["\"Mo\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"Me-1\"", TraditionalForm], 0}, {2,
FormBox["\"Me-2\"", TraditionalForm], 0}, {3,
FormBox["\"Me-3\"", TraditionalForm], 0}, {4,
FormBox["\"Me-4\"", TraditionalForm], 0}, {5,
FormBox["\"Mo\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwBOITr03lL05/6Vi85ucntRkvHeXcRDQdgPSkSXGhIFpk
CetaVyDNuiSn0RNI/zMv+ZEFpBMTec9kA+kruWwJBUA67H8xWxmQZmiaVlUO
pLc9e+q94fVLxyeLdWM2A2lf1lXbPBleOc66dLT9hPkrx31cU/5a2r5y/L77
W+4Ou1eOCv/fme4C0nEOJ37vA9I/S1/r7QfSO+yz6kH0/sS1pXf8XznmJMx5
fhdIH1v8XYU14JXjJ96JlpxA2pLrlhM3kM7gOlLJA6Q3XSo+DKIDvDKjTYG0
dUEtewiQzl/L8y4KSCe8+OIUDaTXaJc5XgbSyxe2Xr4CpNtmFfPeAdKR2bNC
/wFpExtbtcXhrxw13LuzQPSh5sNRVVGvHFPmMCYJRb9yVJPcLqsApEOjz73z
ANIWH+/JeQNprY/sN3yAdPOdiQYvgbTBdjMf0ZhXjpfO64s+SXzl+GiN4QWW
pFeOHUeT/u3JeeUIAMiaxjg=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"StackedBarChart", "[",
RowBox[{"citingcited5BiomedData", ",",
RowBox[{"BarLabels", "->", "biomedJNames5"}], ",",
RowBox[{"BarStyle", "->", "colors5"}]}], "]"}]], "Input",
CellChangeTimes->{{3.43503875965493*^9, 3.4350387740731993`*^9}, {
3.435038893591299*^9, 3.4350389319374*^9}, {3.435038966847212*^9,
3.435038968799086*^9}, 3.4352781962982264`*^9}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 239889.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 13873.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 5175.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 78594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 239889}, {1.4, 277764.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 470250.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 13873}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5175}, {4.4, 22971.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 78594}, {5.3999999999999995`, 214044.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 277764}, {1.4, 291037.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 470250}, {2.4000000000000004`, 503173.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 385527.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 22971}, {4.4, 26520.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 214044}, {5.3999999999999995`, 337749.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 291037}, {1.4, 296482.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 503173}, {2.4000000000000004`, 531256.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 385527}, {3.4000000000000004`, 390266.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 167296.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337749}, {5.3999999999999995`, 405053.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 296482}, {1.4, 349544.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 531256}, {2.4000000000000004`, 673654.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 390266}, {3.4000000000000004`, 484374.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 167296}, {4.4, 208752.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 405053}, {5.3999999999999995`, 2.108608*^6}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBWKO5MXvXGe8dHy3oqPRE0hPdpv7IwtIawSZnMkG0vb8
PAkFQPqSTSVbGZBWYJxTVQ6ky36/8N7w+qXj44dGMZuBtGzJ+m2eDK8chfTO
tJ8wf+W4y3vGX0vbV46/b//K3WH3ypH51SfTXUC69dDp3/uA9Inf7/T2A2mR
A7n1IHoVy8bSO/6vHH1+z39+F0hH6f5WYQ145fjrzxRLTiDtJPnAiRtIb1h5
vJIHSE+oKj8MojXu5UabAulLHY3sIUDaOEjgXRSQZpj4wykaSJ/hrHK8DKRf
2HZevgKkF1mU894B0oZc80L/gfTzXFNbHP7K0ezjhCwQHfLhXFRV1CvHV4fZ
k4SiXzkquO2SVQDSqb0X33kA6X71R3LeQDpLnfuGD5C+qzrV4CWQnvDJ0kc0
5pWjl6ax6JPEV44J+qYXWJJeOc76lfpvT84rRwCKxrW1
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedBiomed5DataZeroSelf", "=",
RowBox[{"citedciting21DataZeroSelf", "[",
RowBox[{"[", "biomedPosition", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.43535479899695*^9, 3.4353548917881203`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"212", ",", "1303", ",", "167", ",", "2535", ",", "1389", ",", "894", ",",
"4630", ",", "863", ",", "616", ",", "65", ",", "691", ",", "110", ",",
"1800", ",", "204", ",", "29", ",", "0", ",", "37875", ",", "13273", ",",
"5445", ",", "53062", ",", "199"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"635", ",", "8719", ",", "366", ",", "3457", ",", "269", ",", "2978", ",",
"1267", ",", "18", ",", "98", ",", "93", ",", "4516", ",", "84", ",",
"1061", ",", "789", ",", "9", ",", "55372", ",", "0", ",", "32923", ",",
"28083", ",", "142398", ",", "16"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"1918", ",", "1355", ",", "1723", ",", "4254", ",", "765", ",", "1192",
",", "627", ",", "11", ",", "496", ",", "35", ",", "1095", ",", "173",
",", "2825", ",", "178", ",", "64", ",", "13873", ",", "28591", ",", "0",
",", "4739", ",", "94108", ",", "58"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"2735", ",", "6834", ",", "1236", ",", "1970", ",", "375", ",", "789",
",", "792", ",", "9", ",", "11", ",", "10", ",", "680", ",", "125", ",",
"91", ",", "49", ",", "22", ",", "5175", ",", "17796", ",", "3549", ",",
"0", ",", "41456", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"60318", ",", "38548", ",", "12174", ",", "88621", ",", "30036", ",",
"20303", ",", "11894", ",", "1596", ",", "581", ",", "732", ",", "17038",
",", "8527", ",", "5138", ",", "740", ",", "402", ",", "78594", ",",
"135450", ",", "123705", ",", "67304", ",", "0", ",", "4115"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{{3.435354849575945*^9, 3.435354858843504*^9},
3.4353548928671503`*^9, 3.435355746956956*^9, 3.43536512066407*^9,
3.435376691855413*^9, 3.4353796689227324`*^9, 3.479011935308022*^9,
3.479018209628293*^9, 3.48981189361773*^9, 3.518907454410274*^9,
3.5217612607800703`*^9, 3.522544495873454*^9, 3.522548143624435*^9,
3.522557918387641*^9, 3.522558327488832*^9, 3.522558971451502*^9,
3.531531181548518*^9, 3.5315341410161943`*^9, 3.531614503862031*^9,
3.531622860683887*^9, 3.531627031031559*^9, 3.5316295182563*^9,
3.5316301077516413`*^9, 3.5317132434509487`*^9, 3.531776060079813*^9,
3.531790192522727*^9, 3.5317908717864027`*^9, 3.53203661982703*^9,
3.532039836300592*^9, 3.532054635737567*^9, 3.5321248449565887`*^9,
3.5356081230495443`*^9, 3.535608660569848*^9, 3.537097430628313*^9,
3.53740878427846*^9, 3.537436909954858*^9, 3.537520502650131*^9,
3.537524983099111*^9, 3.5375285124699993`*^9, 3.537848708772325*^9,
3.537939041925462*^9, 3.540983977807329*^9, 3.541051009697695*^9,
3.546671091290948*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedTotalOthersZeroSelf", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[",
RowBox[{"#", "[",
RowBox[{"[", "exbiomedPosition", "]"}], "]"}], "]"}], "&"}], ",",
"citedBiomed5DataZeroSelf"}], "]"}]}]], "Input",
CellChangeTimes->{{3.4353549265234423`*^9, 3.4353549933601313`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"15707", ",", "24375", ",", "16769", ",", "15728", ",", "300763"}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBuKKP6F52TNeOhacvXkGRL/JEEsoANJZpY1sZUDa4Ou8
qnIg3TH/jfeG1y8d2V3MYjYDaXXDbds8GV456vGfbz9h/srx1qOZfy1tXzlu
8/+Tu8PulaN0+BfTXUA6ceuZ3/uA9MxP7/X2A+mY43n1IPrYg42ld/xfOT65
vuD5XSDt9fq3CmvAK8dD3tMsOYF0SspDJ24gHdpxopIHSL9OqTgMopc2F0Sb
Auk3f5vYQ4C0jZjguyggfanxp1M0kN5wvcrxMpC+86Xz8hUgXfaxnPcOkJ79
ZV7oPyBd92eP+uLwV47CRydngehLaTeiqqJeOQqacycJRb9yDPc7IKsApFUC
r73zANJ8nk/kvIH04kWCN3yAdHXbLIOXQNpsrr2PaMwrx4ontqJPEl859r43
v8CSBPRHfNa/PTmvHAEZm7OD
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedciting5BiomedDataANDTotalOthersZeroSelf", "=",
RowBox[{"Transpose", "[",
RowBox[{"Append", "[",
RowBox[{
RowBox[{"Transpose", "[", "citedciting5BiomedDataZeroSelf", "]"}], ",",
"citedTotalOthersZeroSelf"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.4353562401856947`*^9, 3.435356348144363*^9}, {
3.435357456356263*^9, 3.4353575040558662`*^9}, {3.4353577516580153`*^9,
3.435357769537305*^9}, {3.4353583271744423`*^9, 3.435358342654694*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"0", ",", "37875", ",", "13273", ",", "5445", ",", "53062", ",",
"15707"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"55372", ",", "0", ",", "32923", ",", "28083", ",", "142398", ",",
"24375"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"13873", ",", "28591", ",", "0", ",", "4739", ",", "94108", ",",
"16769"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"5175", ",", "17796", ",", "3549", ",", "0", ",", "41456", ",", "15728"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"78594", ",", "135450", ",", "123705", ",", "67304", ",", "0", ",",
"300763"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBWI7/UPiOTNeOk5ZJ7oCRF+rzzgJorVfPxTIBdKSa8QT
CoB00OwmtjIg/aFjWVU5kFZKfO+94fVLRzFDi5jNQNpq6o5tngyvHI+mXWg/
Yf7K8dD5WX8tbV852i37k7vD7pWj7NovpruA9AvWs7/3Aelrzh/09gPpNrn8
ehDNbbap9I7/K0eWUwuf3wXS+5z/qLAGvHI0WDDNkhNI1+9/6MQNpN/dP1HJ
A6SfXas4DKJFThdHmwLppnfN7CFA+lqJ4LsoIP3180+naCD9w7La8TKQTvHt
unwFxPer4L0DpL/kzQ/9B6RTedU1Foe/cpwXMjULRO/yvhVVFfXK8dFT3iSh
aKB9ZYdkFYD0J6kb7zxA/DfP5LyB9CEf4Rs+QHqfwhyDl0BaTNfRRzTmleOt
D46iTxJfOVZ1Wl5gSXrluNs059+enFeOAJKlumY=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingBiomed5DataZeroSelf", "=",
RowBox[{"citingcited21DataZeroSelf", "[",
RowBox[{"[", "biomedPosition", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.43535479899695*^9, 3.4353548917881203`*^9}, {
3.435355009078534*^9, 3.435355021637352*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"144", ",", "969", ",", "117", ",", "959", ",", "1146", ",", "418", ",",
"2092", ",", "271", ",", "487", ",", "53", ",", "384", ",", "99", ",",
"1230", ",", "260", ",", "42", ",", "0", ",", "55372", ",", "13873", ",",
"5175", ",", "78594", ",", "225"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"293", ",", "4423", ",", "65", ",", "422", ",", "99", ",", "1369", ",",
"425", ",", "11", ",", "59", ",", "25", ",", "2227", ",", "14", ",",
"593", ",", "848", ",", "22", ",", "37875", ",", "0", ",", "28591", ",",
"17796", ",", "135450", ",", "13"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"1756", ",", "1018", ",", "1143", ",", "1068", ",", "751", ",", "860",
",", "361", ",", "10", ",", "442", ",", "17", ",", "425", ",", "24", ",",
"1623", ",", "183", ",", "32", ",", "13273", ",", "32923", ",", "0",
",", "3549", ",", "123705", ",", "12"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"2839", ",", "6449", ",", "1113", ",", "858", ",", "269", ",", "464", ",",
"463", ",", "4", ",", "16", ",", "12", ",", "570", ",", "38", ",", "60",
",", "62", ",", "17", ",", "5445", ",", "28083", ",", "4739", ",", "0",
",", "67304", ",", "3"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"24853", ",", "19638", ",", "4188", ",", "32565", ",", "5057", ",",
"8288", ",", "4814", ",", "200", ",", "210", ",", "104", ",", "7590",
",", "1506", ",", "1513", ",", "528", ",", "157", ",", "53062", ",",
"142398", ",", "94108", ",", "41456", ",", "0", ",", "1099"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBuK+6z8Ks2e8dHz+uOYsiI4NkksoANIRj5rZyoD0ri3L
q8qBdKb2J+8Nr186pvhYxWwG0j7Hdm3zZHjlaPPyQvsJ81eOIYdm/7W0feU4
69+f3B12rxw72L6a7gLSkZvO/t4HpCtmfdDbD6RXVOfXg2iZu5tL7/i/cuxU
W/T8LpAuWvJHhTXgleOJ7umWnEDap/KxEzeQFu45VckDpJsmVh0G0TWqJdGm
QPqRfwt7CJBedF/wXRSIDvnlFA2SX1LteBlI59zpunwFZN6mCt47QPpZxoLQ
f0Cab12dxuLwV45V0tOzQHTdwdtRVVGvHDPnCCQJRb9yvGx/RFYBSCv033zn
AaSny76Q8wbSS0tFb/gA6ecJ8wxeAmkdc2cf0ZhXjrPnu4g+SXzlGKZvfYEl
6ZXjg9W5//bkvHIEAN4sshk=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingTotalOthersZeroSelf", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[",
RowBox[{"#", "[",
RowBox[{"[", "exbiomedPosition", "]"}], "]"}], "]"}], "&"}], ",",
"citingBiomed5DataZeroSelf"}], "]"}]}]], "Input",
CellChangeTimes->{{3.4353549265234423`*^9, 3.4353549933601313`*^9}, {
3.4353550436805897`*^9, 3.4353550566701508`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"8896", ",", "10908", ",", "9725", ",", "13237", ",", "112310"}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBuJ7IXzl2TNeOn7/VnAORJ+VV00oANKPxFrZyoD0uc8r
qsqB9AvlH94bXr90rC2zidkMpFeY7d3myfDKkTfwYvsJ81eOHGvn/LW0feV4
y+Vf7g67V441S3+Y7gLSLxnO/d4HpN85ftTbD6RvaBfUg+gv+ltK7/i/ciyq
XPT8LpCeVPZXhTXgleOve9MtOYE02+3HTtxAWubhqUoeIL3lRdVhEM1SVxJt
CqQ1lrewhwDpCZXC76KA9K6qP07RQFqRtcbxMpC+bdx9+QqQPpNbxXsHSFcc
XBD6D0iXZrBpLg5/5ejRNSMLRHNV3Y2qinrlaGEjnCQU/crR2uyYrAKQ3i51
+50HkI6a+FLOG0iLdIvf8AHSRzIWGLwE0j1PXHxEY4D++Ogm+iQRaK6X7QWW
pFeOl8zz/+3JeeUIABvzr8E=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited5BiomedDataANDTotalOthersZeroSelf", "=",
RowBox[{"Transpose", "[",
RowBox[{"Append", "[",
RowBox[{
RowBox[{"Transpose", "[", "citingcited5BiomedDataZeroSelf", "]"}], ",",
"citingTotalOthersZeroSelf"}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.435356383290551*^9, 3.435356411629793*^9}, {
3.4353564636332903`*^9, 3.435356526522291*^9}, {3.435357531501547*^9,
3.435357563386074*^9}, {3.4353577854832277`*^9, 3.4353577887525473`*^9}, {
3.435358367045117*^9, 3.435358388254787*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"0", ",", "55372", ",", "13873", ",", "5175", ",", "78594", ",", "8896"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"37875", ",", "0", ",", "28591", ",", "17796", ",", "135450", ",",
"10908"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"13273", ",", "32923", ",", "0", ",", "3549", ",", "123705", ",",
"9725"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"5445", ",", "28083", ",", "4739", ",", "0", ",", "67304", ",", "13237"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"53062", ",", "142398", ",", "94108", ",", "41456", ",", "0", ",",
"112310"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBeJOxxe6OTNeOr64vWI9iN76YM9pEL2xc4pYLpDe4KOW
UACk2R52s5UB6TK1VVXlQNrN7I/3htcvHXNm2cVsBtIpn/dv82R45Vix/VL7
CfNXjmvmzv1rafvKcdGcf7k77F452oj+NN0FpEMCz/3eB6SDJ3/U2w+kE5oL
6kF0QeuW0jv+rxyTzi96fhdIZ7r/U2ENeOWoazLDkhNIi5k9ceIG0nGWpyt5
gHSFS/VhEJ16uSTaFEh/mdbKHgKkhW4Iv4sC0hcsGZ2jgfQs1VrHy0DadUL3
5StA+s/xKt47QFpAdmHoPyDtJhKruTj8lWOu1qwsEP1E+H5UVdQrR4NnoklC
0a8c98SckFUA0gHb7rzzANKHMl7LeQPprVslb/gA6VT1RQYvgfS7124+ojGv
HLMyPUSfJL5y5H1gd4El6ZWjGXvhvz05rxwBKti1cA==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"colors6", "=",
RowBox[{"colors21", "[",
RowBox[{"[",
RowBox[{"Flatten", "[",
RowBox[{"{",
RowBox[{"biomedPosition", ",", "21"}], "}"}], "]"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.435356640416335*^9, 3.43535671915613*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"CMYKColor", "[",
RowBox[{"0.75`", ",", "0", ",", "0", ",", "0.5`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0.75`", ",", "0", ",", "0.5`"}], "]"}], ",",
RowBox[{"CMYKColor", "[",
RowBox[{"0", ",", "0", ",", "0.75`", ",", "0.5`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.7`", ",", "0.5`", ",", "0.2`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.2`", ",", "0.7`", ",", "0.5`"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0.5`", ",", "0.2`", ",", "0.7`"}], "]"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBuKN92/b5sx46diTIuwGon9VqCcUAGlPuV62MiDd0rux
qhxI13X+997w+qXjqQ6HmM1A2kTm6DZPhleOBUJX2k+Yv3KMeD/3r6XtK8f9
H//l7rB75ZiW89N0F5De8O3c731A+sqjj3r7gbTVzYJ6EJ1xc0vpHf9Xjvf2
L35+F0jzif1XYQ145Tite4YlJ5B+8uqpEzeQdu8/XckDpJcvqD4Mogt3lkWb
AunUD63sIUBayUTkXRSQXvWRyTkaSDu01DpeBtLnhXsuXwHSpXLVvHeA9KOy
haH/gHRS6BbNxeGvHK/um50FoudPeBBVFfXK0S9eIkko+pWjZf0pWQUg/SPo
3jsPIC194o2cN5D2XCt9wwdIf1JbYvASSG9f7uEjGvPK8c1fT9Enia8cJym4
XmBJeuV4Lb/o356cV44ANL+zXg==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData["biomedJNames5"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a1\"\>", ",", "\<\"\:81e8\:5e8a2\"\>",
",", "\<\"\:795e\:7d4c\"\>", ",", "\<\"\:7363\:533b\"\>",
",", "\<\"\:751f\:5316\"\>"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQAmK5Xym1OTNeOl4y10soANLmuXPYyoB05KudVeVAevs7
Rp8Nr186FsQ4xWwG0mqnjm/zZHjlaJZztf2E+SvHF7bz/lravnJ8JcaQt8Pu
laPRxz+mu4A0s9P53/uA9KvWT3r7gfRrzcJ6EG2tsbX0jv8rxz7+Jc/vAumQ
x/9VWANeOd7OnmnJCaRt3Z85cQNpK72zlTxAWtqr9jCIbucsjzYF0rNc2thD
gLRBt8i7KCCdU8XiHA2kje/VOl4G0u8yei5fAdJyBdW8d4D0ochFof+A9IOT
DFqLw4HyzXOzQPQ0z0dRVVGvHLNKpZKEol85fkw9I6sApD2f33/nAaQrpr2T
8wbSZ7Jkb/gAad5HSw1eAumLC7x8RGNeOUZoeos+SXzleErY8wJL0itHG9OS
f3tyXjkCAIk3puc=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"biomedJNamesANDOther", "=",
RowBox[{"Flatten", "[",
RowBox[{"{",
RowBox[{"biomedJNames5", ",", "\"\<\:4ed6\>\""}], "}"}], "]"}]}]], "Input",\
CellChangeTimes->{{3.435357179893025*^9, 3.435357223835496*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"\:81e8\:5e8a1\"\>", ",", "\<\"\:81e8\:5e8a2\"\>",
",", "\<\"\:795e\:7d4c\"\>", ",", "\<\"\:7363\:533b\"\>",
",", "\<\"\:751f\:5316\"\>", ",", "\<\"\:4ed6\"\>"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQAuLdlzlbc2a8dHwXpZ9QAKTX6SxiKwPSRYEHq8qBdNwk
Fp8Nr186bsh3idkMpNfsOrnNk+GV47/PV9tPmL9ybJk076+l7SvHvC6GvB12
rxy/dDKY7QLSgVPO/94HpA1uftLbD6SNThfWg+hF57aV3vF/5cjRtuT5XSBd
tYNBlTXglWPioZmWnEB6x+JnTtxAuqz9bCUPkK5aUXsYRHcklkebAukbpu3s
IUB6ppbYuyggrXCB1TkaSJ+zr3O8DKTt9vdcvgKkE/Rree8A6XdbF4X+A9JP
uxu1Foe/crzEOD8LRK86/DiqKuqV47Z5MklC0a8cpzKek1UA0vITHr7zANKT
fr6X8wbSOlfkbvgA6b7Vyw1eAmkDfR8f0Rige9b5iD5JfOU43d37AkvSK8eg
NaX/9uS8cgQAm4uq8w==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics", "[",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"PointSize", "[", "0.5", "]"}], ",",
RowBox[{"colors6", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0", ",", "n"}], "}"}], "]"}], ",",
RowBox[{"RGBColor", "[",
RowBox[{"0", ",", "0", ",", "0"}], "]"}], ",",
RowBox[{"Text", "[",
RowBox[{
RowBox[{"Style", "[",
RowBox[{
RowBox[{"biomedJNamesANDOther", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"FontSize", "\[Rule]", "50"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"1", ",", "n"}], "}"}]}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "6"}], "}"}]}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.435356880795609*^9, 3.435357053136573*^9}, {
3.435357251680781*^9, 3.435357333311545*^9}, {3.4353797262298403`*^9,
3.435379736783033*^9}, {3.435379820037444*^9, 3.435379885918809*^9}, {
3.4353801635854*^9, 3.4353801638712683`*^9}}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], PointSize[0.5], PointBox[{0, 1}],
{RGBColor[0, 0, 0], InsetBox[
StyleBox["\<\"\:81e8\:5e8a1\"\>",
StripOnInput->False,
FontSize->50], {1, 1}]}},
{CMYKColor[0, 0.75, 0, 0.5], PointSize[0.5], PointBox[{0, 2}],
{RGBColor[0, 0, 0], InsetBox[
StyleBox["\<\"\:81e8\:5e8a2\"\>",
StripOnInput->False,
FontSize->50], {1, 2}]}},
{CMYKColor[0, 0, 0.75, 0.5], PointSize[0.5], PointBox[{0, 3}],
{RGBColor[0, 0, 0], InsetBox[
StyleBox["\<\"\:795e\:7d4c\"\>",
StripOnInput->False,
FontSize->50], {1, 3}]}},
{RGBColor[0.7, 0.5, 0.2], PointSize[0.5], PointBox[{0, 4}],
{RGBColor[0, 0, 0], InsetBox[
StyleBox["\<\"\:7363\:533b\"\>",
StripOnInput->False,
FontSize->50], {1, 4}]}},
{RGBColor[0.2, 0.7, 0.5], PointSize[0.5], PointBox[{0, 5}],
{RGBColor[0, 0, 0], InsetBox[
StyleBox["\<\"\:751f\:5316\"\>",
StripOnInput->False,
FontSize->50], {1, 5}]}},
{RGBColor[0.5, 0.2, 0.7], PointSize[0.5], PointBox[{0, 6}],
{RGBColor[0, 0, 0], InsetBox[
StyleBox["\<\"\:4ed6\"\>",
StripOnInput->False,
FontSize->50], {1, 6}]}}}]], "Output",
CellChangeTimes->{{3.435356957169849*^9, 3.435357053827386*^9}, {
3.4353573022839937`*^9, 3.4353573336806927`*^9}, 3.435365121689876*^9,
3.435376693238153*^9, 3.435379670271495*^9, 3.435379738481759*^9, {
3.435379845340705*^9, 3.435379886724166*^9}, 3.435380164730369*^9,
3.4790119362224703`*^9, 3.479018210217968*^9, 3.4898118943775167`*^9,
3.5189074547333193`*^9, 3.521761260994226*^9, 3.5225444960576057`*^9,
3.522548144165964*^9, 3.522557918535654*^9, 3.522558327627645*^9,
3.522558971607236*^9, 3.531531181767058*^9, 3.531534141202299*^9,
3.5316145040617323`*^9, 3.5316228608438377`*^9, 3.531627031288001*^9,
3.531629518477442*^9, 3.5316301079821653`*^9, 3.5317132437927227`*^9,
3.5317760602644997`*^9, 3.5317901927477217`*^9, 3.531790872249346*^9,
3.532036620006695*^9, 3.532039836441489*^9, 3.532054636053966*^9,
3.532124845124733*^9, 3.53560815047064*^9, 3.5356086610187902`*^9,
3.537097431168894*^9, 3.537408784966209*^9, 3.5374369104947166`*^9,
3.537520503100697*^9, 3.537524983551291*^9, 3.537528513015541*^9,
3.53784870929351*^9, 3.537939042428995*^9, 3.5409839784492617`*^9,
3.541051010423365*^9, 3.5466710917286*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedbarchart", "=",
RowBox[{"StackedBarChart", "[",
RowBox[{
RowBox[{
"Transpose", "[", "citedciting5BiomedDataANDTotalOthersZeroSelf", "]"}],
",",
RowBox[{"BarStyle", "->", "colors6"}], ",",
RowBox[{"BarLabels", "->", "biomedJNamesANDOther"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.435356745921411*^9, 3.435356792162525*^9}, {
3.435356862374248*^9, 3.435356870157311*^9}, 3.4353570985846252`*^9,
3.435357588989667*^9, {3.435357665262454*^9, 3.435357683837987*^9}, {
3.435357905170041*^9, 3.435357913070057*^9}, {3.435358405084195*^9,
3.435358419810665*^9}}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 0.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 13873.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 5175.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 78594.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 37875.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 55372.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 13873}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5175}, {4.4, 22971.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 78594}, {5.3999999999999995`, 214044.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 37875}, {1.4, 51148.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 55372}, {2.4000000000000004`, 88295.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 42464.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 22971}, {4.4, 26520.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 214044}, {5.3999999999999995`, 337749.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 51148}, {1.4, 56593.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 88295}, {2.4000000000000004`, 116378.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 42464}, {3.4000000000000004`, 47203.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 26520.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 337749}, {5.3999999999999995`, 405053.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 56593}, {1.4, 109655.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 116378}, {2.4000000000000004`, 258776.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 47203}, {3.4000000000000004`, 141311.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 26520}, {4.4, 67976.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 405053}, {5.3999999999999995`, 405053.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 109655}, {1.4, 125362.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 258776}, {2.4000000000000004`, 283151.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 141311}, {3.4000000000000004`, 158080.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 67976}, {4.4, 83704.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 405053}, {5.3999999999999995`, 705816.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->{{3.4353567677353277`*^9, 3.4353567935286617`*^9},
3.435357589574191*^9, 3.435357685421023*^9, 3.4353578063587427`*^9,
3.4353579160394793`*^9, 3.435358420247919*^9, 3.435365121870085*^9,
3.435376693366823*^9, 3.435379670440579*^9, 3.47901193639067*^9,
3.479018210380509*^9, 3.489811894485346*^9, 3.5189074548640423`*^9,
3.521761261131207*^9, 3.522544496184548*^9, 3.522548144602335*^9,
3.5225579186604633`*^9, 3.5225583277525587`*^9, 3.522558971742782*^9,
3.531531181894923*^9, 3.53153414133025*^9, 3.5316145042270193`*^9,
3.531622860982802*^9, 3.5316270314140453`*^9, 3.531629518602063*^9,
3.5316301081126213`*^9, 3.5317132439164743`*^9, 3.531776060408613*^9,
3.531790192880834*^9, 3.53179087238022*^9, 3.5320366201740294`*^9,
3.532039836568561*^9, 3.532054636183956*^9, 3.532124845253788*^9,
3.5356081555652227`*^9, 3.535608661134242*^9, 3.5370974313669577`*^9,
3.537408785082491*^9, 3.5374369106098022`*^9, 3.537520503217535*^9,
3.537524983668221*^9, 3.5375285131337337`*^9, 3.537848709407824*^9,
3.537939042544456*^9, 3.5409839785663652`*^9, 3.541051010642652*^9,
3.54667109184489*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingbarchart", "=",
RowBox[{"StackedBarChart", "[",
RowBox[{
RowBox[{
"Transpose", "[", "citingcited5BiomedDataANDTotalOthersZeroSelf", "]"}],
",",
RowBox[{"BarStyle", "->", "colors6"}], ",",
RowBox[{"BarLabels", "->", "biomedJNamesANDOther"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.435356745921411*^9, 3.435356792162525*^9}, {
3.435356862374248*^9, 3.435356870157311*^9}, 3.4353570985846252`*^9,
3.435357588989667*^9, {3.435357665262454*^9, 3.435357683837987*^9}, {
3.435357883310742*^9, 3.4353578892654953`*^9}, {3.435357923476376*^9,
3.4353579274020767`*^9}, {3.435358428028327*^9, 3.435358440768046*^9}}],
Cell[BoxData[
GraphicsBox[{
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 0.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 0}, {2.4000000000000004`, 37875.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 0}, {3.4000000000000004`, 13273.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 0}, {4.4, 5445.}]},
{CMYKColor[0.75, 0, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 0}, {5.3999999999999995`, 53062.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 0}, {1.4, 55372.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 37875}, {2.4000000000000004`, 37875.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 13273}, {3.4000000000000004`, 46196.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 5445}, {4.4, 33528.}]},
{CMYKColor[0, 0.75, 0, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 53062}, {5.3999999999999995`, 195460.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 55372}, {1.4, 69245.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 37875}, {2.4000000000000004`, 66466.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 46196}, {3.4000000000000004`, 46196.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 33528}, {4.4, 38267.}]},
{CMYKColor[0, 0, 0.75, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 195460}, {5.3999999999999995`, 289568.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 69245}, {1.4, 74420.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 66466}, {2.4000000000000004`, 84262.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 46196}, {3.4000000000000004`, 49745.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 38267}, {4.4, 38267.}]},
{RGBColor[0.7, 0.5, 0.2], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 289568}, {5.3999999999999995`, 331024.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 74420}, {1.4, 153014.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 84262}, {2.4000000000000004`, 219712.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 49745}, {3.4000000000000004`, 173450.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 38267}, {4.4, 105571.}]},
{RGBColor[0.2, 0.7, 0.5], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 331024}, {5.3999999999999995`, 331024.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{0.6, 153014}, {1.4, 161910.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{1.6, 219712}, {2.4000000000000004`, 230620.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{2.6, 173450}, {3.4000000000000004`, 183175.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{3.6, 105571}, {4.4, 118808.}]},
{RGBColor[0.5, 0.2, 0.7], EdgeForm[Opacity[0.5]],
RectangleBox[{4.6, 331024}, {5.3999999999999995`, 443334.}]}},
AlignmentPoint->Center,
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesLabel->None,
AxesOrigin->NCache[{
Rational[1, 2], 0}, {0.5, 0}],
AxesStyle->{},
Background->None,
BaseStyle->{},
BaselinePosition->Automatic,
ColorOutput->Automatic,
ContentSelectable->Automatic,
CoordinatesToolOptions:>Automatic,
DisplayFunction:>$DisplayFunction,
Epilog->{},
FormatType:>TraditionalForm,
Frame->False,
FrameLabel->None,
FrameStyle->{},
FrameTicks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
FrameTicksStyle->{},
GridLines->None,
GridLinesStyle->{},
ImageMargins->0.,
ImagePadding->All,
ImageSize->Automatic,
ImageSizeRaw->Automatic,
LabelStyle->{},
Method->Automatic,
PlotLabel->None,
PlotRange->All,
PlotRangeClipping->True,
PlotRangePadding->Automatic,
PlotRegion->Automatic,
PreserveImageOptions->Automatic,
Prolog->{},
RotateLabel->True,
Ticks->{{{1,
FormBox["\"\:81e8\:5e8a1\"", TraditionalForm], 0}, {2,
FormBox["\"\:81e8\:5e8a2\"", TraditionalForm], 0}, {3,
FormBox["\"\:795e\:7d4c\"", TraditionalForm], 0}, {4,
FormBox["\"\:7363\:533b\"", TraditionalForm], 0}, {5,
FormBox["\"\:751f\:5316\"", TraditionalForm], 0}}, Automatic},
TicksStyle->{}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQAeI5mdU3cma8dEzy57sLondvVZLNBdLh2Y4JBUDaxmkD
WxmQjg68XFUOpPVcBHw2vH7pGKEQELMZSN/OvrzNk+GV4+yUB+0nzF857ri1
+q+l7StHm/k8eTvsXjkmKUuY7QLSizNv/t4HpCeG/tHbD6Tl1GrqQfTCdUdK
7/i/cuztWff8LpCuSeRWZQ145WhVvsSSE0jbvfvoxA2klyjfrOQB0p7zOw+D
aLaCxmhTIK3UM4k9BEjPMlZ4FwWkeTUEnKOBtNDiTsfLQHqZ1rTLV4D0dp4u
3jtAWkpyTeg/IK1+5or24vBXjoKaK7JA9MWM91FVUa8cV2dqJglFv3LcYnld
VgFIe6189c4DSJtL/JTzBtLrvqnf8AHSZrs3GLwE0n/UQn1EY145TjgeKvok
EeieuogLLEmvHC0O1v3bk/PKEQDlqKsP
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"lcp21", "=",
RowBox[{"ListContourPlot", "[",
RowBox[{"citedciting21Data", ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<Cluster ID\>\"", ",", "\"\<Cluster ID\>\""}], "}"}]}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.427777295616417*^9, 3.4277773107061863`*^9}, {
3.427777440362525*^9, 3.4277775242510157`*^9}, {3.4278689324049664`*^9,
3.427868937784227*^9}, {3.427869266294722*^9, 3.427869343208375*^9}, {
3.427870043899106*^9, 3.4278700644706297`*^9}, {3.4317335017900963`*^9,
3.431733501943974*^9}, {3.431753019053815*^9, 3.4317530749829607`*^9}, {
3.4317531905156507`*^9, 3.431753208847975*^9}, {3.431753408415781*^9,
3.431753439467248*^9}}],
Cell[BoxData[
GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJxk3Qk8VN/7OHD7vu/7buzMJlrnqaQU2dpQKWkvJKISbVIUIUSFJBWttCkt
WqREC4pslUhSiGxZ/vP9Nebpfz59vq/v83rPHdedO/ee85xzzzl0ffzdVvPx
8PAYifLw/C9y/sHf0MX6G0UIyxBWIKxCWIOwDmE9wgaEKYSNCZsSNidsSZhK
mEaYTphB2JrweBw/b+Pna9wyhBUIqxDWIKxDWI+wAWEKYWPCpoTNCVsSphKm
EaYTZhC2JkxeV+R5kyGsQFiFsAZhHcJ6hA0IUwgbEzYlbE7YkjCVMI0wnTCD
MJOwNWHyPiSvM/I8qhDWIaxH2IAwhbAxYVPC5oQtCVMJ0wjTCTMIWxMmyyHy
PiOvIxXCGoT1CBsQphA2JmxK2JywJWEqYRphOmEGYSZhshwmyxnyPiKvE/I8
aRDWIaxH2IAwhbAxYVPC5oQtCVMJ0wjTCTMIMwlbEybrLbJcJssd8joiz5sO
YT3CBoQphI0JmxI2J2xJmEqYRphOmEGYSdiaMFmvk/UWWS6T5RB5XZHnTY+w
AWEKYWPCpoTNCVsSphKmEaYTZhBmErYmTOY9ZL1O1ltkOU2WU+R9SF5n5Hk0
IEwhbEzYlLA5YUvCVMI0wnTCDMJMwtaEyTyRzIPIep6s18hynSy3yPuSvO70
CFMIGxM2JWxO2JIwlTCNMJ0wgzCTsDVhMq8m80YyLyLzALIeJMt5shwj71M9
wuR5NCZsSticsCVhKmEaYTphBmEmYWvCZDuEzLPJPJLMm8i8gawXyXKfLNf0
CJPXHXkeTQmbE7YkTCVMI0wnzCDMJGxNmGy3ke0SMu8m80wyzyLzCLKeJOsB
PcLkfUped+R5NCdsSZhKmEaYTphBmEnYmjDZziXbcWQ7hczLybyUzLvIvIKs
N/UIk+UaeZ+S1x15Hi0JUwnTCNMJMwgzCVsTJvsFyHYv2a4j2zFkHk/mqWQe
RuYZeoTJeoAs18j7lLzuyPNIJUwjTCfMIMwkbE2Y7Ech+wnIdjDZ7iPbPWRe
T+atZF6mR5isN8l6gCzXyPuUvO7I80gnzCBsTZjsVyL7Tch+AbIdTLYDyXYO
mceTeaoeYTKPIOtFspwnyy3yPiSvK2vCZD8a2U9E9oOQ7X6y3Uu268h2C5mX
6xEm8yYyDyDrNbKcJssd8j4irxMGYWvCZL8i2W9G9guR/SBkPwDZziXbcWQ7
RY8wmUeSeRFZz5P1FlkOk+UKed+Q58maMNkPRrZDyXaWHmEyDybzErKeJesN
shy0Jkz2A5P9nGS/HdlvRfY7kO1qst2oR5jM68k8lcy7yDyCrBfJcp4s18j7
nLyuye8Rz9uSKa00ls/Yf/rJPTwTabvDu1nzzNfHBlR1E/3nXSz3A2af9aeM
sd5ZNS3ZekEIxrc/ff+t2zEF++Opxu2vQm7ifbQxkn64fCl+T/lZdsEbaUzu
9vH4uXTT15enxvcrAlSD7GD5E3zguzCXZ8ElPu7rB8TsjE8bSnI9/vnmZ45Q
zfp4ua8/cqrYlqY//j4Z+Gj3mpppw379+Ba+ehuyP1YBNkQLlp+mi8Nz1znN
gT3KxHYNECnZdkjHShLUTzR3tetiP13Gb3E5sztaxPuZMDF6x80sB3G4yX/u
nNh2LDc6ElUTth9gcl07UfSx0i4x7nEsHXCk32xW5nr899seLmsbGpDlWAfO
jpi4fXSWhawfg6fD5bS47191XVHq6Qsd4ueZwOdrcWeKnxzH1tBsGZodGSgH
m7ZbvToeRfZXykCCVFL6mld4HFfkj7KyPo5bBT4KT/efd1gBJvxOvnkpFfsn
m3pL85ctUed6/HgbIvadn7hRkfv7w0Yenb+3b9wyMNKdz08xVoXY8kBxb0cp
7udWnrvig5GSLNfj+50koXRdZ5k69/WoI0LVYbdVIDzjR+eSAuzvE4ybuZHP
U5v4eRnweZLoqPfPeXNwv3P8nqs2FKyRFPm+b/w86UCj2hzpXTEKXI/vp2ev
+To1F23u6z2y1Q2XHmrAUamBkpdl2F/2c4vi/TvJusTPK0CunPiUOS463Nf3
aGwujUkbf58ezNl6RmV6nQ68dVuyens19hcVufw8qaatz/V4zJB/FGCuMf66
AejYW9g0jujBpW3LEt/x4Ot/xA4dDRU25Ho83ntWn3tIdvx1Cuwv27LmGt0A
eNd/ZjCtsD9A5uussbx2I67H46Udgssefxl/3Rg65sUJMW0pkKvnOH2VPbZ/
d/Ttfj11mwnX47Ftq0ZFO/d1U/j4ilHq7GUMjvXdfRWe2N67uCyF2XndjOvx
KC+3qFj/5vjr5jDUyiMvtMsMGGtvzDDbia83JwepVgWYcz0exUayNV0DMG8P
D9swvVzBAryNa+qiFS24r6cs8fcPa7XkejzCFe8nK1sxT3WuLE+9r2sJ7fcP
TXmqS+avNFhxPOel4jtLOPJiH4XaQiO2M6GfGRLdmGIJvQMlql02WG97dx32
tL7O5DpIc3VFeAKZ/9GBz1TkZLwu1vOH1ArFLwRT4WZ0vsjBZibxfiqYPbda
X9FDg9KYxvMr9f6bP+2zC242OkADent3SUo/nbv9zjPz3EptzCOuqKaLClQz
ub62Lywgsua/+YaO8vNThX10MNynrz6oRyO2M2B7RF9imwIduqP9tv9SwuOQ
O+H4SzudSbyfB4rn5xwvmYP1kH3FrD9Okxiw6OLdA4mfx+sVLHf3ynSG8Zow
YJ3byIZQHzK/UYDQOl+HuEjM55xyJn1OfMoAafoMKyctNeL9FPCzi9VY+4MB
DuIX6q58MORut5lqlx82m+zHooIjv2CUrSEDtk6FS5TVZH5Dh2ObZRSt1Rjw
fOpo6ORRJrGdB7b9pj15koz1al0iQ/BJEX6+3Sornl1kfw9fX5YEfzeQ57yO
+Y7nTCfnB7ZMKD2aetW3XIHYToHGfkE3DyU83p1bofn3S7xufmk3Nch8xuNV
8Zvy2LYJv5cTS9d8v/0Yj/va5HXmpSOYh0jcLzY/I8EE7d83b12R/ic/MTTl
n1XCgB0Ls+guvsOsgYNZl16w84cdccYfcl/+ZjWtdlXbxM4f+ixj3q6I4YWO
wbTvYUmyUNNj/X7QVBwojXkXFiWogVPRYvdLBpKQQRuK/hXCgIHDbxYfeyAO
e+P7jtC3i0HxnD/2qVNk4e79uQ1n7yhxohzcKuGP8Pw9HpVgf6yl7dcrOiCs
uSygwlsRSo6sfa7uIAXNJQVfjhiow+LlIXybIxXA7MrkPTdn6ICv1817fRuo
8Pzmpp0/qi3BzvfUz3WODIgqndTw5rglsKBrZCn7ftXWGQi3dKDCsuPdktHm
dE6kwteHZzoD5RmcSAUV/72M5AImJ1KBXn0uROEEnRNpsPZbmm0q+37+G2nw
YK718pHdVE6kw10lZgbspXEiHbRerlwR4sTgRDrE/ni0+XMVkxPp0Ei72/Or
7jdLq2Cy1YNlDJBKN3ALXyQKjxLtXrwyZcB6qXmVa4dkIe3x297UcAaYv9Be
YaquDDG/hI+/YH9vGVl2H+3qDcHFVS9A7ycDdF85eeivtYT4rzkX4xkMCHgf
OjyoQOVE9v0svczBl0bnRAao6drUH77C5EQG1DQli0u+/MMa2Vz4+iH7+p5i
KK8wekMAzvvuffSAff1L5gq8UP2qCPtM9wSWbGeC2aXiDSKfVWDexqtqe9nX
t7D2vsUHDCmwL67Y7LEcEz73ty5Y95LKiUzI3LUzQOYzjROZ4DXjSxqzic6J
TMgN2Lqqj/25/ka8/95funjj5WTMn5VV78bp5qIX73++fptKNzfPtrpnE8H7
A/PuFT8Zzt0P0PHaVO1PCehHLuadr1ePccdlHD3kMHtPwDDX1ebrjQ5bDHCt
9vqgcEp7D6vbYz81t1qYe5ztl2ViRrPQX/hPtbgFoBuWmMC5qej3l26k/RFD
v+ab8du5BvP985eqQ16JScP4cc5xoja+mCbJdVtHtF1JoDjXhw635BbniHL9
N8pAZuA28QdqPVyPdJyprPwxwLXn2jcn2h6OsnTGPIKbZ4zvjwfq1+1UMTaV
5nruYs3bz9/Ica0mdetXSYws19+euFg8mUWOy1ABvYBVqsfEerjP5afMrxCU
og1yvdB84q+oxWOs0+t8ixttFbk/n1O6tmFFtBLXecYbBz/XKRP71wCWZVR+
4sQRVqNC0NDjOWrc7Xep9mcjbXEcgMVM4Y6+4/hc+2Z+XfzeEHwu9GNoS03G
INpgpoj2vZ2GXHvGpK/+MIL+GylgW+yZOHHhENe9Gqeku0y7WKaF76sbJuNz
ul0dCa+cgg25Vp1ZbCi61Ii7v3VmacpbruBzltvyW0Vr+f773MV2s1VWt0I3
a1HyxswNnkbc/XUuamLYbcDnWqY/LJ4OapDPHWhg+udm2K+TfVybx5/avnPp
KItecUVvgyP2a4oJZgnmfERPSHwUZHYT+/XsGgR3lGujjyx3sbs08b/9PAWK
M/mdDH9z3VO2IeYI3ygrUuP3awdL7CdblHqkPu4w2liJ0lbdjhbWWemyWxLz
jni3xsWPDNDqkV7eAlPQZ2/VrLF3R1u1L/Q7uAFdqFEZ/GIPWrW+P0m5Fcud
s00NG3heounNj1nfrqHvt15QeJuCntce9+3Orn/KrR/B98+sQvt2eyUedkAn
vJmz2iEIyx0ekdc6C88Oce03bXH9ine/uW4IakzZJNyN7+cc9/xTLVUe8wVh
/PWciqE1W9xwXFl2UR9T6wY6K/cXX5kytt8zj/98HbIDnX6gPd2gAX0yqHXT
GxYfxzJQU1H70PO1INc7db7GqVP5udYM7F1eH8cD5snqs9KvSXP3UxO0fW6I
O3qf+3tnl99SXFvRrReapKA/yCR68k1EH+js8q77gP0RtIr5q6+Hkf0TKjDk
cujBLu7xqcCyU7EbxaT4uX7wLVE5ZR6WH19j5uhaUMc/LwX+rMmfO9FVCGQe
lBcEnsbn6hXBfn9O2BlyHWMuPfPpV/R7r01TInOMuPZqMiqo/4TPlZt8mk2Y
muRzZnZ+d36bZ26gANc9LrNaS0uwX1TnSeKPuDwhri1VKi1/5fFzPWWTXMCC
i+zyed8pZo0D9iN2JQqyPLrQxfI3RSZx+0NEoHW2RsRBcXK8HQ+UtLjJByai
E0x40g/kSAL16j7G8u5ebr2hsDzc33L3MNd/YxeLtXz/scKzUlyn94Ydh2MS
XI9EB598tleMay9dv8z5W0RgYAHDOkwIr6uE3nNz9FN44f/fvwwUTmmYOCCI
/Up3Tr7/qS+Jvjv85oyzwj9e+nLJTnV0UVGJ5Dm9f6xR/OitCfpe2N2QUSqO
m7s0vN/WbBV65smkDJkydO3kHKE+uijX/nU3N9eloQV2Pqt6yIf9TmlqNZNz
NqCt7rRlxbwdtwrE3nX/YPcOr2fPHp89r76Icm1kFmjs2YPv7/3fZl4Jrh+m
Hd3mLyPJ9ZG3GZpDWlJce4hdebLfYvw+1IABw7fXQ7JwXJccf6zTubmiXJt/
dGh99wttf08wQuiEGNcr0oqVJ8wU53pHyK6rq7+jExdMdEhKHD8+HQgqTFL9
vViU6417dG6MXBPj2schz0VIAt/vITuhQ2qNJNcutQ+jlB9KgdlIyZWCnvF+
IRkIaRwye+2C9jK+7JNWpMu17bLB664+aIUEO2FREXR3SZzHw0s4Tqv8z4e8
EHdy3JYBaFZsW2CpIsb1nZezrCUnSHC9qExBqcNdClz2LZguv0mP+/N2sjOb
a4fRthm0yMwj+sT+KSAtfGt6i54019MSrtjbdIjAlRtXmOp1htz3B1x7JX7l
DY7z0f2QslIiy4jYHxMmyPSYlOzFdveBQ8eeacqLcv2Ob8Lq4DNow7D3fOUM
Ma6Df4dmGjwRg/l9ItNafmO7N/dAPKOiBS2krGZyqxrtcy5LK/Mp+r6NmcKh
G2i10gLRwLPokCVTxjyT0H8jD0SHvZPMCcW8c5/JLw+bUhy32X++bZnNUXmu
eS4XvJnHzVNVQLQgfNYKObTcbYfCIHdZrtXvKVgcOiYDv7WqI0eHsR/2SVGL
Y30/OtGzT/7OL7TPgFBdyg80LVk5K7gNXXRMi/0/Na7/Rh04MpFv+SUJHAdo
7C+zLPk6jnOb8bbg+UNVOXDSKNnwvVOX+/OTR+T5ttxHGzeuTO07jFZ6cIUa
5oXmzxx5xmuK7t49zztqgOyvNoDyzMXS5g/luM6QiTz7bML4+TGGLrXe/lVR
OI6nVf0VKM6Uh45zm3xz35PjokyhNjrzU7afLNfZBsPvH7rIA102Zs/vj2bc
9y+8ZxZgu5sc12IJFj/j9vqx3/9JtNBTOR3HbahlT1fLPo3jEJ476BsdWYrP
BUNlmqaHPSOfE1qD+Ym7/CpMfA51Q6H5ungUelqs2JqxWvQzYbpyj7ks1y57
PEpbI9C1Q7u3f3iL9gk6b1phiNfnwhJKX+BDbMe8aBWTGbyiDOsVevKyBPu4
7Z79drMjqk6Och2k8mrllKjxPEAF5D/MW2d1GttRbRlmKmFCWA+M0rf9nGaB
9YBCycMnvAvEuTb1ED/xZAfWC9CxcEvUaawXFkVkzp5bivXCJrnvmpKd0lyH
B7xWcazB++qsa4fYJUX0S7rIiKQ73lc98gadfkfxvlL7zfr0qhzv0+nvvCqp
4uR4axWYV8VHa5PC5xr0Ki+h5cZo1arrdZXT/xmXXSV5zcEL3Vq55sCDIHx+
c7PTRmt+jBLXbUtNDlxsVIBKVorc4XZ8XrKD1fqp6Q1al2V9jVGILp22f3dU
Jtp/WqVzXRRaaZqetpU/umytQZrpC3IctB58nmcVuuDG+PVgABLqFfPLlipC
0usav2f15DhMY7hxM2+g4bgS1wMTIiI9jijA9Y1eX7XfkuMOTWHDUFWrbZAS
1/2i/jU7zuH9JJMqNWByAZ9PlTWrr2gwVeS6cWD12sJsZXhyOrFvOh37YYto
g/vzt6KvFy+X17+BznP930+gFyj3HTDnlvcq8Eb+V07wAfR8mZ8l92ejyyTa
W4VFyfHoPGCdsHO5zoA61/bb41Y4HMHx+Xd38JmXD6pCh0Pvm9Lj49ejBjjt
yhJzVEJfvuoy81WiHNfSX0Z3usmiA5QvXa+OxeddQuZSexSGyfHsGtDUeFj+
pDI+58o/p+LwmI6ODMgOb3dCL5lIvS67Hm3GV/TNdj967MVs7RUZ+LxumbtM
d3SAKjh6bE3zG8XnZyv5Hk+5/Bm9LU+u6UcJOmaBzx6LPHTmyDX9zXHomzm8
JRe3ol9/ecTMdtPl+m80gNiC6sDe76qg9Cha47maPrGdAjVCDdtb01Vh5fYF
/dtvkeOEqTAp6LpY4TN1gNYz3bbfrLjb1Ur1G3SkyHFNTNjUd/vN+izs14fX
+oZfFqjATqrtXT9PHMfRtrbVUf01OtkzaKc3t73N/l5Knsc9N0PXpXzcuvaf
vJLytSnv4FXMK7dMaGq+IIp5ZVFko3qZD+aVItUN7h13pbj+GxWgL9yjMyUY
5zusyS/lnSGmyfW7FhuFjnS0veo5SjIDn3fedFSaCKXjVoHyrDWuBec14Zqm
z4TDj8fzBR3ITHaSOeyIjpOe2B5TrcR1+EGDJzHL0Zt5ZdJjvipyvXTHn5CY
APS8nlbXmEHMO8rDZgndH1ElPh/7+pvm0vmGF5+jyj9PixfRQz93b2GwZqAj
Gq3eBfugrdfvCL24F/2954lacxaOw3fxXK78PUcLNtOgXL0Xn88uSwcFjy9o
J/HpXslV6Kmh07Mqn6AtWqZ/k7mB1nSbQZ1/lnzeawCzW4+oPTykBRmn3Goa
xfSJ7VS4Uu3y+y4Dr8fPHr+MIwO0uN64bsuic9fx+TU1piLX5Aa2E5wvte3K
WYr2e8Xnqi+APtKtYZCZh+2Gi/I2/RrsdgStaetti/nj5Y8e7E2SORGbpcj1
36gBJ89PsQgS1oX2hbnpNh81ie16cD5AZ9kTFXxOHRvG9zhlIjro4BfjjZ5o
z2MlsdN2oiHzfK/sSbTRxWjPliIdCI06NEt0FJ93O4ldfPu+Aa13pMI75x66
X7q7I+gUujxBfsfMXegsxQnCcsvQoceXHPs4hXyeLgMeSnM+eh9HO8esuZ/i
qA9FlfoP9U5jOyvVKWeSlpsk13+jAmh27ko8cV8fLO3P/1hUKc/d/khp+rOj
bbLE+zUgaIZeSC97/6H/90+N2K4Da+deeWDroQ/UreuCTvzRJLYbgOv91l02
fHpc31v1PiuWgjYRLX3WMheddPl2xxR/NO+CC7LHEtGbBlMnfL+FrkmP9ppR
P24KKN94/mNTmR5cO9tBndKM4wk2TG/MNLiP1m94JSOZiq4PLd79eyv6mEJB
V8N8tNPV7BUlJujHY4XSVtz+Y+y3LqvmzQ8M/sduxWtL4gyh+fJwWrob9ntv
G5hzeXnrf+ctf226HZAUiP3qfe6zxAZ+oYVK35zx3Ir96kpTlk+914P9arc1
fO0OpGM/XLXkstZngNt/jS48KMo+L4+XTlzYYTbeT0aBVkt1i/hcUa7/RgVw
uXWj8MocA2h/Llp5O1eW2K4CSXPPul1YgHnZs+bu0ClahlwPhU3LePXVEF5m
3Hy921CR+/Pa8fL7715TJvanAQ3F4XlHThtA+tjy1LfG6tztMhveBTrlqXK9
t8rJsdQC55NcT9vpFx2hR+yPAgfPl/E1CuI4EeNk4fd+kuhn+2bmjSmg126J
iDiqgRbyvuuua4DOcew3yjfDeRRLv06en7IQnXSY8XtJIbqCZnZSTdOQa+H3
ejPrd6NZYWrtp74YQk6tiY/JEI5fOZKfMVPzF/oU34XCgRsmXL856Zy81xkt
aNMXKPEN53VM+r83oP02zjTX0UD/jTQI7XMUtS0zBLHNC/lDuc8vKOBurnCW
pUOOA2bCvlC9gYt7cNxkqnZs4zYxHFdwpWTwCSQawoydoj8MmThO9M2DcxTF
XegVAvYrBErIcaTW0Jv3zinilCHQTzzfRCnAcQy/Fd65L3Em59vwwFNDsSn6
k/G5juJ6lT9ZHng/FT6qXCZSi8+NfiywnmILaN2vyWrrzuH7F24fGEiRwn7n
ETHXZQlHsZ86MqTGK78Gt0t+8fZ8q4Pzn6YEWwjbxGC/0qJjJbMpK/B+ahO+
UPTFbHy7CkjvcIsNj0cbzm200ajC+2uy2oZPhUpYzixqHK5b2UKBdx0y4X/W
4XU2U22r3/wG9NXZ1ctPu+J1phFs49z7FD0ejeZ9OuojjeOgXETOuKcYUMBp
zo7Dr3/ieCin40WUtQ1ox7bRhyNl/9h2utexO//44L7fphfQ82qexhWnoOca
i5guOUCOt6JBkeXwy/1MvN7Wbn63ZvM7I641jx39rWmJrrwzd39FJF4/FzVT
hPvD8XwHllvMqk80Bu/N8d8dH2I/y4XdD1fNksd24N9IgQKja4xVl/G+4tdp
9vNhoN1VFHNX3sb76IzM7JYVU3EcmFm+tI6vOPrGwKvzP5XQLNZR2nY99PNI
lzv8lmj3lzIzYyeiG+TelKnMQq/1iF9wxgXnyYD8qOMA+/h+59ou6v2D48+6
ivdc7+9Ef695IfenGd3aKb9l9D36s9CyV7wv0Q2aORaCD8nxbJYwvHJwySb2
7+v5NCwwwLIitivAJg/efRLvzAAEi3sSNMbPG45nU5w50nJQAef1DN97+mWF
K/qLbWyzbSy6rGDRZ5kydIGl9qc2YRw3l3bha9NDu3FbghhlQdCuPlMYffph
TmmdBfd9cq6zti0/h6bUXznTG4ietFbtTfQ09Pxf+0d1xNA+uzrNblXj5wgR
8fRwOk2O11MAWalPMlKfLMA6doW2/NB4fmUJGWHrH58UxH6GvX9EfuqLmHDd
/qopeoEyfo7xGDxw3kdTFcf/9ay+Uxs8Fb2lssylYiW6ExqeUQ6gN1/+OS0i
F92uznPzfQV63SFZC2qPOUy5P3ezboMV9/VJ2zu99xWibZnH3FqS0BM6bWfN
DkQzchtsLsxH01bvNRU3Q1vqGGluFkb/jTKgZZytKB5nBYqDF9UdaePtSZz/
0xXjOSopagm8726cEm+UJbZrQJfwztL+OpxPFTKh8Lz4HSvYlrjyjoGVKvf9
rzsCStzc1bnurLh3uuOFFtejNde2TM8j5xOZgnTuU+32Mivu6887GvgsBXDc
pNuCPYOBIui6uwZdtyTQvvqlrcMy6B/RGxumK6JDfklVHVD9ZxymZ/6LMk0c
NxlaMU+/WA3dETonqMIavUJ/1tM6F3RV+XSlbxvRDqHT1vYdQN/Tm3ybPwtN
L7cRlb2H81TCXV31VB3Ro23VIv6p/2zf7dn5pPWf7cpN1WpMK9x+ZVVRwB70
qH1bVkmFFdTsrl7pP0COJ2VAf6fxTIm7OA/ks2KRcEGIFRwqjYqu/YHzZrqv
JMZsuYj2SMk4LLoR/eh/aaMJOc+GCf68KsLvZHEc4wGPx4I0Q/Spa34Ch23R
10XV+L/OQ79c+ZR3hje6uTCA51Qg+o+sxlh/pCXEt9+YOrsfxyUaDoaUpPxA
FwpPcm5rRjsqDb+3/YD+aHB/xaHX6K2M3d9qS9DCM2YEmt5D/408IOwpFCKt
gj6n9eqy6jL07OaUVv0sdNu5FVqWX6lwXqvPOr3gF3dcy3K5x45D53Gci6LQ
0VWL0oe4LhtcuiM/cZTrjwLFOd7+4+0HGgjU9j/ni8Tn8iaXLH+cTePjev6e
1TIOV3F+28XQhcZnJklw/chE6dZopSzXf6MKVKcwMuqjqJAtmq/gGqtEbNeA
idLrHjNKsTw43/hG9LcVFb5OTFzi4qBGvJ8Cl9YZfDyxGPPchpm5MiENVDja
ye/7kNu/TIO+/OuP7J4Ycn3PqJhxXs+I6+3PpagnJ5Pz4+jAmOOUGyqK1ze1
ekaBvRC6XnDjyS8a6IMTEiP3MtDMtXf9dOaiP6Y0L76/ggr+E7a/9BvGca4h
bzMnvxtAR/iV5k79jY4S61I9242Oy1E+JPETfXwGa2BrOzqzcc3aulb038gD
zNzbrxO/oXUNBcskstFSma5PI5ejh9TSH4yq4HxFxRivsfWXaZCmtjVN/yPO
50tNz3wSSpfm2r5pZPhgkhzXkeVXDA7PJef7qQBV8g6/1WH8PiP0XnXZF6EX
JbuPnaTg/MRf7zvOzzpIg8WFHxcVrjDh7o/vgfflxAycv6cmulqpdDaWa5s6
tHM649H3X32wVq5HyxQkPZ1GwXLOJ9ll4ZoA9PXt4i1H7qDXzRUsEh/D8elC
ORmuB0fQ2byTvgoMo2csqwrbM4T+eNtPbnQAPUbTKbk5hOOcH0jV6c76jY74
nrSrshPNKnWpXdmOHssWt+76gn64p+RoeBN69/I9HRIf0H8jD9i2DYnpa6Hl
3sqcT9qJ7rhLmSVSyz7e3IBhua5e7ji2JeEFM07eH+b6b+xibRw0yL2mSofK
boWk8DYct3NDfPdAuYQA1ymG3700abzw//+8DNh3PKad4Z43GdilFWQUqoHz
M3dNEa9nOWG98EXCoefWV3TfFuq9D//UKyLvlaNGtqDVpoy56NjQ4ZOLQeTB
J1hPjWQbZUGMFdeproLrWvpxvoCJi7X/70p04fzV2wSvoh2cknYpHkbXznu6
33Adev3c3zHWdv+df8DSENrlzYfzDir7Lo/oCaHXvlkc3iqKHs7jGbsgiT56
4ELEZlk6nPzp7JDTg+PibRsyEhy/oqvKOut+fUBvucMyTK1AS16I82M9Quem
NN1quYG2P2DFe/jCf+dDRFg+3L1eFP3rybeAWFX0ai/5lQUm6PfdU1xrJuK4
LDF6Z8InWXR95Y6HVwF9OVjoZ4Q/erdygrpzOtqtUNNBqxyt73Vh248/DNDu
Wj3GDBwfX4zjKpTg8FWlf6632llyC8cE0SfnHR/8Ko72dtVKfy2L1lucPaNQ
Gd2y1PTraU30OZ+rMdH6+Bw+I80hQEgKHU3LDnDQRgeXjgYcpqJXeHtseTUd
7dhXsEXOHW1zRCpwoS9a32B94PFgfA65qPq0SLM0+vczmw/apujEO+V5S+3Q
9EurdqUuR7/OGJz/LhTtnxCnI5+Ilow0/OV8CZ9LGd2o+f5BHb16g7zioAP6
jPb8acqh6E9VB9da56C1ox8fda9i543tGw4q94zn80z4bvxQJWYMn5MJSqXX
Vr7X5jpiSZhNrwx6KMszSWEuPscI+mHbw9ynyXWnjbLrwiJyPjEFEl6s8z2v
gP1W5YxE9d8MtMipe2+nu6NnCrUdig1Eh/vLTa+LRxfWTBkwuobumb72ShD3
OZ4xGIh+UNKdiP4iN8lKdhs6WyNtNm8B2pcy5N3dyS5fitM8Vp3DfpLe37R7
clboDNPnOo9ukvN/TEEx8/rpqhU4f1v94sRv9iUMmL834uDTXSbc9yu36qml
O+N8aW33SZdcNptxnX6nbM3O/eT8aSoIOWzd+JEP54291xm7VCuKvjAQ3fVW
Br3jtRLjpTLa8XxW8FMtnK8lt2fP8O9/5m897SuqthVEh24auLxTFG32mXHw
viS6abH/Sl45dEJ57iQ7JZynvPNsEGtTGLp/7rfwmgEGvGtrmX9rDOcRnTQP
t9zwj1cFKElp/mOT65d/vPpnvlRXv3353v/Mn+pibZm0Lzq2H51Fq9eR7URX
GlvfSmxFC+jEOik1oq2VvzYfr0avkYId6uXoFMFUmfQnOI617uuxwKFq9BOD
7TrteeiLK5dV1O5BJ6VPD3u+GL2rztC00AK9RkWs5jw/E36duxgTmDXev28N
qcVngu5PRENd2jKxN0pcf+2Nt1+0Dh0rdcgqawzn5Vob71b5mYyunx7CO8kS
/TdqQPhMfulZ7/E5d/zYiElxHjr77oDd1N3omyE93oUL0M8ZP3dYmzBh/dts
h0SKIbF/YzhF3/m4vYbJdcwHqtTWZPT2va1L/rij15mePLNPlgnb8z9dO65i
ROzPFHzD/xxefB7vv5w3yhckpuK8M4GrLy8L86F3OwjJWQmghz+zghcJoUPC
ttfsEkH3KBZMPivGhHnBM94FDwhCcvv+i9+7/rCKO5/qno7mh71NMTNnKPaz
bDY4bH6pwQv+VQkfjk/8xXKRGH3y0VkCMlWGDxVnDLD4lMv3RwkogthSpryW
XC/rwewvAp/8lGBY638PcgZZO0P/7J9Uqww/Pv2Qb/cdY116+Ofiwz9qcJ2v
s4Cv8w8rskqlx/KZAZhklxwPmdjHium/t04s0xAWF3XOcucZYQV75avezzSC
3LqE8i7BEVby//4pGcH1//s3wLr9Zoe8/2EKPDjy7kToql5WrYT30dl8FHix
ZmDvFLkultDU4HluqsZAb7vglfCii5XKc2dE1J8KCaKZdRldfayq4cDAa61U
sCu3MlLeOMpaWnBwuTM7L7prHdP2u6qLNWBonLluBx22ee/li87pZyUef/Zp
DztPpB3arqEVOspyFJ0gf/A7E+4fW8HYc3uU5Zs+Z8L3d0ywaT3kW+A3wgpj
eHnMZ+dDV20KkloMhlmJpZvDrl1i3/eH6kuU64ZYect2ZyikMiHrg+CAQ/wg
69GvhEch+5mgbm5lEjZ7gPUh6mzLB38mJO5a4nl5pI8lmH9xyMl9jMXvsWgk
54IwZExNX/Fo5SDrtZYz9dNVAZj4PK5kQkAP69SX2avUb/PCSwX+L22uopzI
C6O/isciy+RguGXfmHiKIGxtE0pafFAWWl9Lml6R4Ye2hnmmJrNk4NXdlAVu
0TwwTV61Uu2+Guyi0HOswwTB83ncjE8BqnA9QTvy0Sc+CI4Qyj+nrwLfRyV8
nWfzwLGX9s83HdMAk9QjCbXGvODRy9f60sQAVr0RP844xwP7PPbH5AgYgtga
Wcs0OQG4eF+QtrvJEK4NKT3hCRcG3be3PCZFGsH+OU1rvikIwaJnKfQ1IRRY
oun94ngDLxwpe3Nb4x4N1i+NLWlpE4TuyTIP+HVpcLBpz4CmCC9MmeEV+I7O
gC+yHxIKknnBcvnGZDV2uejX7VlQRRWGE6mWCvwvmVD5Mui0ygohEKnujv9+
jQm252PjlsYJQpDMDemqFCac2nd+V+Z9Afg0L/RI0S4m8Ho/2vjlBz84RU0W
P7uKCWsm1XsYa/LDnUejB484MOGFYt/sTY588MnXp7BK+Q9rC/3a0vYYSRDJ
Tcw63tvNEqh2cHUcEoHIzW3Sa8MVQLTutXbFsAgcEQ49W8WnCKrSXXMvCIpB
0mnhyTOiFMF4pvS2/VLicGpyyusr4kpgG2J52ltZArKrKWs0jyrBnDynl5N0
JOGi/80/0QrKsLhpU7+iiRRcF7WPHziuDGvlD+t106Th/FHGgx/nNMBFd214
nbMo9NoapTxZqAnftsy3PJQnBvBJzf8EvxbsfWTdOEFYAo4ckpodeE0L1OQ1
Y7/4SEItjU/bwVsb8lcJTEu4LwWOc66E3N6pBzTde42ffoqCbsTM6GYhfYgc
ljSJVZeAvhvvT0ol6EPt++VbJ82RgtWfdzaUyBrCsUOdweqzJcDlpPLJ/Goj
mLZlecCLRdJQMb34icIfCtgIC8q7d4iD49cNP7bpUMDqVN6Nuj0i0CH/KepM
FhOWZ4iwNBQlIezjluBBSSY08sfllfmLgK/oUVXrTwKQL1B6OC1ADjbYvTNc
HMML1nrfE/KeysBlr338fg3KnCgPrh/sH/qw65+/UR56l4jtWrxWmRPlIfl9
+URHc2VOlAfbRfF90K3EiXJQvnlsW/BhdU6Uh8iyC2fGTqhxohxMNVnw+lCe
KifKwu8Do8Pyd1U4UQYaZbpy39foQpHux4VXrskDT9++eK8VusDTIax/66Ec
6NUphzZ91YGZN6267r+SBbuHectX+etA1O7F90oaZaCbYr7DP1UfPjst6W2k
y0PQi1/nPcsN4duxFtcbafIgbKPncKrMAKT87BImpciCrEUo8F6mgJ5n126+
pbIQVh8y7zTLGAZvdybPiJCBsR7f/JCDJjD29blvp4w82EdJi1VdsIAYKW2F
8+7yIK3qXpYxiwGTfR0tIpTYx3PLryb2AQNkG+6snDwqB+1vW898udjHunN9
0HhiniLA9C/KStdHWS4yg5GCl5RBx7Vm56CsKBw17rg3fFAB/FYZ3H83QQxu
0eS8N6orQlFwAM91L3FonGTL8+ESux45WDQjfrcECNotPz2H3cpakiYS6XdW
Esyd9s+49VYJzl5c8GzeCylwX5TbbLhaGXruZ4qadErDdu/X+4/1K4P2Ve8W
7X55TlSGaP1U3fQyeU5Uht/Jb5dpZMpzojKsEJNISwuS50RlKNs1652Kgzwn
KsOE7nC5FE15TlQGjVM7DePnqnKiIviXTtP74qTNicqwSlhgjtGoJicqwiL7
55s3XNbgRAVI2vR8ql6tLpjWJuy0y1eGxyaH1SZc1oUD7irWm5YqQ3fr/H6H
fbrQXH7qZ6IQ+/Nky1YtW6ILrDn65+9eVYL5K6uubrHQhZOPzq9s9lSCMK2U
I5F8ujAwxVJdXFAJ8uo8NqS+14GFtwqq6FcU4XSE0Uc7J32YMTb/4aE0JXjm
cvI9TcEI4k7bXlllzG7FJi9N30gzAWWLwinvfZSg5/jBoz/BGL7SZHUb9ihA
Gk/cKjMzM7Dm1Xq2aJESOA+WXyl2NoX0Xye892UowMqfE8qV1ljC4/rNaRYv
FUDhxeeHM2wY4GYcwy/eoAAnLQU61UMYEHBHpsi/XhH0Ew01f99kQKxjclBV
Hft4++3nVfQx4GKjusXEOmU4H+rfkZ3OhNOf711L3KEEr6pLd3yYwISpi/W/
r69TAJ5DL/dmLBeA3XZrip2t1EDIUbD00Ake4M/h+/LESQXyI3YOdS2R50R1
kJx06Ne9SDlOVIP1vcnt0fmynKgKTy5nf17cJMOJKqCzPv+DgYQMJ7L3VxZa
v3W1PvimdN/++kINTvvsa3zIvp9mPhW6t2eZKhReMOn0+WYFW93dG5++VQfN
rW+HfT0ZEPjSoSdxvSosrPDYqcJut7lNXPtjJajDms/9YZGPmXD8UFOPopQ6
ZEt/Ml0YyYSj0/bnLVBUg89TXtQYzGbCwR7jVYkaqqCzoeBALztv232+XO0t
u541OJysfH++KMjZl4l7s8t1U4G0GZkXxECRz0n39QJNoIad2rxXQAJU7ldM
mM6nBda9mcd9vSVBfYeLY/4VLZi0Kfux/R0p0JzwdqX+Mm1olOwvE2Hn23+j
Flz/qc84G6bAiRrgcKrNXDzLAOInvfFQstMEmYxEF1dxKkDY/BmzLDRA/5ud
lhC7vjycLb9dZakWWNVRbl4xY0LRphM199nX/dqK6EeTcuSBsXbWSs1KXcjZ
NslAqlAO3CZrykUt1YUWrfbIT2WyECj9+1FXiw4YPEv9ep1dziU0v9zqyS73
SkL3Kealsu+rouLo6pe60F2fKPjeSBm2/3y+93uiLmhMz/7Nd1MJYnXe7uD1
0oXZZ6+3WNopQbbbh0BlPV0IFH1a7flWEQr3f95g8U0H0jdXPz2wQhFe3Wz3
mXlVB56/abmR/1MBvrT98vQI0YHe7/5fVNP0OVEXXC9904zxE4MFG3c8yzqh
B+ezBQQ+2UqCqQnvdNv5+lD2kz9TapUSrOnndYmi6cOcB7+a56ixv1fvwS0G
R/RBwinkatMGXU7UBxcxs4++mw04UQ+k+td+XTalj/V5tKMohp0Ha9Qd9uSf
OMLyPeG6UeecIXTlu7Z5z+Fln0+FIWU3A1A4XXCiaJkAzGrroPgrG4JtnKKz
6lZhqFj11L2k3hDsbkQ+jlwjDq6bPwWcrjWAY0mTqg59YtfDZ6WCfW4bwpdz
pfk2xXLwy9239sQKQ3h3ZNkcQ1MF+F5imS2naACn1bSq5gwqgquk9IbsYQPY
fK7Re1OpMtx077Sa8MUQ6A4tfWaDGpCaHfgnKcwA3P6EWruE6nGiASzY41Ev
6kPhRANoKXBwDf5I4UQD2NY6seTjciNONAQRVdPJjg1GnGgI6kEWvLNaqGDT
5skX/cIQjkbonDCeyQDtMZjgesAAckR2j9w+wABHWZ4/WyQNoSi+ydvhBQO2
6z94kHDMEHatyF0iUMGEoYcLromcNAT7iOSSnh3DrG+v3oYujzOC70e38lYG
DrC0Ai1XeEoZwdEslyn5G3pZbgrRsxcdoQDzukVIvE8X68DNFks3CQqsKBGd
Hn1MEI5vmXFUb7URDKxbxVzAziunfVCRTFpNgVzRtSXXSqVg46PULeb5RlBJ
uwgReeIQLGH2uqmdAsMe3XccY0UgYlGRZaI+BS6XKO7RVpaHxc3RD+NijEAs
2ehuyEMZECxLbJi8ggIxU52mNHYpQkk6Rct/gAJXMpdpzSlTgyWvLaWz2b+/
acv8HZ+3q0KXrdHU7iIKSM9kvQszVoGo09obpylQ4E+O+9U9NANOpEDbtp99
ie0GnEiBd/aHpuacMeREI+j9fMqtN8OEE43gYGVeWfY0E040AvUnhXYLG4w5
kX0815/dEwwz5kQKzDhbPeGmmjEnUiBTaFb7CjUasCSjq4qZFDA+mHS0iZ1v
O8uY6T5INYLoS9tLE/YxQd6r56ihsBF0vF3GYz+JCe/P3uU5HESBzwoCP6KM
ZWGL2N6+mceMQcvktrrOMSNONAH/2XefZuoYcaIJFK++7697icKJxiC3v1g1
ayKFE42Bv9rp3FK6GSeawGVFy+9tNhacyP6cCy5M0ONRArvcBeqyPGaw9XKo
I4+yCSeawZwLE8RODplzoimcljt5xrHWkhNNIcIyZExrSB4g5W6E9IgFzBIQ
P1ohYcKJFnDRNspjv7AZJ1pAtIyRRaGTFOg9cZjnl2gF6Uc1YxTFFMC5NPap
mKAlmEpH+FYVqkJSFIveXm8Jh4Ni2P+pg/2dWez/rKBjrYdYzYgpJ1pC0cUt
FydQaBDq0bxks6MlJGbNM/rgSAPDWSnzr6dawvrjhlm7ttLgLXWe3Z9WS4DY
MQ3dNBpEaIxNnMG0AqX9tSlPHtLAXKTA6tAeK/ixvUBu3Vca1PasMXxdYQVR
Fx82yi2jg5THnnuGdyzhqpi92YW7dFipeHiRW4gVOKn5HG5Z2sM6q1uypMKa
Ct2qJfMatftZGSuLvoxsocIxVVPx95+HWKmn8wMsLlPBVjX2xauzo6zET+eH
l7ZTwUU4mP0/CWjPlGrPjKWC78QXLY+7ZcAjNnAwYAoVJGqUpzw4pAj8fYKv
/H2oUOZ3hL9rthYUeDXzDMdTwe3otvaPMRqgkH1q0oAeFZrXn92U1GgA3dfd
bs5lt/NFjFV6s58YgoCCxA63z1SwMvv1YVMfkxOpEFyxrftpB5MTqXB3yx9h
7WYmJ1KBV3G3VmgtkxOpMPu2gPWbV0xOpMIRr0PzTEuYnEiFylFJn31FTE6k
wnVfGZdvl4UhWYLPtOE3DSZlU1T8VwtCVJVA86WLNHjYPOVjrzo/hJ4UPhm+
igb2+u7nd7zlgfW+Ygud2feRgEIG48ZScdjzeWtO8kb2+6VKLjJ3SENN8fEk
+04adJdUS000lYOiLTdmxkbTIHHwutbQBVVYPe1SVPgGGiwefCd8ytgI8sK+
75t/jAaxxtRvVVMoMFvheNAGLRok+X10aFltAnNturJ/5dNA7rqqaZSDJYh+
kEh6bECDL/l7NqxKtITAWrhxzYHG/r9vuawGS6irCarO8KNB1FXX7+pGVmBX
c/73kUQaLLlSaDYQYAWX3tcrht2mgell3U1V7OtW8b3MhA0NNEir/FgR00vn
RBqoSrVPXPmZzok0OD6nJ3vCazon0kB537C0xH06J9Ig+Z7gzk95dE6kwahB
e8OeYSYn0uDl5IPC3waYnMj+fW4UmstvJifSYN36J563upmcSIMJu332a/1k
ciL7fKfwXI5sZ3Ii+765lP6+o5XJiTS4YHA0zM2uizWP77nRLAE6nHNdcvtW
SR9LPTJy58ZNdMgJ1+nVcBhhtQvPeBVfRQe5a1t5hdzlwK5j6e7iY3TocC5Y
LTlTBv5UbvJ4LEOHiCkbXEyOmwJLy/q8giMdtN6kNHUVW0JcW5n/wAo6dMqZ
isyLtoIQUcX9hk/pUKqSfXPVHxonsvf30T+zm31cfyMdZC5Mjo54S+NEOlhv
EQ6SZJ+3v5EOHhMrl524QONEOoTzZsw2SaJxIvt4hE7ZxA0xOZEOoxKT/LXY
5+9vpMMu+fc5lzqZnEiHYdWgxins8/U30mGnjqzSyy9MTqTDEOWyk1cTkxPp
sN1iXmQ7+376G+lQr79qmdUDXtjpe/F7C7vdIDHf+9vE+wJQ/M1s6rMUBkwJ
9Qq2uycMwv55sef7GeBbrP4y118FPLqECtrVGaDzWfqKkrEqHBx4nCc4lwH1
fAIJez+qwi2ePdk6oQw4rj8Q9PO4GrSKTDs1OYcBC+w6Fnu6qoOi7J+kRVUM
WD4gGKeziAJWw3tny5gx4Gbc1JCMGgrUPUu/67yJAZJGwd5aXkYQlXjHKu4S
A1bfvzj7FDtfoXu/O1PxkwGnntsd2v3AGF75Ztk99GZAWlyv99MYEyifPXTl
81N23h/vnC/fw+REBrjM2hC3rIXJiQxwGty/6dx7JicyYN6lDIfu50xOZMCc
lXcok9nlyd/IgJ6ffWvPho6xOv0iFkX3s6/rsB71N12jrOc2D2Ql2d/LdLGu
V8PrRllneMZexrGv27aUjn3Gn0ZY4c+nHZRrZEKc4TebBR4jrCUJ4TOTqtnX
fUHL94g3wyyG1/1R5XImNMLnjDyHYZakwWhh2hMmnNC17H+fJAyMJy2jd34x
IfnjgjvHzIRB/uTclED254jP2LnLtVgIfm29YmVaw24HLM8CqcVC8HaeQumn
F0yI0nzOX9YhCNf0t69IvceEvfWdJVF7BSH+T8OAy1X2dXRCKdpORRACKmfE
i5xhQl3QNHM4Jg0nKqIED7J/3zeBA/PfKUnBqYevn394xIT+Y+UBm1IlICNf
NdYikQmChoqJfBricDrbx233KnZecWPpjePponAmOU+pksEEvVnZ7y11RSD7
YO8HQwH2eXe8Mzv7kTIoJP6UvdDFhJTAs3MHdilDztILcv8b59B4/KiT40Rl
sKX4yruz80iDBztdMnuV4HmnloIx+/g3tqxx772iBF6FtQojeUy4Ju62aM5G
JejYe0zxbRoTBmhTPU5SlCDc0Vnp3CEmBLXfMxrOVIdTOzpFWW3sdtFJMNg+
WR2sjGQcGtn7F3B+rNNXrQbFldSDu24wwZHXXnNrgBq473Z9pnGSCYkFpapd
YmrQYh4oVLSXfX5Wz1PafFYVQmoTZnmtZ38+lQq5dpYqiB4o2D/kzP6+MjMG
KOx2nVGb0X0H9nXl2v8rTZ7d7qu6V9T6hH28wvPtp/LwasHeRFdp2M2Ee9mp
TR1ummC1vtXm7gImbP3Tsac2WwMapu1cMcGECY8XJK8a7jIAH9MyWngoE2Yt
GvZq+GAE+majl/x+MOGAgk/ajRNGYCdGK//Avn6evX1Wc2SpEfh+W9Vhf5kJ
ovEWyms0jSCyNFm8IJYJc50TF05rpMDZc89Ntf3Z14vkYKJSBgVKDgw7xLCP
v7xs+duf3hRoXW21vt+KCd/tyq6GpZpAcNbqJffZeWRWt6g+v4YJvBnYH8/L
3p9H+pykQ+nGYOGc/cKO/fOy86KEZXSN4eDZx/wHZZiQZKgnKTjVDF7IxR/Y
m84EpU8zbvUHmkJMwOm6nROZcGG5ft2BQSon/m/dugeNfD1UTmRfvxFen8PZ
ecHfyIS+uP6WIXb75G9kgm9m4rdtTVROZNf7V61+/KqhciL7fiwu6/J7S+VE
Jqy+0SU2jV1P/Y3s74+6evY2dj31NzLhY27tvsvsevFvZMIpw/kPW7tonMgE
r8xHw1o/aJzIPl51m4mLv9E4kQnvkvKC41ponMiE9oB7fI3seuJvZMIZ6TS/
O/10TmTC0svbPiT30DmRCYpO7vZb2eX638iEiu9W+c7f6ZzI/r6jJbTMv9I5
kQksk2+HRJrpnMiEMJEStf3DDE5kQmdCpEtpL4MTmeCjOeuAxA8GJzKh+pxA
kQu7HPwb2eUc/Un3sQYGJ7LzsKJ9RrXVDE5k522zZy7TrGBwIvv6Td0wb9FX
XIduo/kM3+pCtMoD1V0LDqPPf+i+utkC172zLV75hZmKLj33RnlYANeT9oid
Pu9xANr4m8BXNe5zZh74dC7mU4cdOm2NXP39jWh3w9R3RxPQwR+LvOK+43PX
Gbuy6rrfoaXVDnoteISuv7m57uYl9AV3dy/VVHRwl23dzv3/7O+IllejP3r8
97YmRJU4DOE6efl7I+/1PUPvCtx3/UwS2sFnT57LKrSCW0TWCBX9cfqu1NxR
XGcvj7bz6OKXQuD0+iZTUhzXyboT6qG7aRPaSHdYsqwcfex5+pCJFa6TxRc4
/evBo2h/tS+VX7vRDY8OPLR35+P6b2RCZu2yqxXSOE6nsot27ZoQrqMqJCKU
f2xEgGtb7Q/5Ib38XG+ccLnA8/s/+8150558GdfZ2ly9nSfJBf1BQE8p8Reu
qzWb+cIs/hj6+qrA6XET0LqJaouP1OA6W3GPHm2K2SEJnnbGh6yFcN2kMXNB
4ZX/rMOUrfh5/+F/1mFyGL3Pd/ufdZh+tp7Y3fzPOkyJr0JHpUzRtrcXhk2i
ofly7m225Y57kIHg2LDZy1XRbdsm6+43QXt5Dw1dmIiumF1Y9coBPZ0aevm3
B7pAxeag+gb0HSG+krfzcJ2nXN/h+qaT6LRHfT0dP9DROt1iQ9Nw3acd4d91
hY+iN9a32Cp8QntN+uisS8d1oP5GDTB1X3t+1TNcx0C33TQ/wRWtuufn3eI6
XMdARiX/addqOQhXMXtQPxHnqb9wET4wJx+tdKjZ8bopzlP3KX4gr3MG/Tcy
wZvhGNxSL8+1TK3k8JYEdHH4q72js9GBBvGiMSNyXOu/cDuqXCAHcG43Ty13
fTEFeFPXnztogPaR8V+oNg3dY9c6Nmkxev/2ZbleAejxuHSf9Z3eUVxnR7tp
Vvy7QfTnSYvW3e5Fn01ew0rrRK/7tU0prB1tPj/qx7IWZfCSU9mtyZ3PogIq
1IvpVC10tRPcm2mDTthYVbfIBe18aN3Q+vVoiXPDKrv2/rNuyf/90wFT7emW
f17jPP8HncYnPELRCx7KiNzWRn87OhCk9OyfdQBWfvwU5IeWp5fOr1REn+e7
epd2D8eRJLjzfVa5juNU3F8OrLVYhVaY1fljuhy6+l7L1kXFOG4laUL94IYA
9KIrbyMitNFKxs8Fj1UowqXyPJb1U1xHLP7//uG6YdsWhjT/WIbrhnmqLrOe
a4rrhLEaZkTl9KH1TxvX8j2W4FpktZSZd5wk1+PntU6SZaLdheuw7E28Vuv8
Hm2sahC9+z76VXrypGtn0cEGot8/HUZr5O48IRekDtlFS/jDZHHdDt9ViaXl
5mgDsYoj2nPQX66KuG9Zhc5ePFPlcTh69eiuBoU08u9jyoBkxAmfqi5ct8xl
4+F4vQEtSKtZcuyZPK4TNaZspyC6BP8uwfh++ForTmT+wnU+3t4LsKO/R2cl
yf14fBcduPl60sJM9MxZi6Z93Y+W1xxoDV2vDWPa3kHh0riuw4rZMU/trdDF
freUpJ3ResnNa9/7offdky7MiEV/+TJZbN1l8u9bKkBEUuUR+VZcp2pp9nu+
5NPoiQV1ISrL/lnn6lFTR5oKuud180rNKtzfq6av7zLicH0LerqQcfkArhMx
XbEx4Usb2uXwjZE/NWhv/iPr5J+j/Xb4VpoWond1T54244Iuuz3x9JShNK6j
0PZdqzOdio7ZEwoqbmhL5bfx8VvRby6aNYsl/bNuw4xI5v6b5N+r1IM1/TdT
qwZw3YRwyhe7/hp0ykLZLtVC9JX9005MSUWXFmy0996O/vj5ePceD/SgbMnJ
7In6ELZmvraiyPjvNYCzNbm2vOboirnCbj+c0f1FqzbWbkXrWD3c/zQFPfe0
Rvq1u+it8ttvnWpCj8dHx098zv+N6xD0tCruo75CG1gf1b98Hr1on9gTs73o
qDf7fS94oQu1xwSMrA1h3XMbQTE+nOe+Y3ZaxAVR9JGnw4NzZNEZM72D2lTQ
+cXFP6N00E9YBuuNjMm/10iBk2H6zgLDOK/9T3H4mEwv2lP4wxXNDiOw4REz
myeG85K/uCoPv9NCx58xKPdhkH+/0BhUc4Ttb3TivGLz5s+VMxvRLJ37K9++
RLstS+1ccRftmxa0q/Ofecsh753Fw4+jDymYpUpEmcCeiz+qX4jhvNyFXiu+
Lvlnnq+xWOVAqy56+PYssWAL9Ku1t9X5/5nne0bJzCLeDr3t6alp2i7o8bjn
8g9RrxGcl7vEfWr3wm601cDhGpcWtNCp+gfzatGN083P2Zejb7TujJ1ebAYn
nxyZliiJ82xzbsKr2fPQV8/3eA8fRN9Jy+m6WoJ+cthjz2oBnJdbES4hpzYD
PR6VvlZ0Z9TivFqZjSoDgWfRYp0rR2dtQQtuzRNQnYoe6+sV6xBBD+2YJvug
CvffOxqlnJBpDt32Sz6fVcN5rv6ZVyU+TUP/GBSx0ViF3ui+cuXiKHTbxcKY
hDz0GiG5m+Wv0M3eGz6K9JJ/T88SHu84Yttej/Ncr/nR5rr8M48206fa6+Y/
82hjF23frPHPPNpdczUj9v4zj3bjtOKjbaZoT/rqrPnCVlDNd0rK+p95qM/s
lfq2/zMP9XZ0XMP9f+ah5laIPOWXRZ+Q23txzj/zUI8s+pN45J95qOFpQTvf
aqLNNtR/+PPPuG3Kl8lhRZJo3eUnNHepoDVqhu5P1UeruHmuGLVA8223yF8v
h/NQPzgpFLQZoPP1/hSstUFH93+63uqA9nlZemP1UvSk01dufvFDy21LvrVq
D/n3R6hwZWNAgM0YDWihD3Zb8/3374mED59oMPuF824u3TslPbUeXR+eMX1+
CVocTm/1/mdezyTeM2cD0miwcLPxrZP8OK5cwTPec/E/49Ar7YdGZKX/X1n3
Hg7V9sYBPEQz4zYTylC5TYTaZ5tFLsm8iEMhci0qJOl2uikVJyoh6nQhJLkl
Eul0oURGLl1EHCmJkC5CNEVudfTb5+G05jm/v77P5495npm919r7XfM871rY
sWhdeo089grVmiWRSti5j9d9KGbivkApq3ANe2PsraWZa9p8sGsNq85ui8Ym
rr1rnHLj/8870Rq79PmSUF/aQt/OTs1xbKtq5cZMob40F65rlfo37HVJfxSm
jWLvEn2YPWeEC6G7Sn2bhK7rkqTAqNNTsen3dPLtadhPujqe0qSwY2USRitk
sT0M7FVC5f57HpyAN9RZXJgqjs2ZLhAclsFeYc7RDZiJHbbdY72dKvaV1GOp
pDZ2y5OyZnkudd8byqR7Sfy/g1mwRkS9Ft73RLN6k+x5f2wZ9vXEjRexhzaM
qi18i91WCLmiGniflPviUfp1PkL7prjU3T2Xhl216MqNPQzcZ6yhqWh1Yib2
Qebh59kc7Laxvg1letim7zxGX5hhn62riP4s1Nc8XETMYqz87/kuUyAsPUWm
4gt2X5P8wv3vsFfJxKzWe4H9YInIkQ/V2PrBQXmpd7EzrvU9dfsTW/bDum/S
F3B/VXj0Vzv3cWx/gwuCoBFsmw7HuMQv2Dox44ZFH7GlF+a1NL/H/tSxMnSs
A7shZpqGcos+pJe0lh5TwfuWZmTXjJucwL5wusSsexw78/e8Awk/92U1gIsB
yaVWbdhZzsfGB+zxuWXZZiFmGXexJ1IR9r0wSTDpxvs2lhJ/rCytwxY98lrZ
ohD71xb9tqpk7Bi9qDTbw9j1kS2+tRux5duIuU6OuD+pCujb9L9iHy/dYZNQ
h+1q+lJtLAd79h2Lb17h2O8Mcxv5a7CvFMjlqxvj/h1PYsclNIZ9pEAwL3cA
O990e466UN/7i4pP2knvsUWWbbvM6sDWbejXOdqM7bLyt9wpT3Efconmj3Az
ob5nmkcqf49Q37PLUd7YP/+f/+u0O+36XQLsj72h21T6sA1nq15278Y+7FD2
9sTP8c2Fm7n3bnR+w+65+1qSP4ytVi/id24A271TrSRIqM/2j0FzeZde7EoJ
3y1kF/Y3xUOVUj/3AUCARpet3TCCbaFQ0vBYgO2oN9+a7MZea59cFPcae+tG
qQWjzdghR0LSVjdgR6d/lCv/OT/1wc2oy/GVUF+S3pd9zieFLJUn5WYp5K71
qR5DQn1K5SpczxwhpzRXrvYS8r5Yd29ZyrzsO7Zfhc531MjeV6kghj0t24i3
UBy7N2u4yG0adl1WoX4QHftG1u6rCZLYCVn6OrelsU+M7be+xkIweOnqBnnl
zzwt1fFMXRLBXtHO5XdEB3h8q4NiWQ4IvnvKG3n3DPI8Nk/1Vd2KILTAWlWi
YYgnOBlZlhSDQEx2Hy2vaIR3tJChonAZQURArsApfYx3Oujx7HBdJnA+xS+i
udPgfo3hhUdrmXDs7DbrWD4NxtQy58nGMWHQ0sZpzjw6EEHMfJeHTPDqV/XK
OUmn6pUQlPSdCZWJo/76o3SIV+u+3U6yYL5lww6+DwOq97iazV3Pgti+yyFL
qxnQpClCnLJUhCv2ol7qkTT4+uOM9OtERej5oatcrkcHuWadPrJfEbSuu770
aaUD9zq/JsySDX5+oWdFIhngGOOSV5/IhvQZOR7pepKwza87RrWfDW0PG2aa
t0rC8cUHNm+3VALl4O/POyKkIFZbwcRoGoJku5z6e8Y0cGipTwil3pt7XkaU
fi+mAf34sa/3tajxGOCXZ2hGhyozG2cZIwQ6Q+ZJO8voECYQu+Zqg0A8XCXq
igUDTDP4Muc9ELSz/t79oZIBw87BW94GILiT+nKdxq+S8Hz9ditfaxr0cm+r
62kwYYvKk/hLCTQolN2wrHEZE0SbdT/0f6DBwY8KgUGBTEg8fdTYwIQOdo8q
k5XOM4Gw64oOjqHDzKxdVXerqOsqbtV6j7oOnYfU+737mbCKn7GARjDgytq/
ZkydST23f7dK9rhFg7BSdYc8T0Uw9DtQYXqEDrO4fJ+UckX4bdmtHlVnBty+
6Ln7pDYbLnIFLHE1SXBmj0QdOsmGVra2cXe/JHw6FpccOMwGeRFf79oSKYie
oven/xolWPYhKfJatDRoBtZWeFQpQX6AaAlPmgSvv6buDVUiIIAzy/ihEgl1
NkY7TxoQoNZhUOg4jwSLss1b0h0JaDm3HDUbkFBgmOp/fTMBce4b//SxJGHe
1QbviggCHOQOL+hxJCFZU8KzMZ2AaXXJl3euIUE2xdj1XQkB5jVnB09R9eWh
RNStIUfA7V6RHiM5BDuaxBp3aBLwi+Sm9vZZCLxnNJbyjQnI1mlojNBEsNw1
M0fanoA5S02qF1DzZXFcYJynNwHxGzP4jcYI5j9dEpqziwDpo4yCYEsEStMV
Ng1T36dkuRXNlKrf27LVp86hk2DwxZhfQtUjSqPJa9dMp94DccSexVT97r50
ZnGKMglahhoLSqn6PfbcqRntHBLSmme+NaPq9/qPkjtVCBLYIVLn+FT9LmUW
UbvWkITTc0RWAFW/256Yop0GJLwJTJA9RdWHE0lCm/HmM3QRNJkkDAa4Zt6f
iiaTBEYi78ZhGppMElQfaJeDFJpMEhYOyf31N1V/TyQJXzLenbOl/ZtcEDe8
V1ZNfX4iuXB/jUZMyQw0mVyIijjims9Bk8kF2/wulTSqbpxILkg+t+05BWgy
uVDRZETmnxTwQo6LvWFQ98nGoSp+y+7PvLcuWx65UfOsttLpb51VX3h2s55d
zZiLwGlR27puswFewZvF8f0IwfNrm6qzNQZ5s3OzQkwsEKyaN0z6077yInbK
rotwRLAxsvxJF4sGfY4vRk2pddqb7hb7B0AD09+LuxWp37Ha7mtN1jYaxOSk
NA9S67amfBm7iBQavHx28FE9NU6cWPMer6+lgY7o+qI8NoLHu8yXWn2nwT7C
JidKBYH181WPOLp0eLRK96wf9f3kHy8xUBRhQhXXSdqaes8IRH/hM5cyoaTs
8S/h0xHUmLBt6bFMuOFgveKfc4cu7RR7KtLKhMutZYFTDBGEX+7zGuOwIH3T
ogQzW2pcdja9/7KVBYkjBUUhnghMlcq39xay4EQE2XqHek5L3NijFeYsD+V5
r+gd1Dpp9Qn3JVZ35OHFGwWnUwSCm5uNfBhqCtCv5JBoQT2HJG3YB+oiFUBs
RUT7gA8CX85YUly/ArCPlmpeDEZQNKXl1krXGUCUDW11O4NA9lVx45ySGbBk
mCiYdhVBy5UzXc8WcaDvefVAz2wEIk7nH44EcSDskoPf90UItAYzc5RvckBu
f0Oj9CoE9gl50WYCDmQtc7NS2Ytgl8nNzT7z54Lx7JcFZDyCpFfFduEBc6G2
f7WmxU0EZWEVC7Iz54J32et45wYEkRq/Zb+h1usVrFtPd0ggSN9LE/1Irccd
TaeKDFHjtrg2w2uQmsev/J2I/dT9eqa++NZ3RMCmUyme49T9EgQ1scTNCRgp
7o06RK1vGLU7tkg7EHDkvVGhBPXcnqsu9UDBkwA5VsSbaGodPtbFkEil5s1E
UuO2VZ9zXJycTASJ9Wssgql5PZEIuiqjvDdSz7OJpOZN0fUD7ixyMhGQy63O
1olwJxNBtYjE3iY6dzIRrL95362dxZ1MBD/8Iw262NzJpK4P20b+kxp3MhHo
19AGhrS5k4ngf/ZXkkc=
"], {{{},
{RGBColor[
0.34459780680448543`, 0.14639573961823754`, 0.6013542210809135],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxNmHuwllUVxt/v8r7fAQ8iGBcROXASp0BA7qHQYAhHrhIkhQQqICEcEFTC
SyAIiDPGxQt4GSzAkEsxlI6EEv4hI06GiaGg0BBgUFko4HSRi/b8XM83xz+e
WXu/795r7b1ue+3dZvwdI6bnkyR5N5ckBdGKNElGq32mIknOqf834e/CedN/
CJ+bfiQ0LibJPtHhWZLkNO9fap8Q8rmgHwtHhN3CW8IZ4ZhwXKjUmP+K/k8o
qv2J6ElhidbQSHSWFtZQ/N9Te5j419eYf6v9H+GCXFDmF3Ihh/lpLnicEv4i
vCn8QdguPC+sF7YKa4S1wm+06Z+L7hTtKNpCuFR4SVjtcTv0bwv8RDv5f0vh
Ra3vGsaK/tb8nhNeFn4hrBNeMUX2DmGDsFH4nddC/1V/2yT00j43M0+ytpkf
vNoVQ2fj9T/Lxf5OW3cfCn8VbhKuFwYKK7Wmb7Jv0TH+Nkj4VP3Boq3E/2bR
oehWGC3UeP6vhCeFp4SHNf4b6Ek0lwWvlpo7SvQ6ob/wA2GA59e6D79ppqxr
uinzd1eE7Pbi85nXjk9stsynbcsDwkGhifb+vuiNWfjgXuFd+yD0PfsidJ99
4uhX9PK2sMe+Bb8/J+Gn+5Pg+1oadl2rPVZJ1iG1u4h+rRhjRkruYfsRfozf
HbEM/PGw+yfM7wOhr9AhCZ9iH68Lu7yO7bb/XPGvki3niv8ioZfaz+tbO9E+
Qm+hk/Ad4Vqho2lf4Sqhn/+1F77tOd2FAUJ/zx8qDBFuFqYJtbmQM0gYKDyV
Bd0luY+ofZ3a24rBa5jnX2Meg4We0tV40T1ZyLzB46B8v1U4Vgz5W7KQM1b4
oeVBxwg1wk25yDUN02jn6ikeNGeU2h+Ixzivd6r3OVIY4TXd4j0Ns0z6w4UJ
XgfjbhMmfmX/8Nsh/pNFzxdjP+O8voO2zxtJzJkpzGC9WfgDftE0jbVX1Iv/
84V5Hgd9IBfxRtz9Wj7+TBptYvFR5wBywXP6t0hjV4lu0pir9W1LPnyLPLLN
63hBeFF4pxD56FQhfPkV+xC5je9b7ZtbPf8t8yAP7XR+66p9fCHMkdy7JfOf
as9GX2pPV7sC+2qPu9LID+SJlvr+MDlAPDpkwYd82cUxMkXfZqh9mebu1V5q
hR+jd9HW+t8NucIijWmt7wcqwp73C/fZrtB7hdckrx37lfzfq92evWj8HrWv
ZM/6Plt8WmnsPZJ7WRq+9EYWeQdZ3Z2/oD2EVsSx0DmJfC12iUz3pe0m2j+a
1gt6shh5veRxLRy7HdzO/I9Yayo0E+oVI/8M0s+26l8kNBK6CW2EasfsJUIL
oYPQ3P0rzYM+8d7EfDdrv98Sz0358KsJXus0+zB+fqH+Vwttkjr/Y08N/A3d
D8rHeT5MdLl0dYXa89VulsR3Lf1LO9Sad6XnVQkPpaG72nzYaGyuLhbHeR0L
09DlLfk6W/J/XRr6XpcPfV1q/T2ZxjnCeTLOPoPvoKMG7ClXl+PIeeyD/Vzo
dVW6T85pb/31se7o97V+mV9lv8P2R2TMzui8IvIleZN+tX0EX+mp/uW5sOFC
23JSMfygpfdQ7bU0TCIXdTIv5jW07dkTcVTPsUT7+8WwbZKL+gibUxsVbO+c
+5dryEVJ1D34TqX10jgXtRc110yf/f04m0S/SIJvc/Ojhmpl+fXtZ3yjJqry
N+qm1qaV9kv+Z14DvtczifO8q+OKHM2ZQs4u53HyOvXKCvJbEvXLE+5T0zzu
PvXLUmFZEvXREve72tew7Rrhp/5HTfSY55MvH3Wf+fcLP/GaWtvX0RE1EHXE
2jTsNSkfNRNzlieRc5eb1/wk6pLpXt88f1stPOJ1vFoReiAWB1kf9AfaZ+j3
t3+xD+qgzu7vT+PsP56PPTxgGSfU7yfaWMH3uvj3Uft7pZjTyrqg9lkoLEqi
BoI+JMwWJggTkVuI9mTRQ/mQVa8Q5x3xg28ir9b7nCPcLkxJwkfPJlHXHy+G
Xan3ySmcqZyl15YiTq8uRa4gD5OXifkhHvdSFmfxH31GD/a/YY5JYnSk10LM
ET/UV+TTlVnE27pizKG2KNcpvT1/rP0Lvuhvqvdza66u1iBnj7AcdHSncJd1
NtN9fGWy94/v/Mj9RlnY/7uF8MX7/H+8eVNHdLd/Vdsv7/U48jv6Iya5c1Dr
Ud+Rv/BB7jd3FMJmK0UHOQ9wxi73mubY9vjA0FLI6W6/xmc2OA6m5sM3yMfU
mtS11J7UnPUd57ebH3w/zyKXD6+IOCQ+N9rubZ2rVrn2aCO5M9KoB6gLpqh9
j9qns9gbeYe9EkPEEnFMzUTtdIPG3lUR9QN1xFK1F6h9cSn0yVhinZqcHEXu
ejYLX2hbUReT8D3r9ZFDV+jfQnJSKfqs9+u5uOtkzlOH0ojJMRqz2rXBz9LI
q5wJnAUXS9YCbFoIP8afOX+uSsOHdmcRG/Mdm9w1is6hxCdxejCNOoZ65lgW
ObaDZRT1vaXonVnkcGRyDpGvqMuoz56w7rHlR6W4q03KIue2cQ5eLD4PkodL
keOweblGhAf1Gzm8o2WT66o9f6zWNwt9ZHG2caY1rog7Tuq8f4X+rWINhcht
q5Oo4ZbYPmvs1/TJe9R6zyYx55x9Hdvg5+iGc2pTIcZsLIQ/Vvos4b7IvfGX
tj/1J7XoZ44N1r7W37Y6lpZaNnlvs+e/U4qa981S3T2/vnN8A59ZQwoRx+fS
uDeeSerukVDGLivEfhYXIocQV495n2usi/Jbxnn7wgrbrfx+wdnM+djJNpjn
//DC/uicGoC7JGM5i8fJBneL7s/i7eScfXy91vEMei9EbiJnlXMVlLxffmc5
5z56Qa/kpmXWF7HOOVbOJcv9D37wL58bT3v+tCx871Qp4u1l26ZcB1AXcJ4R
U5xvH+YjV3MnHliInHk2jbcP3kB6Z3GXJeeR+2bp31zxyEoh47T9nX8fW5fl
+zn6ft/f0FmNeN6G/Vwzco4Se8QNbyK8l5TfDohXzsr+Hse5O8D9DR7LnfpP
hfCjHlmci32TOJMPFMLHeF/ZVwg/7ZbFPj7xWvfaBtith/XBfYJ7Fm9J3Hm4
Zx12nzsabwncHXsV49vULO5xRzzubfslbxHc/Y+5zx3tqMdNti2x8yXF4Nlc
dGwSvoKP7LKcA5ZJTiTWOTNqrIvy/afGY096b+W3EvaWcmcTvdG2RSaxyPk6
L4lYOZlGjUGt8YL3ifyjabwVjS9FDBHH3D93pmE3apxRgrrJgrTuXor+lpZC
LvI5t6hTqZfL70TIv8B5lfzK+xI1C+cbeZbvo6STAYWogz5N452JedQHxCtn
QLmmhjZx7qiyPHIi+ZRc3iyLemFFKfJlC/8rlP/nQpf432jbj7xCzltvXyPX
8/7HG9oQYXEp9Ib+Hvc7AG8A19vP8fca82PtXMLw24FcLr1e6np8onzO9838
BlCKnEi7SxYxjA/ha8QnthxciPy623pf7BzIPR5fHuP9bLcv4pv/B9KRiiM=
"]], PolygonBox[CompressedData["
1:eJwtl3u0lnMWx3/v+7zvc17Dmu4yiUSELuQWk0tNisJBKZdiRjlJyTkJ1cwS
qTCOu1VLiLRWSqGGsdCS3GZcJoSZMcxMwpLlstYM1qw105rJfD7t3x/fc/Z+
9n5+z/P8fnt/v/vtPal1zBXVlNI/QA38jD8/8P8r0B97APgGO1VSurwkXk+p
Dfs68KMmrnNtOv+mgeYipR3EW7AvASPxO5YRM+cq/Fb83bi3AUaz9mquPUBs
PTic2H+5fyr2pWAUsWHk/CvFPd77PNfW4d8HVmHPIH4osePBTcR3cv9lKdY4
nfj39XiXyeAm3vclrj2JvQyswX60CPtmcAf2WazxZ+w/gQ6s/VEjpf1Yuzdo
x28uI/ZH3wm/nfU7YHcErWzkWOIfpFijM/F+xKdz71zwH2Kjy7j3fbA78e08
83f5+1/EnkN8X3J7gXnEC7CF2PPuJ7FZoBOxzqCF2NX4XbG7gcvwZ7HGXHJv
BfsSm1fGWn7DIuIn4f8+xTN99q/x+xMbAB4j/nLeH3PMvRh8hv0pOIj4JPzt
2J+Dvvir+L7B2MeA1Xz/jcT7stbBYBXxKfjfEfsWDMRv84xS1NgY/PH4H2L/
BXTDH1eG7R52xX+f/d+nEnsyG/964gdg9wFL8R/kfdvJfQgMIDaTd9g/xZns
OpvdUvoFuReDw/EfBP2J9bMGyH0Yf0CKa8vx17HGCHJHgm2s/wD+UOxh4A/4
DdabgD0R7FOPnrA3fsi9s4I1DsPuCVYQr5B/QSXu2RP/tTLuvdBvwL8fHEru
IeAe34c1BhM7BdxN7g6+//xKrNGB3Dnk9CG3E7gN/1d8/wLsJWA/8q8qY+89
g0tZawE59WjTNJF7N5exF5PAYAJbyrAngxPxbwG9rB17lvxrWP867LtBL3Kn
VOPb+Ky0kNzlxBdjzwdzsVcU0Zs3gmuxp9fifaxRa/X6evCM7zSetR4i5y5z
wdXY53Ote+Yic8/m2hXYE9xm7h9HoAdrlWAm/iHEf05sFmjCX9wUttc2s3ef
FNFb1vsX2N+Cp7HfBP/Gfja/r5yyEXsC94/GPha80Iie9H45apB7RbwZ+wTX
JL4p84c9Y+98BV7DfgoMJX9NNdbyzDy7tiL40R61Vz3jU3K9beLb/se1DcTe
sUewX61F3JpYQu4Srs1OUfPW/k7wFvZzYATxbvgnu7egexE9aW/aE/bG5dU4
20FgJfv7JjnLU+zJu0X0hL3hGXgWH1hTPHsWGE/+5/jXeJbWMP7WMmxzLmqE
JqgN88wh3ht/EfZCsJh42RSxa0Eb8ZuL4F739yDWGpvP356wN+RMuXMOmIZ/
bi20Q064SL7L/SAHyUVytFx9lP2DfSDPHI49CHzSiBq31tUwtWxm3k814sdy
VRnPmu03N6Jn7J0e1hR2j6b4lgXgduJLCZ6mloHXfR7rnZHrz9ocyrVtKTRM
LZOj5Wo1S+3aUY38IdYM9m/Awbm+nsNeWY2zGg5eqQfn9cn1IFf8E7RgjwVP
l8Epcouao/a8XYuYe7CMeL9acKuarrZP8Z0roSlqi5rSOfPHVOx1PP+n5J6m
JtSDs+U6+/kc1875crrcPrwWvSnnz8B/sgzuk7++rIVGdsz94NnJqXLrGPAW
9m/JvyTz0df4P2EPR5J7Htjb+uTa0ZXQALVAzVf7h4BHid2Hfxb2meCNWnCK
3OIM4iziDOIsIqfJbT2K6JUR4O/1mHmcfdTvFrW8GvowFGythkaqlWrC+lpo
hL0rR2/H3lyL5xtXO1ZmPnePF5Zxpp6tHPI6z1tN/Li832rn1CJmFWuyFfsJ
4idWQqPV6lWZT/3etdhdmqIWb3D+oR73aAp7vvuDfy6YWYka2RPSbuWewyrB
oXKpGtE3zxOe5VNZj+SAN3jX8VzrqXbaE+4t682ohKaqre6Ze+cZeVbWRNes
/2rRhqy37qF7uYGcx7GXgoHE1zdC+3zmy8Snc+3jFD1j7zgTrs/87Oy3jfVO
T9Ez9to04ltT3HMc+UeUwb3ysbOez/BZcrxc3z2ftzOis6KapXapMZ3I3cS1
gSk0/DPeZxzxthQa28XZiWeMynpubW+vRm14j/fKIXKJHC/XW/MXZD2Xy9Uo
9elK+bUIaF8I+hYBbb/Rb+2X9c16+RT/mUacjXu6pRo96vlZQ4vkoiJm51+C
DmXUWHPeL7nmyjwf+n6nYvcsQlvVvK3k/rUeXKOGqCXO9NOyntgr1ry1bY3b
a/bckHzear0z561Zn5YVoblqrzOes549aW9a09a2PT45r2fvOOM6624EDgFq
tFrtGU8sQxPVRmdSZ1Nr3Fq3xq3148uoFWtG7XdmdXZVI3dpZS24Ro6Ra1qd
oSpR0zvxR5Xx7BdAWYtvaM/9qFYcSX91UavAnfXQXLVXzVa7d2lErndnyzOa
ot/l9GHYR5Yxqy5Pob3zq7GWHLumHjO1s7Uzv7O/Z+hZemaenTOIWunM4ezh
TO1s/Tf7rxYzmrOaM5Wz1abMT3Km3KlGjc71Ivc4Mzo7OsM5yzmzObtZo93L
4Fy5V85UCFvy7yM1RC1Zm89fDVQL5Qi5Qo6Ra54FJzs7+Dxi/tjcI8WM6ax5
FNfWYj8G3uNZx5RhyxEf4XduhHbLQbtj71WLb3XGctZqZr0ixczg7PBhLZ41
FWwsYwZwFvAd2vEfyXxrD9+L/3/TorPn
"]]}]},
{RGBColor[0.4469614204134562, 0.3243784188547126, 0.7452386632427406],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlFtoznEYx//8/u9vQyGHMiuyCzco5oZp7UhGqW1YomS1g+POoywlo6zE
lUN2QGHMDa24kPPFMhRu3JBSivdC4UJq4/PteS7+Pd/3eZ/fc/w+z5L6lppD
U5Mk6eULfDfTJCmakiSnYpIUTEuSJnBFbpK8Ql8NziIvRbMZAf/mvzrwF/Bo
NJvX4J+pva3KJEkLjrvx3YwsxWYM/B38KcfwB+R69G/Ak+iv8bsL3I8sUwxw
qeKT6HxwGfIbfveAC7E/mmNYOsVTXOWe5b9R2eP7ATaXwQXgSXAONn+QB6Ph
CvwPe+1jyOPuU75nYnME3Ia/fL46cB5yN3nkgXchP2ZMvxB9lfdEvfkXrK4J
ZAN+suDl+F/kPjuC1aO6evCxLDUb2e5y/yfQr0X/C7wP/bjPoh/80mtcHS0n
5aBcWoP5V+6d4GPg2eDH4LvgVdF6qt7uBzeAl+KzA1wDngtuBT9ze71767EU
cx3/PQd/DuZX/ruC1aO4it/tcRX/Hn08Db6D3MDvavBf8lzh9aruQfR94PPB
8lPcJ+AXvBkEP0IW87se/IO3O5xL4tF+ejUD3JexN3r7FXkz2NwfIvc4xzST
Iu9nJXJlNJth9CUeV3VP+uyWYrMiWm7K8YDPUbk3Imv4avnGvT/i3e1gOT8N
Nm/ZlyMP8zaf3m4Hbwz2vj0Yj8W3ncF2Q3UtwKbE660PVptq1MLu9Z06F6zv
6vNQMP6JA1uQVzPGH/H0ZLT5NuOz0vl2Bnkbjs4Rz8HFubY797FNovkR3zuj
8WFrapwQrk3tt7D40uZ1bUsthmKJUx0etzE1voq3uiUjvmu6N5qlalSt7zPG
jenBbpBstJe94DXg66ndF/nRHihX5ax7o/1RXaqvJRq3dT/OBuPeLeRi56q4
ecH5NhKsHtXShJwVbS6b0V/0uDfQd0+1XqlnqlP1tiAnsekRztitVD7q5RXf
X80hYvcOXBXtjmhHBoLNSX1Wvx86V8XHIZ+p8v3qfBY3nzqvCqPFVg7iVLtz
SbnPS203t0W7Zeqhbna581D8HfAcdIeavHbNWVwX57Urm/w+qJdZ77lu/ITv
hW72f5Fvwbg=
"]], PolygonBox[CompressedData["
1:eJwtl3mU11MYh7/91pnKKRUlRTkq28mWfTvqEEW7FsvExER7VMqSxlEziUIU
ZYaKtKAmW5tytFBC4SjDKSMq8YeWPyjb83TvH8/5vb+7f++97+d9b8vi4T2G
pZIk+Rsy8GY+SSbzOxrmYh9MJ8kB+BP+gu+hGi7LJcnl8DX2V3Ax9iWwPZsk
PejbHQop38H/nkkoq8//vUy2B9ZS/hEsTIf5KmER9k9QYzvYByNpMwL+Y+yE
9azJh7b2WYadYdFpuJ76jnC0IEmOQD361If7mWskTMF+Cp5hzDH0fRJmYqcK
k6QWnEhdYyiDSTCEPkPh5XzYi7ugFHscZWPhadpMhRdhJpRTNtn22LNhOvbz
sIo5VkJb1nYudIduUI8114de2D2hAXZDmEmfGfaD1dCVui5QSF1t+ISxN8Ih
6g5DY9cOf1B3AA7R9iA8wB6MgrGUPQhjKRsHg+Ew33IILqN8HWN8DO8w5rtw
HN9YFybQtxRG0mYEfI39DWym7Sb4AHs5bMPeCivpuwq+p6waptDnKegLfaAI
+mfCGXlWXrZaMAjug6EwDObCHHiONtOhPt9WD85j7PNhB3Nth52wCxbRdiEM
hiHwE3PXwEnQFLaz999CO8a6CJ6EyfAmbd+CrozRBXpCL+hMXSeoQ11deI0x
5sHLUAE3UdY5fpPf1pK2LeBV5piTDt9YFPfMvWtEXUN4mLpH4CEYB8d75rmw
p+7tsTOK3+C3jKZuDNzOWdzmvafNWtgIG6AXZbfAray5H0xgb0o9Q88S3oP3
oZi5ipNw5+/DHkrfIXAPlMA7zLEMfmXO/XFP3JulUAU18CPsgb2wi7Y7oYi+
/eEcxjxbv2Xu3dAZuyQJPn9Un6PtFFhO3xWZcCaeTQNoWBDurHf3Pdq8Dwth
AXxHWTXksLNwC+P2hmVQBetgPXxJmy+ggjaVueDD+nIBd6awMGiAWqCP6+v/
YP8NN9K3EzSHZrCTsl3eLzUMemP3yYY77F1+DqbDibQ9ARpDE2gIDdRF2v4A
Z2C3gR+xa1wHY+WhH2W3Ql2+uQ5kIFsQfFhfPoW6U+E/+vwLN2HfDK1p0yre
ae/2JNYwMRN8TF/bRNtP4QhjHIU1zPUh/EObf6E1Y7SCM+EsmE3dLNhE3Wb4
nDG2FIQz9CwHcKeK8+GOeddWRy1ail0Fd3gn4VT6toDHYLxQ9hi8wloqoYI+
langw/ryWtp8FPfQvfROeDfeps1b+jEshj7uPZzgXsNprKUlvMDcM2AAdcXQ
hrozYCB2CbTFPjd+k9/2NizJhDW7djVOrVvBNy6HD2GN94myKsvVMBgIJfAE
3zAR5jPGpbXYR5jo3aTsDVhAm4VqtWvLhz10L4flgraqsZ3oW+ndhAmUl8KR
bIiNxsOO6bBG1zo5alMPyrpDLewUzKf968Jc81Nhz937C+BC9SUdfK09VNNu
FmUvRQ1VS/UBfaE5dafAPMaYK9rGVuzh8ACMgtvSIdYdi3nYhd7hbIipR6Pm
q/1qvtr/O2v8DQbQ5m7YwJzrYQZlM3PhG/1WNeGGdNBgtdicwdxhPDyqP1HW
JMZIY6VntCL6mL6mT+gbzalrBuXmDdFH9BV9Wt/eG7XKNbt2NUPtUIMbxTmc
yzPz7NQctUcNUUvm0XZuXJNr20bdVriasa6BwTAoG2KssbYI+45s0ES1cRpj
Ts0HzVK7Poct5ka0uTQbfERf0Yf1ZXMScxPPwLNQ09X2m6FLPmhkg6gZakdV
1GZ9WF8uyYS76R19It4x75p3wLugJhyJMcHY4J3ybjWL2vcp9idwOmtolQ17
6t621sdy4c54d2xj25XRV9QctUeNUWu6YnfLBo3rFzVQLTRGGCvUVLV1Rjrk
Xsaj4emQA5kLmeOY65jjmOsYg43F5iDmIn2gL5RDWUHIUcxV9sVcUc1QO9Rc
tVfNU/vOwT4b/tL3ciGmGFvUSLXSmGXsUvPUPvfg9NjHvmNgNOSoy0M5lMEf
lB2AqxjjylzIWc1dp7G2qcY22jSC31LBN/XRHTHGGGuM6cZ2cz5zP3NCc8Oz
olYbM4wd98Z81Rh+HfZB+hyA/Y4NJ0PTfJjTuc0pzC3UELXEHNBcUB/9PcZI
Y6UxxdhiTmJuYg5jLlMSc4NfsPdAB9baHmozR518iHHGOmOgsVBNVpubxrX4
JvBtYM5r7uubwLdBdXw7mCO9GnOgY7lQLuSm42MsaccYF8IzzPEsLIZFsMQY
lAo5prmmOaC5oDmruas5qblpWTpol++DaenQx77mzObOxgxjh28G3w694WR8
Jw/350IMMZacZK6SCT6oL14L7fMhplXEnMvca1jMXcvUJH0Je2Mm5FTmVhUx
dzSGnRbPzLMzZhm71HS1fR1rWx/fRL6NdlP2cyq8uXx7GXONvYtjrPQNMi6+
OcpjDDOWLaXNklzI2WpizF0bY5CxaFTU+mMxLBu+yW+7HK6Ax6krTYU9d++N
cQviG8q3lGfi2djGtsYQY0lJjJ3meOZ6C2Iu1yET9tY9HpkLbyrfVsY0Y5s5
rrmubwDfAr1iLu4byreUOemvMaYYW7yT3k01tyhqqtqqRqvVavTV8c56d/tG
7fCN5FtJn9Q3y6KWfIW9DTbDZ9HH9XXfnL49u9OmW0F4g/gWuSLulW8+336H
4VA2aILaYM5g7nAn33BXKrxZfLtsibHAHN1cvbe5ju8N6BTfIL5FvEPeJd80
vm3M+c39zZHMlfRBfXF01CY1TW0bFGPT/zARB1c=
"]],
PolygonBox[CompressedData["
1:eJwt0k9oz3Ecx/HPfv/mz0WzycSBA6VctouwQqjh4LdhOTj4uWgyJXOQm7JS
c6FN1GhLlAPWDi4c/Bay0+ZADqb2Q0vKb3NQajw+fb6HZ+/X9/1+vV/fz6fv
d2PlfFdfLoSwBcVYSyFsxqN8CHc9P28MYa4QQk9DCF/VJ2ZPcYN5EP2Wm/gu
qZeXhXCFb8n8CF3GrP5nLJdX5nsfXyLzH8/FYvLHvTr9C/v5Kiwd6hl7K+mz
6jWzAfTQx3GVbjU7SU/Je4c2mSN6k/QfNMo+p1enFzAps4p2vQm+KXqfOy3S
fXqH6MNYkZ31gLroPb+xJ9uZ1qtjAR9lvtXbbTZNz6DBfkCn3ky8aiGdMZ71
vjoi6x7W6LfgGF/VrCZvnedWrC2k3BNmp/T76QF1vecNGMYQHvBtd8eqOii7
he+O7CF6GLdwM5d6cVbOJW/cuW3/Nf0Gm0rpWz/0jlGMocY7h1d295r9oA/q
d+KvXrdecz7dL95zq1qRcxrzubQTd0fpMXzJp3s283XzHMUqvS69D3zfeL6j
6F8o4EIpfb+l+N3Mq/iZ5cb8WpY3q+7i7cBj+rreNvoZPY5P2fnjbpPn1XiJ
F/m0GzN28rc7Vxt6S+l/2EH/B97VaH8=
"]]}]},
{RGBColor[0.549325034022427, 0.5023610980911876, 0.8891231054045676],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtk09IVVEQxo/ee+572k5F3DxIgqgWtRDBSHChCxFECoUoCXKRIKUm8oII
BME/iHsXrkSQFMzsRZBBiCKSO6uVBNbSEMSdoFK/j5nFefOdeXNmvvlmbn3f
0IPB8hDCQ07C+crPO+xnbHUawha4OwNz7wYfxBA+cX9WFsIp/9fi78H/C/8S
pwB+QcKn+EfBj7GVxG2Cu3g3zbnJ20F8M+AW8Br4J6cHfIYd5v014mej8RCf
O8SOuH8Zeztv8Yv4rxPzBP8f4nc5d8HvifnIaQafY79Fwxvgt9HyjIInqddA
njHyXHDvwr/H/6/JOQ5ewNZnht+AH3mtPL6yxOKbEotTjGIbnJs4bjiHD+Wm
nTSsIfZHYpo0En+UNw5XsZnnFJcduLXj/4u9l5kOms/z1DRcwU45/1Jqd/ml
8bxru46vhbpD4P3Melbv0rjOZ6cZFnMh9IJfYu8TP0L8q2i1xaHE2xPvS/1d
yVnOVmJuuSaaQ6HCdqMpbzMT5y+JvVee3dTmJw6ag7RWv9Ly3LXSrHp9f8ax
q6n1on3RvMVB+1Ly3qXfnseo7xrf1Y7Edlc7/Bv8L1q/6lvzE2dxL/pOStcJ
3+F+uLTnbJeWo/EW/23sDe9Xu6A+1e8x/gHXX/nOfJ+lWavrrzkcRtO5wNuK
zHpUr23R8kg/7bHyq873zGahmVT5Hmo351xP7cia9y4NZn239a0Uva5mVfBa
+i47fe7So8O1uoz2TYq/+tj2flVn3fNrDv8BdLZ8Vw==
"]],
PolygonBox[CompressedData["
1:eJwtl3uQ1lMYx9/et3ffdyPTTlHKiHYoMxr3QSm6GHJLS7VFMorKJVPj1oXs
9odqolJsLruZNowuRmKUS4XNrQtSM62MolJp/WHLDKF8Ps7zx2fm7Dnnd57n
Pee5fPfMux6sGJ/NZDLboSV8xB8fwspiJvM2vJDPZBbCTOZmQUVJJjMI2rC5
DHpCD+gPV8OqHN9BA2yAE6AVHOGMP2ADNMBBzvoV5rE2F2pgIdSy9jIsYO05
eBgfHoImbP4G62AtHMPWcchCCyhAEW5g7Xo4kXFrWMr4Dfie8U4Yz1kPwD0w
BvYytwfeYs9K2Ibt7/LJZ31vUeBSYDJ7p8DP7P0J9sMBGMHa7bCOtfUwkbkJ
sI3xdjjCmYdL0m/wt/SHftALekM5a12gHltLYDXj96CZMw5DI77sgDaslcFy
WBZ37F1/w56voY5vFsEkxo/BJMaTS9Ib+pafcpcN8Aw8DTWwEDZxxkY4BE25
NFcTMWAs7GHuZzgAB2ENZ62Gb1nbCguwMR/WY/PjlumNfKvR+Hw3vMTci7AY
6lumO/Fu/vcROrCnPZSWcuel6UzP/oC5D2Ey40n6zXgONDLeAbtgN9yCTxWQ
xWbOu+YtmuEQNMFo5kZBN2ydA50543T4grkvYRd7foQd0AgXs+eiiGlj+zTm
OsEcfJ4LV2HrSrgLRsFJrLWGKtaq4WTG7WAG45nQGk6EPJQU0xv4Fu/gw7vm
BOMj0JmzzogcqIk3Xh42tDUO7oVp8AR0wPdToRNndoS20A72GKMx59rT7JkN
a/gt78PnzH0Gg/FxCFSyNhROYa09DINKGAl3QndsnQt78HUvHMDX/bCe8cf6
b4wXUw6ZS52go+dw5nA4jo1j8Cf8Ba18a/ibb/4ppt80LmrAvKgZDRGTxuZo
vhlVSD7ru2/oW7aEfOD4GmxdC2NhDJzH3PmwBF/rBZtL8inGjfU+7OkL+xjv
hV6Me8MybCw11/lmqrnCGbNhPiyA3cYMjGTPnbCbbz+hRLwJPc1BcxGqGFfD
mYzPiJgytl7lmyVQC3VwNTb6R06am4c5rxn+gqOwhT2bi+kNfIsfGO8sJp/0
bSPffJVNOWlu1nBXzxfSN367j7W9cAia4A58GlGSfNK3G62Z8ea+/aPseSSb
7sC7KOesLp7p2dDItzuMGe6yEroyd3bEnLH3CnOLoI4zFmVTT+gfNrRVZi2D
LLmeK00xNjJqprXTnDf3zXFz3Rwyl8wxc60Ytd6cNrevYK5nIfUoe5U2tT0c
boPBcGs29RR7i2/i21iTrE19WevjW7P2ONzMeGB847fd2NsVVmNjDWyABlhr
zS+kGmutncZZT0YNXB8xYCxcyJkXwGb2bIFh/JZKaM9v7wDNrP0OvXjb3tYy
bA4Kn/TtBrg+fNK3oxEbvqFvaU20Nvpmvp09zF5mj7JX6bO+22PKI0fMlRbR
OyvwZRC0wZey0nQH3oUxaWz6Rr6VNdpaXQ1VMJS1SrjEmgnzmHsW7mBuRDbF
gLFgjbHW3AQDYRxrY+Ep1mbkU0+wN9hD7CXfsWcrbIRNhVQjrBXGTFnUTGun
MW/s/8v4VnJvMNxozWRuWfQMe0dd5JoxbCxPZ67aPXy3PJ9i2ti2xlvr+0Hf
iCljS41yMGqItcQea6815o19a6q1VY2h1rAmWhvNOXNvYPz2vnF2SfQCa6K1
0RpkLTLnzX3v0LvUx+mhgRZETFRETBvbVfEW9ZyxGF6G2kKqUdYqa761fxVz
b8NyWAF/M3cU7uPb+/OpZ7SNHmWvKrKnABNYmwj72fuLscZ4JFwHA6ALMVEO
v6rl4EJ8vyiXNJ5abwZnzCykGBkaMWFsVNsrYQpMLSTNUx89zd72QS7VUmtq
D+xeh08Dosf8EZpN7aZP+nYwtIk9zF7WFLVOzaR2qo270aa21YBqwbWhJddF
LntH3tUszpqZSznfLTSCWuEszjo7nzSZ2mxA3IV36F2q8dR6K+KufRPfxjvy
rvqF9rMn2hvVHLuiJ/4ZmkXt8kM+xbIx3TaXeq691x5oL1RjVEUNsZY0hnYx
Z8wdNYpaRQ2iFtkdWklNq7a9DNuXwk57SS5pJLXSmOidaky1pj3eXq8mU5up
mTpHTBgbamK1sZpB7WAPtZd6R97VudA9nzSKWsWeVBMxYWxY85ojpowte6q9
9XVsvpZN/yP4v4I91l5rz7H3DMXGEGjH+OSSZENbxrSx3Tu0tRpaLa1mnxw1
zlo3NWLPmDV21QjnhWZRu1gDrYXWbGv3gdD6aha1izXcWn4Z48vzqUZtjJ5g
b1BDqCXUzGrn/wCGbcsA
"]], PolygonBox[CompressedData["
1:eJwtkk0vQ0EUhkev3t5a+QybJvoXiGjFRxcWEpJSCQu10AgrGiK1kWiaULXh
LwipSBtBpJYaG0ufCUmLPyBEwhbPybmLJ/POe87MmZkzwUQytugxxgTBC5Zt
jAcCljFx5lHGWRIC6A0SZtAJeMW/wmuqNWaM/BgcEN+HeTd/j7EFvxnWyM/g
rTK+s2auxpgS/g36FjrxO2AKVsjzE+tH98Ene0bxbPQ2e+bgDHrxTokt+fSs
b+g4ehoi6CQ1Uow+5g60O9TB26ReBV11dL3sc85+JbiABuL1EOUMZWIv1H2G
J+hyvUdL7yJ3apT7o8ct9SVex/ph/BE4okYY75i9C1CENPF1wdYzZdF/8Auj
5C/j3RPb5dw7YNt6x5RPzyM1Hhi78UOQcd8tgM7JO0GRfQpw4tH6Q6zdYp6F
BbdH0tsw8xDc2fpm8nYf7ppr9Df6B0KW9kH6MYCOWNpj2SePl0cfQpvfmFb4
cvs86NV/JOeXe0ygJ6EKFeix9S/JnyrTk0tH30rqyzn+ARDvUbI=
"]]}]},
{RGBColor[0.6284240155596204, 0.6313647194949296, 0.910971494117921],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtUrFKA1EQXDfvXWwDorYWFsHGRkjjgV3KcCAcCCmCjYVaCpb+gFVKiYIg
go2fEEhqsRTUQg2cYuUXOMNsEd68vdnZnXnZGJ1WJ25mO/i18LvNZts8UVxO
Zs/AjvMNH6fAHeCqEH5H7QG8TeB79BW4D4BLnB/g1Utmj+B2cN9D/QWcGvcZ
8Ddqa0mYtR/X3Dk4l1ma567Z3KEPzmEhzL2uwFkF3gdn0ZIO9SpXfYzzM+ol
+g5wXweeuHSpz91fw1cPnDo4F1k97KX2PDK5c3kmn33jmMVdepEJcyojh78s
LWpy/nXgoSsLZvLrypr6zGDhqk/xPYf3btKd9caVHXejv0nsTO0mMmf2N6HJ
9xwGh/7Owjsz5ltyZ75nE3P5VilLZ1YoX3ocuPxTk9pbbbMV4F3go7b8PqHv
ODBr3dif79aPt6Mn/ieo/5Xkn3Pp+x//KlAM
"]], PolygonBox[CompressedData["
1:eJwtl3usz3UYx39+39/5nUPRNBqhnBj1h0tFo5R7K5UKc8udCl0sLRRKtBVG
keZYhc3RH7lsOSqU0NLVpQutI5amVuTS5rCE6fXq8/zx2j6/z/dzf57n/Ty/
8jGT+j2Zz+Vyu6EAh0tzuV+gGg5ARVkutxSa0m4GHWjfDG2hHVwPreEI/Oa3
klzuJthTzOX2Qn/6+kH92rnclXADfdfDZtbaAnMZ+wqM4xAPwwP03Q89oRf8
wNjv4UHG9IOt8DFUM/YAfED7ffiG9i74nDk7YRtshzeYuwR2cLlPYRFneQ0a
8u0q2EhfFRyl7xg0Z61r4SvmfA05+i4x7hz863iognWwvjSd2bOPgbHwEsyB
tayxDl6HxSWpz29X0q4PGW9RgPn0zYP36NsA5zjLP3CKff8uS2/gW3SB22Eo
fUOgEXMbw63M6QzdoDts58zb4JLG5HdraAVtoC00hkZQh7mXQQ1rnobjcAJ6
uyfcAV2hkr5V8DYsh7PMPQNzac9zPO1e0Iy1roF7aPeBFrRbwp+c5Q8YSd8o
uIc1+8AZOAt3cs7ecB/0haEwBEbBaLg845xZ2tO9C6yVwf30PZClO3m38/Rd
gB94y+/zyUf0lQ6MuRlq860OTGHPZ+AE7ZPwBGMehxraZ+BHvu2HZ9n7OegI
HeA26FJIPqPvzGXMPMjTrgXTac8oSz6oL26mvQUOwUFYwNyFMIf27LChtjzA
ntUwmDMMKUljHLsE3oByfTLWOBQ+ejT6/PYrcw/DKNqj/c3eh2Efa+03tljj
5fBxff0KzlqvNJ3Bs+gD+oI+r+9fZO4F+NqYKkl39K7Oce5Ovn2WTzFn7E3i
25PwKIwvS2/2/9txpunwF2OOlSQbaAttpK18c9++KXOaQANj0vPom3CB9kWo
zZ5lMJm+p30f5i6ALezxke/pXWAGzIRKvq2CfXzbD1PpmwJPuYaxxNl7wEzW
ej7u6F1rcbZ8lvZ0b2PUWO0SttdH9VXP4Fm0ubZ/i743YRVU+h0mF5IP6Usv
0p4VNtAW+py+9zBrPBIxa+x6x9pxRs86HEZoK9aoC0UoLUsaoVZ8yB02wSew
FTbwrQp+59tv6qnaVJp8Wt/W5/X9mfFW2kTb6LPTQ6P7h4YfCZtom1dZeyFU
wDJYyR1WwGzWnAOdebNO0A26Z0kjz4WmqC1qgFqgpqgtyxhTAWthXZZyirlF
TVabr2LNhjCVb9OydOdiaHAufKRBvIlvM44xY2EiPKYeQJssvYFvUcG8pbCH
sXvhS/gCBtI3qDT5kL70LnuuCZ/Vd7WZtlvB2OXQwruUpjt2iz3d2zfwLfQB
fWEWfS9AY/quLqY93btNnK0yfMWcZG4yp5nbpsK0knQH77IIFsNwGAaz3StL
OWxH2GBlaIRaYUwYG2qi2jgIBsNK+lYUU442V5/FhmegOd/Ks5SDzcUtGNOy
mO7oXc355v6mrN1EXebbQ8WkMWqNmqV2jQhf3U7fjrK0p3trQ22p5qv9apRa
tT5ypznF3GKNYK1gDjOXjXRNKGfP68wLtO+FurTrRU4zt1kTWBtsj1xfFbl5
N+yKGsBawJiuFT6qr5oDzAXD4m33WWPEHOe2i9pGDamMGsBaoFXk0vnMmZel
GsZapob2af0ezsNqbRw+oC/0jdw2JHKbPq1v94cBWaphqkOz1e7lkWvVNLXN
N/VtT/LtVD5prFprTjW3LjJ2QuPUugn0jYf27HVjIdlU21bG2bShtrTGs9Y7
wZjj8C18V0gaopao8Wr9RuZUwU74HGoYc7qQcry5fjNrbSqmvppYw7X0OX3P
GuZU1IzWjmryvqhxrHWMwYFR81n73QIdS1PNZO00kTNMyKca0VrRmDK2jGlj
e1lo09bQws7s0aks3cm7GdPG9s+0DxZSTWZtdhdz74Z3GLs6YtxYNyeYG3qz
1p35VKNZqzWK2mlA2M4axFrEHG+ut+aw9jDnmnutWaxdrHmtfa2JrY3VZLX5
i9CirlFr+Ya+ZU/oUUw+pW+t5dsaawtzVj7ZQFvsgt1Zqtms3bS5tp8TWqGP
6qveoXdouFp+gr7jWdrDvYyx8qhxrHX2GxNZijlj70D8FzBGjJXz4evGqLE6
Omq1yZH7Fod2qfHLQuPXhg/pS/pk+9AUtWV33MUzeTZrSGtJbagtq+n7Kc7k
2bShtrTGtda1BrYWtga1FjVGTobGqXX/ATRNsvE=
"]],
PolygonBox[{{1865, 1864, 1449, 37, 1839}, {2294, 2293, 1252, 344,
1284}, {1407, 22, 594, 578, 579}, {1853, 1852, 1433, 20, 1835}, {652,
20, 1433, 650, 651}, {1839, 37, 631, 2219, 2220}, {1487, 80, 774,
764, 765}, {589, 588, 592, 22, 1407}, {1930, 1929, 1522, 80, 1901}, {
1732, 344, 1256, 1290, 1291}}]}]},
{RGBColor[0.7036849576721216, 0.752288111889834, 0.9126872117912161],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtkK0OwkAQhJfr0QYEEoUABbYGUUfQTQhBkOAgCBCtwOAQKFIsDlHBE6Bw
JLwACoHAkfAazGRXXPbnvp3buc48H2dORNo4Ac4pFOlXRC5eD/Mz4g1QF/fX
qsgIYI7cg01QZ2CeyFvgPujHiCnqO/IX2L1plugfwNfRXzvVZZ/3W9NsIh+Y
JrU5T513oG9zhwKzS6c61CtstyPixHSoN0RNbzswG9OsRbo3GbJT4+mphzsg
kjid4WzqdCcyZGPzuApVi5rct+F1T/p+mC/+5S9S/os4CzXnP5XGkF2YF3r6
Aw5GKlk=
"]], PolygonBox[CompressedData["
1:eJwtln+Mz3Ucx7/ue9/7fkU0lkZRLhZlzhY1DRF3rViKtopRblESWloUbok2
0Yh+zPkj2tAfoT+66wf9oOVUfpY7bS4tRis6tJ275dd6PLxffzy2z96/P+/3
6/l8vXpWzh43qyiTyXwBxTAnn8m8CJPhSVgNq2AuzIOnSmiHUgbfCleYfBn2
5DKZvZCDYvieMbvgF8b8DOv5/hDqGLsLPmPM57Akm8kshuXwFvxJ20mYyl7T
YBRzRkIzfedhKjwNM+B5WASvQTfG3AiPFjKZ8dCpbSbTGY6z1zFoYM3DUM/3
Ifia729gH997YRtztsMZ1mrKpj1HxZquvYazVENP5twCP9G2pySdybNdhEsw
kTUmQFf27tY2/YP/8gNtP8IgxgyEa5jbDnbStwNqoBbu4q4GwRAYCmPYazT0
Yq3e0Ifv26A/lME9rDkYmhh7Bi7Af3COtn9hP2vugzrYDef417PQAq3wCW1b
YQNshO2wDXpxtt6wibNujDv2rivYsxx6cJaboQt7XA8doCN0o68rtKOvfdt0
5959e+ZeG3fkXRlDxtIw9hoKd0C/fIoBY6EvfbdDX9bsAyfgJDzImAegDAbA
Sv51BbwH78NB9jqQSzFpbJYypycchd/hOeZMz6cxjp3InAkwBSrhdVgES+FN
eAnmwGHm/gqXOdMlmMncWVAFbdCNGhpZlM7gWVYwZiXc7ZvCO4x7F+bT9yrM
p29B4Pei2LvAHnnIQBso4y76Z5Mm1MZF1roAzXA+nzSkloxhY7mWNWrgFHNP
w9u0rYRqWAvtfRvvh74rhfQmvk0Lba25FJPG5iTaJkMVeyyE0/T9A42scSQ0
pbbUkFqyzb5Gxh6BemiAzvR10hOIhRzcz9kq4CEYC3+z11/GAmOmwBussQS2
8L3V+OYMg2EE3JdNMWlsGpPG5reeAT7lX2rgEfZ8WN+AclgOy2AmzPIdmLMa
qmFtNnmcXreTud/BGBgNLdAKc+FlfYE9z5akGDAWrr4hVPO9BrqzRo980rza
VyMVcafe7bI4yw3QxTMxZ3kh3VF9aFStVkYszonYG8/ccTAPXoEsY4pgAXMX
QiNnOgJP0Dchl87gWVbRt7qQYsRYaYIzsJmxH8NvrH0UzkNzcfKYMXHn3r0a
U2vrWWMd9OK7dz69wYjwYL24O303hQd0iT3du0v8a214mx6j17ine+/Q+0qS
xw2JmDA2BhjzsME3hq3ssQVqoDabPKwuPFPvvOoRJcmz9C5zjLlGz+gbntQh
NKW26uk7VJLu1LutpG1KId2hd2mMG+t6tF5tjisNT9abDzL2QCFpUm22Ca2q
SbW5BBaHZqrizrw7Y8RYaQ3v7cnc0mzyJL1JD9PL5kWuNQebi6+Djq7JmCWF
pMlJkTPNncfo+yM01xgerpd/AOvySVNq6xj/drwk5RBzSTlrVUCWNYpCY2pt
OG33wpfeKWzhe7OxxpmrilLOnREaUkutoZXiyP1rQ1u+mW83nb5nC0njav1x
zvRYaFSt6pF65Xb+/aviFNMLIoebywfBwIgJY6Nf5IqhnGVYUYohYymjD8P9
tFWE5+l9ZZEr9Wy9Ww/Si8xR5ipzsrnZM3k2c+a52NO9P4JNoQG1YE1hbXGn
MZJLd+rdGkPGkjWCtYIxYqysi7dYHLGxmzupg32wP5tymLnMO94SHqaXWSNZ
K/lG5fEmwyMHngjNdQ/P0rvM6eZ2c6651xrFWkUNqaUGc1hx8ny9X0/Wm/Ug
vahjxJp36F2qEbXim/g2eobeURta9B/8F2sAawFrEGuRF2B2vPn0yEGnIgeb
i/fHv1tjWWuNjVxgDp4YOXdp5DBzWYs1VknyYL3YHGouNUeYK6wxrTXNaeY2
PVqvnsb3M7lUEzVFDWotas42d7uma3snDVEzWTuVR+6wJrE2scaz1rPmsvaa
FbnEGsJaYm3kVnOQucga2FpYTaktNaSWmsNrrTGtNa1BrUXVtNq2ZrR2/B9T
lIv3
"]],
PolygonBox[{{2030, 2029, 1641, 221, 2023}, {2020, 221, 1627, 2016,
2017}, {1339, 366, 1395, 1794, 1795}, {1332, 1331, 1743, 366, 1339},
{570, 1, 1406, 582, 583}}]}]},
{RGBColor[0.7772828873162543, 0.8518840140066077, 0.9074669676123523],
EdgeForm[None],
GraphicsGroupBox[{
PolygonBox[{{1020, 201, 1013}, {1014, 201, 1053}, {1563, 135, 897}, {
738, 63, 731}, {1632, 201, 1020}, {732, 63, 775}, {1320, 362,
1739}, {1789, 362, 1327}, {1013, 201, 1604}, {897, 135, 934}, {1390,
362, 1789}, {934, 135, 1573}, {1962, 135, 1960}, {731, 63, 1470}, {
1494, 63, 738}, {1327, 362, 1320}}], PolygonBox[CompressedData["
1:eJwtlm1o1lUYh/8+z7NnkzQLJSNJ06WkFS3wJWZpJblRSvkSVBuZk7TMtMgo
yxcwF6QLTa1ofkgDrSBdH9qKNEojZ2G+lNNAM7J0vToNdCNFu67O/eHifzjn
/M99zrnP+f3OwLp5k+fmsix7HwpQ7J5lJXBVSZb1gw9Ls6wJNsImWFTMsoWw
lM4vwXnqzsEZOAs3l2VZBWykzyY4Qfk4XA39YQhjD4bxlKvgHfpsgKGUh0E/
Y9tO7CroYMyT0A6/wTW0DYBK+o4WJl8JVVANfam7AnrBZTAyn2Uj4BJi9IDP
mPM2+IDyZphNn8fhd8p/wFnazsAEYk+ExbQtgqlwPzQwhxUwF+bBcvq+As3Q
Al8wh8/hI/o2QztjnICZ9J0Ff1H3JwyCclhD3Wp4Hhb4pe456GAup+AQYx6E
f+EcdKetDLpBDnbS5yvXRoyesIQxFhuH8t/WsVc9YCDlQfAP/5yGEe4NXMre
9IRO2rrgVhgNecYowKu0NcAwYlxfTDkxN+bAXOygz3ZohhbodA+LaQ2upYm+
W+Bu2u6B/ZT3wQX26CLcQt0oWEvd6/At7DY+MQv59I//Vni2jEFdM7TCLniQ
ugdgEkyGa9mjchgJo2ANc1gNfWm7EsbCGLgBboR62pZBDdTCE9TNLk1zdK7O
0bnujrk10GeFZ4s+l8MPlA/Bi8RaWEg5NtdfU/cNjKd8V8Q09rP0mV9I//iv
a3bt9cR4ObDsnrl399H3XqiBWriDf26HT9njrXCEMQ9DGxyEDvqchO/gezhO
3a/wMxyDPuSsNwxn7BEwn7pnYBo8AjnqusEBxm6DvdTtgVbYBa8xt1XQCOty
6R//3cGcvoQNsB4GUzcEGim/5d2nPABmMKe62AP34hNifezeMtYeOErdj7Cd
2DuKKaeTYg/dy58Y6yispM8qOM0/p6ATunIpp+Z2DOWxMIY+t0EVVBdSDGNt
ZYxtZelMebY2U94CXdAJJcypCFNhCiyAF0qSZo2PHJgL1+haXaNrbQkt8I57
112za/cMehbfg3djj9wrYxjLO7wz1uzazYG5UBOHhoaqpebc3KtRZyPH5loN
VUtr46y4x+61GqKWzGKsx6AOpsMx6n6B0dyhSrgTxsHTxHgqNFFtPEKfw/AQ
/9SUJE1QG9REtdEz4lmZEnvlHfOueUe8KwtC2zxjnjU1Vq2dHnPxDA4PzVF7
pjGHh2EZ1OeT5qg9W/l3W2nKsbkeRFs5VMBN+aSx7aFhapka3RBntjU0Sq0a
F2t9FGbCOmiELdCUTxqv1ntHvCt6hF7hmfRs7qdtX1mKaewnYQ6sgbX5pCFq
iR6ml+k5eo9rcm31zGFZaLRarUar1XqUXqXn6D16pF6pBuYjR+ZqU3jx27De
++XZK01zcm4tocV6tt6tRy8Nj1oeGvW/VhWTl48KrfSOeFf0bL1bz9F7vBPe
jcXs+ZJc8iC9SA/RS6rDe9UEtWFXaPMe2JtPnqQ3XaDvxfBEvXEnfVtzyaN7
hafpbauIvbKYPFqvborcqPlq/0T6TIg72hVjOnZvYvSBGZTrytKZ9eyuj71y
z9376tACNVVt3RtzPQkd+aRpjeHhevmb9HmjkObk3OaF9+sRekX/eNv45vDt
cSy0Vk1Wm/UAvUCP0qvq42zrqXrryPBi30y+nYbS57rS9KbxbeMbx7eOmq62
e2e9u67RtepBepEeppf5BvMt5pvJt1N5vDXUTLVTzVwZa3JtaqBaeIBYbZET
c6Mmq82+udrDQ/SSXLw9fPOdD89pC4/QK3wz+nb0zeHbQ0/QG9RotdocmSvf
mL4118bdaYy7ODPu5py4W/8BhqtqwQ==
"]],
PolygonBox[{{1053, 201, 1632, 1059, 1060}, {1960, 135, 1563, 1945,
1946}, {1980, 1979, 1573, 135, 1962}, {1007, 1006, 1604, 201,
1014}, {775, 63, 1494, 781, 782}, {725, 724, 1470, 63, 732}, {1321,
362, 1390, 1782, 1783}, {1314, 1313, 1739, 362, 1321}}]}]},
{RGBColor[0.8448723213737552, 0.8744232892805365, 0.8771869617236892],
EdgeForm[None],
GraphicsGroupBox[{
PolygonBox[{{1156, 306, 1202}, {2093, 340, 2092}, {1378, 361, 1770}, {
1202, 306, 2280}, {1162, 306, 1155}, {1235, 340, 1263}, {1293, 361,
1734}, {1155, 306, 1661}, {2286, 340, 2093}, {1698, 340, 1235}}],
PolygonBox[CompressedData["
1:eJwtlm1MlmUUx+89b/f9tNJsOWuaaaBOLJdugg0Ke1nCSmeWbRZMTReWqdXS
lb3IF+gLNFGo5uMH7QNpTcEPQS1oiW1iLUE2gTZIpwW2aT7a9gDLZr//zvnw
265d93Vd5zrnOud/7tmvbF+9LRYEQTMk4Kl4EDwJr0IVvBgFwRq4Ox0EU+HR
ZBCUQCIMgiRcZjwKVYw3wxnGv+o7e5PQzlwbtMJx2AXvwTuwA05DN3TBSXgw
FQQLoINxp9Zi+13IMncd8jj7AZgPBfAfa25CDsb8jC63Kdv3s3cmTIN7oBZq
oAIq4U3WbIct8AZM5s6TYJyzJ6AQlrjP8r2RNfvcB/nSQND2wGfwecL2aG8d
3+phNzY+8hgqlnG+xeAcvvTDFObuhDTcBp9guz5uMVAsWlnbAs9w1rOwDErh
IVgItayt8T3ae9xj3QxfwgD0Qw/0QhFrCuF2zr4jZTFQLKbztjOgljU1ujdU
Qxm2l8Msvs1Om091HjPF7mv4Cg7DEb0BZ+fgPmIxE/5m79Wk2ZTtAn+7MWyP
p+yOuutBOORvoLc4y5o+GGbNELzMuAIWc9dF0Ky98ATjx+F75QyMsPdPuAiX
PGaK3SJYHJqP8lU+ybeb3PFfuMEZ/8BvMAgfMPdhwmzI1gDjQTgPv0MXcyeh
iLWFfifdbTk2nvY30lu1s7YNrvDtamQ5olzZw94GKNMe90G+fMqdmqCWovwY
jrHmaMpsyna1v41iqtj2+tt2ey0FxPhWzGpQtbjQc6WUuWVQj406mMLcXdDI
eJ9qg/G9oeWkcvMF9q5J2h11105s/5CwHFWuxpTLkcVAsVBOK7cXMFcAIzAa
2R7tlQ/yJYuNa9IN+AvyWZMH5+EC/MGaS7CR8abIal61v5mzX0taTBQb1YRq
4wvWHIK5nDUvtBqf5jWl2lqK7SJ4DEphljQhNJ/l+9vwFrwOW+B5vq32N9Rb
ZpjbH9ke7V3JeAWMw4THQLGQBkmLVnKnFTCXHJsHp3mPbuiBXijh7sVQBuXQ
D+dgCIZhE3fcCDtgp/KSueswDhPyG1vHYDfjauiGU/AtNr9LWk2rttdhaz1s
g63QCE2uydLmYt0FDkAGWqDV0bhN2h03m7Kdxzg/bjWkWtIdWrxmbngNqBYO
sDYDP8IJNRZicEv9g7tNhefwaRVUQGXCYqhYpvgWJk3zO1xTpC3lrCnzPdo7
BrmExVixvuC5Iw2WFiunlds1rvXSLGlXMeMS1Sk+PBy3nqXeJY2SVuXDHIj4
FnoPmOwxXOcaK60d9dxWT1FvqfJeudVjfcJ9/4ZvbZHlgHJBNa5a74SOyN5c
b6+eqt66xHtNu8deOaPcUY9Vr1UPUS/p9Vy6Btm4aaS0UjWv2pemSlvVM9U7
Kz3WyinlVrnnXgPsjZmmDbgGSgsLsDU/tBxVrurN9HYp7himrSZVm9JkafNO
z9VB185H2Ls0NA2TlkmTpc05f7ufpBmR5bRyWxojrdkF7yeth+dcI7LeEw56
T1JvegnWeo2qVodhyHvcgP9T6N9iPWzwnqTetF+17Jpz2XvEiPeIi36Gzurh
Tmdi9kZ6qxncabrqCt8npa3GVGtao7X659G/z8+s/cXReK3fddhrWzkVec0V
+z+W/rWkWdIuaYy0ptS1Sjmv3N/rb6WaUm0pp5Rbp7z253juSuOkddJwabk0
Xlrf5LWf8VrvY+5sZDWgWpBP8k3/VPq3OsK3w66p0tYNHku9md5OOaBcUEwU
m6znonq+en/GYy0bfd7zrrjGS+v/B99tYH8=
"]],
PolygonBox[{{2092, 340, 1698, 2090, 2091}, {2155, 2154, 1770, 361,
2127}, {1294, 361, 1378, 1763, 1764}, {2127, 361, 1293, 2303,
2304}, {1149, 1148, 1661, 306, 1156}, {2280, 306, 1162, 1206,
1207}, {2108, 2107, 1263, 340, 2286}, {1287, 1286, 1734, 361,
1294}}]}]},
{RGBColor[0.9124617554312558, 0.8969625645544651, 0.846906955835026],
EdgeForm[None],
GraphicsGroupBox[{
PolygonBox[{{1512, 96, 817}, {719, 62, 1465}, {1549, 96, 823}, {768,
62, 1490}}], PolygonBox[CompressedData["
1:eJwtln2QllMYxp/nfffZ5y1sLJsi1bJZtoTQx8wajTFDMyaD4Q+jGUwzGCbG
DDMYoz9M62tjU2HyVahZ9J18tfnYUCIJW2EVpQ+0tsJaCr/f3O8f1zzX/Zzz
nHOe+9znuk7tDbddMaWQJMl8UAEuLCVJV5ok+8El8GuzJCnS4WzQWZkkc3h3
JHwcqM+TZB/xUPhP9H+DAXYTDybeQTwcPg8cRdwPtMKH0WcDbZ+CwfALwCb4
RjAWvoc+Q+i7k3gZ8fRikrzl2GBaMb7x209AD3E3WAv/yDHgV7HelO/PAh2s
dyRrfJC2x8B4+DVgNrw/7euZaxfxeuLPwF74lWBmGn3sO4k+/8H70H8afCY4
Aj4WDKV9MnEBPso1M98txBXwDNwB72G9v/H9MOJVtHfxrg6+j3eN8EZ4k/8G
Ghivg/hp+HE822hvBn3hY8BA2gcQf0t7JxgCT/okyem09RBfRlzk/w/A63nX
znxPMf+PxNtBC/xy0AH/CkyAdzPm5/AvzGce/+i/jgbVxFuJB8G/o/0u+t9N
XEl8LviL8e8nLsHP85/pv534JPgP9K+DT+abb+BbwCT4zawvp/0csJ/v+7Fn
L9E2D5Tg68Aa+AfuOfxOxnwZvgDcA58KWuGvmjP4RtAO/xBshteQjxGMfYj4
aubv5N3H8HVgB7yB+f+G94JT4G28Ww0/kW9GsJ465pxP/Jx9CrEm1zbHnBNP
IX4dvhzcCB/EfGcUokaslWbGWwgfyLtexm8lXkn8pmuGb6LPCbQtcUzipeBt
+Cr/N48xHfs1cBF8Lu+WwVeYA3g9853pgQUTGX8Wfd5JY02uzTPiWVkKritG
Ds3le2AJvBG8An8BZPB2xnwX/r45gl8MWtI4A54Fc2AungEHrHPePQp/Alya
B+TV/lMWczhXm98UQyPUCjVALbiVeC5tL4Lb81iDazme9g18fz44TPwPGJ1F
zVg71qy1O55+D6Vxpj3b5shc+U/+2xrmqKHPs8TX094Enw4/hufsLGre2ldz
1B41QW3wn/13NUgtUqPUKv+pujxGU1kz1I7niW+ify37MZL4X/WSvn1p3wzf
6pzwbYzxq7VGn0WVsWfunZqgNqg5ao9n0LN4L+1VhdAwtcyatDbVQLXQGrFW
3DP3zpq39q1xa92cmTvPgGfBPXVvPSOeFTVZbd5tn1Kcec/+l+BwHnvi3ljD
1rJrdu27iFez3hbi2kJoitqSM0cD8Z/ENVl4ht5hjVqrC+h/Mnwv70aVIifm
Rg1Ty9QotcocmSs1UW00p+bWM+vZVaPVajVQLVSD1WI9Qq/YBh6oCE1UG/Ug
vcgasBbUELVEDVQL1Si1aiU4Fj7LM1DWdLVdj9Pr9DS9TU/Sm+4j/j4NTVQb
u/jnAYXQJLVJjVfr9VC91JqwNtQItUJNVBv1TL3TnJk7NVwtV2PUGj1AL1Az
1A41Sq1Sk9VmPUFvUHPVXs+MZ0fP0/v0AL2gSJ+v06hJa3MM+AV+Kn0Owqfy
fIT4aJ6LS7FH7pV97KvH6rV6rF47g36Pwx8GEwqRM3M3w/Ne9gS9QY1Va7eQ
r5/TqAFrwZqz9vaYk1KswbV0Ex+qiBqz1qwxa00NUUvUOLWuihwNdx73IAvP
1/v1DL1DjVKr1AC1YC3PJ9PYY/e6im/+ID4I8ixq3to3R+ZKj9Pr9Cy9q5d3
p/Ht78QTS+E5eo+arDar8Wq9HqaX6Sl6i2t0rXqcXqdn6p1qkFrUTJ9xeXiU
XqWH6qXmxNx4R/CuYE7MjTk0l+bYXLsH7oWeqDcuUrPz8Ai9Qk/RWzwTng1r
1tp1z9w77xyN5TuLdxdzYm68Q3iX8A7jXcaasDbUfLVfz9K79DS9zTuhd0Pv
QN6F3BP3Rk1QG8yxuTaH5vJ/SRJqAA==
"]],
PolygonBox[{{1486, 535, 408, 62, 768}, {1490, 62, 410, 417, 1900}, {
1465, 62, 408, 407, 712}, {2237, 532, 410, 62, 719}, {1896, 415, 424,
96, 1512}, {817, 96, 431, 538, 2258}, {864, 433, 431, 96, 1549}, {
823, 96, 424, 536, 1518}}]}]}}, {{},
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{1834, 572, 585, 658, 668, 705, 2230, 712, 1465, 719, 2237,
726, 733, 776, 783, 1529, 1933, 1904, 1900, 1490, 768, 1486, 773,
828, 836, 871, 878, 917, 924, 944, 951, 969, 976, 1008, 1015, 1054,
1061, 1080, 1087, 1097, 1105, 1117, 1124, 1142, 2265, 1149, 1156,
1202, 2280, 1207, 2285, 2084, 2272, 1169, 1176, 1681, 1214, 1710,
1247, 1731, 1283, 1750, 1365, 1403}],
LineBox[{1849, 1430, 647, 1456, 1868, 1842, 2223, 640}],
LineBox[{1940, 1914, 1909, 1889, 2244, 754, 761, 804}],
LineBox[{2126, 2297, 1287, 1294, 1764, 2148, 1757, 1372}],
LineBox[{2162, 2155, 2127, 2304, 1301, 2311, 1308, 2318, 1315, 1322,
1784, 2169, 1777, 1385}],
LineBox[{2217, 2210, 1831, 2203, 1824, 2196, 1817, 2189, 1810, 2182,
2141, 2332, 1352, 2337, 2108, 2286, 2093, 2092, 2091, 2279, 2079,
2072, 2065, 2058, 2051, 2045, 2039, 2032, 2025, 2022, 2019, 2013,
2007, 2000, 1993, 1987, 1975, 1969, 1959, 1953, 1926, 1920, 1518,
823, 1549, 864, 902, 910, 1580, 1981, 1963, 1961, 1947, 2258, 817,
1512, 1896, 2251, 1882, 1875, 1863, 1856, 1838, 576}],
LineBox[{2291, 1276, 1240, 1703, 2098, 2103, 2291}],
LineBox[{2325, 2134, 2175, 1797, 1341, 1334, 2325}],
LineBox[{2343, 1358, 1271, 1724, 2114, 2120, 2343}]},
"14000"],
Annotation[#, 14000, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{575, 1837, 1855, 1862, 1874, 1881, 2250, 1895, 1511, 816,
2257, 1946, 1960, 1962, 1980, 1579, 909, 901, 863, 1548, 822, 1517,
1919, 1925, 1952, 1958, 1968, 1974, 1986, 1992, 1999, 2006, 2012,
2018, 2021, 2024, 2031, 2038, 2044, 2050, 2057, 2064, 2071, 2078,
2278, 2090, 1698, 1235, 1263, 2107, 2336, 1351, 2331, 2140, 2181,
1809, 2188, 1816, 2195, 1823, 2202, 1830, 2209, 2216}],
LineBox[{639, 2222, 1841, 1867, 1455, 646, 1429, 1848}],
LineBox[{803, 760, 753, 2243, 1888, 1908, 1913, 1939}],
LineBox[{1371, 1756, 2147, 1763, 1378, 1770, 2154, 2161}],
LineBox[{1384, 1776, 2168, 1783, 1321, 1314, 2317, 1307, 2310, 1300,
2303, 1293, 1734, 1286, 2296, 2125}],
LineBox[{1402, 1364, 1749, 1282, 1730, 1246, 1709, 1213, 1680, 1175,
1168, 2271, 2083, 2284, 1206, 1162, 1155, 1661, 1148, 2264, 1141,
1123, 1116, 1104, 1096, 1086, 1079, 1060, 1053, 1014, 1007, 975, 968,
950, 943, 923, 916, 877, 870, 835, 827, 772, 1485, 767, 1489, 1899,
1903, 1932, 1528, 782, 775, 732, 725, 2236, 718, 1464, 711, 2229,
704, 667, 657, 584, 571, 1833}],
LineBox[{2290, 1275, 1239, 1702, 2097, 2102, 2290}],
LineBox[{2324, 2133, 2174, 1796, 1340, 1333, 2324}],
LineBox[{2342, 1357, 1270, 1723, 2113, 2119, 2342}]},
"12000"],
Annotation[#, 12000, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{574, 1836, 1854, 1861, 1873, 1880, 2249, 1894, 1510, 815,
2256, 1945, 1563, 897, 934, 1573, 1979, 1578, 908, 900, 862, 1547,
821, 1516, 1918, 1924, 1951, 1957, 1967, 1973, 1985, 1991, 1998,
2005, 2011, 2017, 2020, 2023, 2030, 2037, 2043, 2049, 2056, 2063,
2070, 2077, 2277, 2089, 1697, 1234, 1262, 2106, 2335, 1350, 2330,
2139, 2180, 1808, 2187, 1815, 2194, 1822, 2201, 1829, 2208, 2215}],
LineBox[{638, 2221, 1840, 1866, 1454, 645, 1428, 1847}],
LineBox[{802, 759, 752, 2242, 1887, 1907, 1912, 1938}],
LineBox[{1370, 1755, 2146, 1762, 1377, 1769, 2153, 2160}],
LineBox[{1383, 1775, 2167, 1782, 1390, 1789, 1327, 1320, 1739, 1313,
2316, 1306, 2309, 1299, 2302, 1292, 1733, 1285, 2295, 2124}],
LineBox[{1401, 1363, 1748, 1281, 1729, 1245, 1708, 1212, 1679, 1174,
1167, 2270, 2082, 2283, 1205, 1161, 1154, 1660, 1147, 2263, 1140,
1122, 1115, 1103, 1095, 1085, 1078, 1059, 1632, 1020, 1013, 1604,
1006, 974, 967, 949, 942, 922, 915, 876, 869, 834, 826, 771, 1484,
766, 1488, 1898, 1902, 1931, 1527, 781, 1494, 738, 731, 1470, 724,
2235, 717, 1463, 710, 2228, 703, 666, 656, 583, 570, 1832}],
LineBox[{2289, 1274, 1238, 1701, 2096, 2101, 2289}],
LineBox[{2323, 2132, 2173, 1795, 1339, 1332, 2323}],
LineBox[{2341, 1356, 1269, 1722, 2112, 2118, 2341}]},
"10000"],
Annotation[#, 10000, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{573, 1835, 1853, 1860, 1872, 1879, 2248, 1893, 1509, 814,
2255, 1944, 1562, 896, 933, 1572, 1978, 1577, 907, 899, 861, 1546,
820, 1515, 1917, 1923, 1950, 1956, 1966, 1972, 1984, 1990, 1997,
2004, 2010, 2016, 1627, 1052, 1073, 1641, 2029, 2036, 2042, 2048,
2055, 2062, 2069, 2076, 2276, 2088, 1696, 1233, 1261, 2105, 2334,
1349, 2329, 2138, 2179, 1807, 2186, 1814, 2193, 1821, 2200, 1828,
2207, 2214}],
LineBox[{589, 1407, 579, 1406, 582, 655, 665, 702, 2227, 709, 1462,
716, 2234, 723, 1469, 730, 737, 1493, 780, 1526, 1930, 1901, 1897,
1487, 765, 1483, 770, 825, 833, 868, 875, 914, 921, 941, 948, 966,
973, 1005, 1603, 1012, 1019, 1631, 1058, 1077, 1084, 1094, 1102,
1114, 1121, 1139, 2262, 1146, 1659, 1153, 1160, 1204, 2282, 2081,
2269, 1166, 1173, 1678, 1211, 1707, 1244, 1728, 1280, 1747, 1362,
1400}], LineBox[{618, 1417, 613, 611}],
LineBox[{652, 651, 1458, 696}], LineBox[{985, 981, 1613, 1038}],
LineBox[{637, 2220, 1839, 1865, 1453, 644, 1427, 1846}],
LineBox[{801, 758, 751, 2241, 1886, 1906, 1911, 1937}],
LineBox[{1369, 1754, 2145, 1761, 1376, 1768, 2152, 2159}],
LineBox[{1382, 1774, 2166, 1781, 1389, 1788, 1326, 1319, 1738, 1312,
2315, 1305, 2308, 1298, 2301, 1291, 1732, 1284, 2294, 2123}],
LineBox[{1540, 852, 888, 1558, 856, 848, 1540}],
LineBox[{1667, 1184, 1218, 1685, 1188, 1180, 1667}],
LineBox[{2288, 1273, 1237, 1700, 2095, 2100, 2288}],
LineBox[{2322, 2131, 2172, 1794, 1395, 1801, 1345, 1338, 1743, 1331,
2322}], LineBox[{2340, 1355, 1268, 1721, 2111, 2117, 2340}]},
"8000"],
Annotation[#, 8000, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{1399, 1361, 1746, 1279, 1727, 1243, 1706, 1210, 1677, 1172,
1165, 2268, 2080, 2281, 1203, 1159, 1152, 1658, 1145, 2261, 1138,
1120, 1113, 1101, 1093, 1083, 1076, 1057, 1630, 1018, 1011, 1602,
1004, 972, 965, 947, 940, 920, 913, 874, 867, 832, 824, 769, 1482,
764, 774, 830, 1522, 1929, 1525, 779, 1492, 736, 729, 1468, 722,
2233, 715, 1461, 708, 2226, 701, 664, 654, 581, 1405, 578, 594, 661,
1437, 597, 592, 588}], LineBox[{610, 612, 1416, 617}],
LineBox[{636, 2219, 631, 1423, 634, 684, 1449, 1864, 1452, 643, 1426,
1845}], LineBox[{695, 1457, 650, 1433, 1852, 1859, 1871, 1878, 2247,
1892, 1508, 813, 2254, 1943, 1561, 895, 932, 1571, 1977, 1576, 906,
898, 860, 1545, 819, 1514, 1916, 1922, 1949, 1955, 1965, 1971, 1983,
1989, 1996, 2003, 2009, 2015, 1626, 1051, 1072, 1640, 2028, 2035,
2041, 2047, 2054, 2061, 2068, 2075, 2275, 2087, 1695, 1232, 1260,
2104, 2333, 1348, 2328, 2137, 2178, 1806, 2185, 1813, 2192, 1820,
2199, 1827, 2206, 2213}],
LineBox[{800, 757, 750, 2240, 1885, 1905, 1910, 1936}],
LineBox[{984, 980, 1612, 1037}],
LineBox[{1368, 1753, 2144, 1760, 1375, 1767, 2151, 2158}],
LineBox[{1381, 1773, 2165, 1780, 1388, 1787, 1325, 1318, 1737, 1311,
2314, 1304, 2307, 1297, 2300, 1290, 1256, 1250, 1713, 1252, 2293,
2122}], LineBox[{1410, 603, 671, 1440, 606, 600, 1410}],
LineBox[{1444, 676, 746, 1477, 679, 673, 1444}],
LineBox[{1473, 744, 785, 1497, 748, 741, 1473}],
LineBox[{1539, 851, 887, 1557, 855, 847, 1539}],
LineBox[{1592, 989, 1041, 1618, 990, 988, 1592}],
LineBox[{1598, 997, 1047, 1624, 1001, 995, 1598}],
LineBox[{1608, 1029, 1065, 1636, 1032, 1026, 1608}],
LineBox[{1666, 1183, 1217, 1684, 1187, 1179, 1666}],
LineBox[{1272, 2287, 2099, 2094, 1699, 1236, 1272}],
LineBox[{2321, 2130, 2171, 1793, 1394, 1800, 1344, 1337, 1742, 1330,
2321}], LineBox[{2339, 1354, 1267, 1720, 2110, 2116, 2339}]},
"6000"],
Annotation[#, 6000, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{635, 2218, 630, 1422, 633, 683, 686, 2239, 1884, 1503, 797,
1538, 850, 1554, 890, 929, 1569, 892, 1556, 854, 1542, 1935}],
LineBox[{587, 591, 596, 1436, 660, 593, 577, 1404, 580, 653, 663, 700,
2225, 707, 1460, 714, 2232, 721, 1467, 728, 735, 1491, 778, 1524,
1928, 1521, 829, 1519, 831, 866, 873, 912, 919, 939, 946, 964, 971,
1003, 1601, 1010, 1017, 1629, 1056, 1075, 1082, 1092, 1100, 1112,
1119, 1137, 2260, 1144, 1657, 1151, 1663, 1158, 2267, 1164, 1171,
1676, 1209, 1705, 1242, 1726, 1278, 1360}],
LineBox[{609, 1413, 615, 1443, 675, 745, 1476, 678, 1446, 621, 1415,
616}], LineBox[{694, 692, 763, 1481, 698, 690, 649, 1432, 1851, 1858,
1870, 1877, 2246, 1891, 1507, 812, 2253, 1942, 1560, 894, 931, 1570,
1976, 1575, 905, 1565, 865, 859, 818, 1513, 1915, 1921, 1948, 1954,
1964, 1970, 1982, 1988, 1995, 2002, 2008, 2014, 1625, 1050, 1071,
1639, 2027, 2034, 2040, 2046, 2053, 2060, 2067, 2074, 2274, 2086,
1694, 1231, 1718, 1265, 2327, 2136, 2177, 1805, 2184, 1812, 2191,
1819, 2198, 1826, 2205, 2212}],
LineBox[{799, 756, 1479, 688, 1451, 642, 1425, 1844}],
LineBox[{983, 1589, 979, 1591, 987, 1594, 955, 1583, 953, 958, 1595,
992, 1620, 1043, 1617, 1040, 1615, 1034, 1611, 1036}],
LineBox[{1367, 1752, 2143, 1759, 1374, 1766, 2150, 2157}],
LineBox[{1380, 1772, 2164, 1779, 1387, 1786, 1324, 1317, 1736, 1310,
2313, 1303, 2306, 1296, 2299, 1289, 1255, 1249, 1712, 1251, 2292,
2121}], LineBox[{1409, 602, 670, 1439, 605, 599, 1409}],
LineBox[{1420, 626, 681, 1448, 628, 624, 1420}],
LineBox[{1472, 743, 784, 1496, 747, 740, 1472}],
LineBox[{1498, 788, 842, 1533, 845, 1535, 792, 790, 1500, 787, 1498}],
LineBox[{1505, 808, 858, 1544, 810, 806, 1505}],
LineBox[{1597, 996, 1046, 1623, 1000, 994, 1597}],
LineBox[{1607, 1028, 1064, 1635, 1031, 1025, 1607}],
LineBox[{1654, 1132, 1194, 1672, 1134, 1130, 1654}],
LineBox[{1665, 1182, 1216, 1683, 1186, 1178, 1665}],
LineBox[{1674, 1199, 1226, 1691, 1201, 1197, 1674}],
LineBox[{1687, 1221, 1258, 1715, 1223, 1219, 1687}],
LineBox[{2320, 2129, 2170, 1792, 1393, 1799, 1398, 1803, 1347, 1343,
1745, 1336, 1741, 1329, 2320}],
LineBox[{1353, 2338, 2115, 2109, 1719, 1266, 1353}]},
"4000"],
Annotation[#, 4000, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{608, 1412, 614, 1442, 674, 1474, 739, 1471, 742, 1495, 777,
734, 727, 1466, 720, 2231, 713, 1459, 706, 2224, 699, 662, 1434, 659,
1435, 595, 590, 586}],
LineBox[{622, 1418, 619, 1414, 620, 1445, 677, 1475, 749, 786, 1499,
789, 791, 1534, 844, 1532, 841, 1531, 843, 1551, 882, 840, 839, 1530,
838, 1523, 1927, 1520, 837, 872, 879, 918, 926, 1581, 945, 963,
1587, 970, 977, 1009, 1016, 1628, 1055, 1074, 1642, 1081, 1643, 1088,
1089, 1647, 1098, 1646, 1099, 1111, 1118, 1136, 2259, 1143, 1656,
1150, 1662, 1157, 2266, 1163, 1170, 1675, 1208, 1704, 1241, 1725,
1277, 1359}],
LineBox[{629, 1421, 632, 682, 685, 2238, 1883, 1502, 796, 1537, 849,
1553, 889, 928, 1568, 891, 1555, 853, 1541, 1934}],
LineBox[{693, 691, 762, 1480, 697, 689, 648, 1431, 1850, 1857, 1869,
1876, 2245, 1890, 1506, 811, 2252, 1941, 1559, 893, 930, 935, 956,
1584, 936, 1574, 904, 1564, 903, 911, 937, 938, 961, 1586, 1994,
2001, 1600, 1002, 1048, 1049, 1070, 1638, 2026, 2033, 1645, 1091,
1649, 1109, 1135, 1655, 1110, 1650, 2052, 2059, 2066, 2073, 2273,
2085, 1693, 1230, 1717, 1264, 2326, 2135, 2176, 1804, 2183, 1811,
2190, 1818, 2197, 1825, 2204, 2211}],
LineBox[{798, 755, 1478, 687, 1450, 641, 1424, 1843}],
LineBox[{1030, 1609, 1024, 1606, 1027, 1063, 1634, 1066}],
LineBox[{1035, 1610, 1033, 1614, 1039, 1616, 1042, 1619, 1044, 1621,
1045, 1622, 999, 993, 1596, 991, 957, 952, 1582, 954, 1593, 986,
1590, 978, 1588, 982}],
LineBox[{1253, 1711, 1248, 1254, 1288, 2298, 1295, 2305, 1302, 2312,
1309, 1735, 1316, 1323, 1785, 1386, 1778, 2163, 1771, 1379}],
LineBox[{1366, 1751, 2142, 1758, 1373, 1765, 2149, 2156}],
LineBox[{1391, 1790, 2128, 2319, 1328, 1740, 1335, 1744, 1342, 1346,
1802, 1397, 1798, 1392, 1791, 1396}],
LineBox[{601, 1408, 598, 1411, 604, 607, 1441, 672, 1438, 669, 601}],
LineBox[{625, 1419, 623, 627, 1447, 680, 625}],
LineBox[{1501, 794, 846, 1536, 795, 793, 1501}],
LineBox[{807, 1504, 805, 809, 1543, 857, 807}],
LineBox[{1550, 881, 925, 1566, 883, 880, 1550}],
LineBox[{1552, 885, 927, 1567, 886, 884, 1552}],
LineBox[{1585, 960, 998, 1599, 962, 959, 1585}],
LineBox[{1605, 1022, 1062, 1633, 1023, 1021, 1605}],
LineBox[{1637, 1068, 1090, 1644, 1069, 1067, 1637}],
LineBox[{1648, 1107, 1127, 1652, 1108, 1106, 1648}],
LineBox[{1651, 1126, 1668, 1189, 1686, 1220, 1257, 1714, 1222, 1688,
1190, 1669, 1128, 1125, 1651}],
LineBox[{1131, 1653, 1129, 1133, 1671, 1193, 1131}],
LineBox[{1181, 1664, 1177, 1185, 1682, 1215, 1181}],
LineBox[{1670, 1192, 1224, 1689, 1195, 1191, 1670}],
LineBox[{1198, 1673, 1196, 1200, 1690, 1225, 1198}],
LineBox[{1692, 1228, 1259, 1716, 1229, 1227, 1692}]},
"2000"],
Annotation[#, 2000, "Tooltip"]& ], {}, {}, {}}}],
AspectRatio->1,
Frame->True,
FrameLabel->{
FormBox["\"Cluster ID\"", TraditionalForm],
FormBox["\"Cluster ID\"", TraditionalForm]},
PlotRange->{{1., 21.}, {1., 21.}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.427869345296829*^9, 3.4278700672927217`*^9, 3.427940104827623*^9,
3.4279428161332893`*^9, 3.42993462182071*^9, 3.429998099542238*^9,
3.430286919438334*^9, 3.430354276156213*^9, 3.430354599441399*^9,
3.430527731892967*^9, 3.430611163834475*^9, 3.4306209184470387`*^9,
3.4306872516482887`*^9, 3.430693233196703*^9, 3.4317318152716227`*^9,
3.431733502922718*^9, 3.431752735463913*^9, {3.431753076379031*^9,
3.431753101261627*^9}, 3.4317532101136303`*^9, 3.4317534404761343`*^9,
3.431822247623958*^9, 3.431840394938738*^9, 3.431898439415605*^9,
3.431998606677246*^9, 3.432003292792615*^9, 3.432098512280713*^9,
3.432100370422125*^9, 3.432177894632423*^9, 3.432249604870224*^9,
3.4322546304648533`*^9, 3.432255588711239*^9, 3.4323330237147303`*^9,
3.4323354768394537`*^9, 3.432339276153305*^9, 3.432357773759585*^9,
3.432361149676798*^9, 3.432362002694961*^9, 3.4324440581862097`*^9,
3.433807295104377*^9, 3.434234700266987*^9, 3.435013913229398*^9,
3.435037995288536*^9, 3.435214744163661*^9, 3.4352663768736486`*^9,
3.4352667311949*^9, 3.435277674092054*^9, 3.4352855166873207`*^9,
3.435354054188163*^9, 3.435355769690255*^9, 3.435365122286645*^9,
3.435376693917138*^9, 3.4353796708783283`*^9, 3.479011936852707*^9,
3.479018210762459*^9, 3.489811895149078*^9, 3.51890745535504*^9,
3.521761261745781*^9, 3.522544496771052*^9, 3.522548144998402*^9,
3.522557919016408*^9, 3.5225583281204348`*^9, 3.522558972109157*^9,
3.531531182484537*^9, 3.531534141701263*^9, 3.5316145045627728`*^9,
3.531622861357184*^9, 3.5316270317757673`*^9, 3.531629519002124*^9,
3.531630108512066*^9, 3.531713244256316*^9, 3.5317760608009577`*^9,
3.531790193220171*^9, 3.531790872712657*^9, 3.5320366206677933`*^9,
3.532039837028208*^9, 3.532054636518783*^9, 3.532124845626565*^9,
3.53560816345518*^9, 3.535608661435293*^9, 3.537097431679014*^9,
3.5374087854909277`*^9, 3.537436910922621*^9, 3.5375205035309553`*^9,
3.537524983972808*^9, 3.5375285134346113`*^9, 3.537848709736844*^9,
3.537939042857273*^9, 3.540983978969162*^9, 3.541051010968864*^9,
3.546671092175836*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{"Sqrt", "[", "citedciting21Data", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.4317528089741707`*^9, 3.43175284574629*^9}, {
3.431752881422594*^9, 3.431752883873406*^9}}],
Cell[BoxData[
GraphicsBox[RasterBox[CompressedData["
1:eJxlV3k4lWkbP5FQkpSMFFHWmOxJ5C4tKEqIlEIhS4k0JVqUpIVzzvs8tpIl
kSVkSypSKZWypMVkSVoMjaWxTEn67m/Gcf4Y1+U613ve53ne+/3dv+U+Cm5+
G90FWCyW1Ni/iFtbwVkHCisP2F81cqLwpYJTqbKdgp+buIvFMwIeQ4HJjjoM
7Kjdq+inTsHczTkvajEF3bysMFf87LMPe0LmUfjEcn7WYEbBUNV7Tt4hAucm
l8X++EIgdkAp3eIXCi7CsuGOeJ8V7vdS+xOBChf1P2tVKczQini1YxOF83rX
cwfwM8dyr1W7M4UJGQvm6bcRYFu0KJ/1OQ0nbckW3ygOeFq2exyw5cLrec0C
B7MZMGpwZ0mFsKFG6HUEyeOC2sm0+CZ1BhQrfr5lrjHA2sJVEXxA4EXssRD3
iRSa+9nSsV8JtLfNPJnvxEDt6bIh/34G5FL07kuvJhBh7D6Hhfddhdc/TphJ
4ULpbI/dghw4pal5zMEiEpSTE0baqyPB5qhVoLQDB1hjf0zmIhnDnfjeWg/Y
SYTAoy2q7+bPJvC3kMa2RY0EXp+YIbC6kEDwbD9TJ2kKf55KTw0cIHDDQ1Jg
2cAYHo4UeP1g+sUq1PBa5fv3laEjBJp3Ki2XNqSwW/xx9JVl9N/15hS8xOp7
xTZSOOFp3j9tFYG9GqaX9NYzoGtdeTXsNwJB9qxkQYlI2DJ0q83VgPvvvp0U
rEbLW1KKCTTs8lVm6gnIj6RnPywnoJD44d3n7QQyfroEaw4RAAXhoeI3BJze
Vo2ms/j1lZbN3HpzCoXRp45NSlYUrjxLHgzAfm26qmGtq0UhcUEA0ecQ0FL/
Lh6waKzelRSSoz965UQyYJo6ddr+Ci70ALR/DA6H3oLkLftsCOgfqbL9TZcN
I/f6tm1eTeGQj0+vID43PuDSxvW9zDifGitqIpODCMwsfy+pP5+C90iy2qkz
BDqjrAv3vCJgG+q8/7UtBWmBv18ZmFC4Pjr83Bhxe19l2THBkcAJgxs1ykBB
0HBY42Q7Ge8Hrw+hlr3N7BIOPBF1mFGeEQZeDQ+WTmJzoUTnnsaRh1wwzS86
/WD03L/r7Sg8CuhczqA+5F+YHfN9QSCOmd0tp03BtCWz0vsC1lllu/B2LQEB
Yc8jBt0EjAXK7l2yI6CdpDTRupeAyU6tzogJFCwvZi/kIE53l8apZn0n0PGq
QK7ZiMKxdDVz2VsEDCf1rc5diHorOXli1XoKaT+j3jsGn4bg77tUnZy48HO1
p9dwLAPBUqnX000IqHP3M57VHGgR+ZrkpkFhoHOiV8H8/+qO95w/khtD/PLH
cNhKIWBkcJcL4mizIyZojSUFkxsyZTGdBCZZ9pd3LaGwIO7ux77lFHxv+flt
xeudlpZODn5j+0UoCPm6HJUq50KuUdvl95Z8voa9u2+1yJpCw7X7zTaIX2Lc
CpN8HQr10moXhxE/qwuKlpWok8pOUen8NRQi7LNebcN+RS8/rteA/ZRvSi0u
LyWwAzpke00phOhGypiiHpIF1c8PTqPQFD/vUokUhdbMw5+K5lLQZvodwoQp
7BNZ4S9jQaFQI1pfGfUxMCvIpU+DAfa2rLztiP/L3zV8NiygUBeWEWvXR8Ba
vSW08FcK/g3L+jaswue8vKz9Cd/rdmfRj2QbCv1HLxZsmzvGb+DXW1p0UDFj
MoXpJjkyx7wJ/KHg7zBTjUJNRaDY1KUUAuOWKsSLor94+R0fuE3gusLp1EeI
q+GVqxJTfhCQu9Ah3mRA4Y70mqiNh9ggmX9DV+0IgXmZjhuSjhIo3Jf5Jhx9
RV4s4YOnIJ43P4/Juk/Af3rQ1BdYZ7aJ5qwljwmoXNs85KZJ4WBV349dTwh8
jbAUk1DC97/m/TYc+d4etvSZyu8E9KKrX37H81ZxtxxzRt/u1yRxGajjp/Bh
eAn6e2vYFN0Q7HODt++ZAeTRZ98551w7GUie3TqBfZ4DHOvqcO8NdNxfPqVw
RltXoG53rgNB7FfyVYUDjfYUkhxmbVuMuN30EuKorEOd+bnaR2Odowkb3/gK
UJjnMJhTPcxAk0/zzBfrCTx/IhPzXolAIDtdYDnq5VeLAcHZ4QS+iW73fKVK
wKYzgZPfQ6C0q7/x1Cx8juTk7oV4XnXG1B4n9IcNGdOVBxZFQtUSsfjhxwx8
mcCSopMo1N4ubJdCHagqFVY0om6XGr8p3I37e4SWGItlIK5fVJM2S2KeGf+1
fIMQhcGnAr52IgQ2vo7W8EkkkPI4TlEN98n2fciVbSbQ1zu1Phd5VTdd6bbe
IgL3a53iV9wk0CtrWkbw/nHzmlOCCQRuSbnUu1ejzyVyWPZVmDNDp/c7Ym4t
uxjyphnPfSEyoO6pQGFxsF5D5qQxPPWQB/uO6qQs5fPrn+838PXD07GLsa+C
kDHiaMbui8a8XSzz3LMFfY+nv2U7lAfykN9bdBemHZXDdaJxr4VCCfhqfVQa
Ql+ZU1FrDB8IJC6zETRHnHNtC9iZ4egr8teGDpSgj017mJN/h0CNYuUZN9x/
0fDOdYUiPs8C6tYO/tZBoMpno8EZMQoKQh93z0IfDxLXjCqRoON+ycN9zhWj
0VI5vh/x1vPyT1jtnWAr5rh50I8zqywYMNPWXbepY8xfIlBXE8UbW+w5oHXf
XV3jIvI/0l7ADXHlvZ9ff4wOG30kQlbxQR/211VSw0xMge9D1pss7g4p/jd3
ef6XpajuskyD7397hVKrE/BcjwOPn9wqIONzjfJb+e5TmgzcFR1K73MiEBn9
7KIOJTCSfdixR5QDZ+1163b7EChTzF2vhfgSM7mcai6+Byt/ZFSA73+8OYrn
Lzy9PPnA1DXl8Hn5T32Yg7KbyqaXi2P+Xt1wew3qpbXY6LbS//kxdq6dw71d
dc5Yx1cj2UT0H9/4lp/Rpxnw/1PZaOZ+1Jfw1npuJhtkHJvuJKQTsPOJdDXp
IrBT4afpc+ynSpJEUPdL3D89aPv2swRC6pyiGMzjEeXnopcRR57f8HKz+KSv
tsiMses65L2O8ObjmG+OZbEW6Vjno30vz2Z8ZcCYLb9gFc4zoQVCj1xlKQxZ
HRbP0eTPlZ/ezvgc2MaBiKZdUcY9YVDreVPhd2vE70Dq+cVSOFcKd3DPfOVC
kIdh6trDyN+cotddKQQuVDYtpoEEAuJvWK51IHB0rnTWU5wrXk5RSxjGvDDj
eMrJ4Dqh7JBXHi1k3J9sX9BX2n/z54njjwwubTUn8NfxXTodn7jQ/fev12Iw
j72511iS6wjs2d9jY4frLsHLdYxaKEgIKa7PseBCVeBQU5c/A/fumnYV93Oh
vmLI3iOfgarlJc3lmAexq5v12egjeVdjTlXtJXAw4UuTWiXyZX1szMqpfH0f
sRaoS8S6kr40fO37g8C+PSUrLmPfw1kZttI4rwgeWmmRhri67PFa9J3hguSg
ancR1t99tzk4bpCBnMbJm90wV1R+ydO3kueCzh71tHhZ/vzI+iV3k9EMPt94
/tH4KCLLAHmSstbfORj1wXVqrnZXwf6X6nhV4HzH83meTnjzemmNWfbZJfz5
pbg1yYQivjVpTIzzWwITswMEBlwJyJTWj9hgDthBxmFvSQIF5qKxUQ/Z0J2W
9+1BKoGVBiKf5ywgMH+PWvsh9L37w4dkjqoRcL91RsM/lYznLE8fP6Rvqndh
7g1+O3fDxIpAm/DmbwoT+HnF8z2ev8iUG09fh3juGf6q9AR1uvDQKgmtj+jr
7y9/jpmPv3e+FU1cpceM51WXnHSzlt5ZMHrwTnXuZwZU7WruSDQy4Pt0SISL
OlEPUd09gvkQo2sak4zniJzYNNtbil9f2V/6CzwxB4v9Ep3LcR7s45xvtRrF
eSOy1/E46nmhvkROPfaFN0+Jpu0or1Dj+/4k55wWB8zftpSUKO0ynAeHQt/l
svF3xZfhiYY93HH//x9abXnq
"], {{0, 0}, {21, 21}}, {0, 1305.203049337535}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}}]], "Output",
CellChangeTimes->{{3.431752822530161*^9, 3.431752846568348*^9},
3.431752884927354*^9, 3.4318222485168324`*^9, 3.431840395858548*^9,
3.431898440236443*^9, 3.431998607847166*^9, 3.432003293025579*^9,
3.432098512469212*^9, 3.432100370997854*^9, 3.432177894894731*^9,
3.432249606142734*^9, 3.4322546320442133`*^9, 3.432255590297181*^9,
3.432333023877459*^9, 3.4323354770719843`*^9, 3.432339276635599*^9,
3.432357773926012*^9, 3.432361149845622*^9, 3.432362002790092*^9,
3.43244405834062*^9, 3.433807295264729*^9, 3.434234701334167*^9,
3.435013914383769*^9, 3.4350379965598383`*^9, 3.435214744332363*^9,
3.4352663772413054`*^9, 3.435266731289246*^9, 3.435277675509091*^9,
3.4352855173857527`*^9, 3.435354055366536*^9, 3.435355771487569*^9,
3.435365122662549*^9, 3.43537669414509*^9, 3.435379671044887*^9,
3.4790119370414248`*^9, 3.479018210860241*^9, 3.489811895289536*^9,
3.518907455539604*^9, 3.5217612618489733`*^9, 3.522544496898897*^9,
3.522548145112117*^9, 3.522557919107492*^9, 3.52255832820759*^9,
3.522558972199951*^9, 3.531531182586833*^9, 3.531534141780389*^9,
3.5316145046417217`*^9, 3.5316228614384117`*^9, 3.531627031887363*^9,
3.531629519084674*^9, 3.531630108593322*^9, 3.5317132443368073`*^9,
3.531776060881404*^9, 3.531790193300867*^9, 3.531790872816433*^9,
3.532036620770862*^9, 3.5320398371313667`*^9, 3.532054636605019*^9,
3.532124845708057*^9, 3.535608167628976*^9, 3.535608661587845*^9,
3.537097431753107*^9, 3.537408785566169*^9, 3.537436911067568*^9,
3.537520503606863*^9, 3.537524984046327*^9, 3.5375285135920143`*^9,
3.5378487098843822`*^9, 3.537939043006688*^9, 3.540983979043816*^9,
3.541051011119471*^9, 3.546671092253549*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"(",
RowBox[{"citingcited21Data", "=",
RowBox[{"Transpose", "[", "citedciting21Data", "]"}]}], ")"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.427765107348876*^9, 3.4277651343516293`*^9}, {
3.427765187759768*^9, 3.4277651964573803`*^9}, {3.427869699638796*^9,
3.4278697080691223`*^9}, {3.42794014018983*^9, 3.427940145444107*^9}, {
3.4279408742492247`*^9, 3.427940900502396*^9}, {3.431735032270121*^9,
3.4317350570420218`*^9}, {3.432180197825964*^9, 3.432180201098778*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "188946", "7157", "8428", "692", "337", "598", "308", "13",
"90", "215", "8191", "1490", "319", "371", "265", "212", "635", "1918",
"2735", "60318", "11"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "8916", "83165", "1773", "4926", "190", "4323", "1982",
"59", "42", "1168", "4795", "254", "81", "53", "13", "1303", "8719",
"1355", "6834", "38548", "7"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "9838", "2329", "43839", "268", "129", "219", "70", "10",
"257", "46", "6357", "788", "53", "83", "12", "167", "366", "1723",
"1236", "12174", "2"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "934", "6428", "335", "571546", "50665", "14115", "20113",
"11878", "309", "5991", "4643", "1219", "508", "95", "110", "2535",
"3457", "4254", "1970", "88621", "1435"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "562", "146", "91", "39515", "403763", "3592", "4418",
"18194", "3243", "1818", "3100", "1222", "3916", "1829", "2011", "1389",
"269", "765", "375", "30036", "19773"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "1011", "6214", "416", "15556", "4829", "85268", "2720",
"984", "202", "1160", "6240", "833", "223", "85", "4", "894", "2978",
"1192", "789", "20303", "213"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "394", "2337", "68", "24422", "7039", "2261", "77685",
"3025", "1033", "2520", "872", "170", "109", "51", "19", "4630", "1267",
"627", "792", "11894", "128"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "23", "81", "12", "11849", "24046", "939", "3887", "67463",
"3095", "1471", "383", "294", "520", "450", "44", "863", "18", "11",
"9", "1596", "129"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "74", "23", "222", "507", "3350", "189", "1034", "2491",
"33686", "1550", "1514", "78", "1761", "391", "949", "616", "98", "496",
"11", "581", "291"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "163", "1618", "21", "7580", "2374", "1276", "2783", "1549",
"1878", "30056", "3465", "195", "946", "316", "115", "65", "93", "35",
"10", "732", "68"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "8033", "4885", "6297", "3722", "3607", "2955", "598",
"309", "1704", "2449", "137796", "8998", "673", "544", "76", "691",
"4516", "1095", "680", "17038", "3426"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "2100", "621", "1090", "1613", "4540", "628", "157", "373",
"310", "284", "10549", "58837", "132", "48", "118", "110", "84", "173",
"125", "8527", "824"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "333", "78", "26", "479", "4727", "282", "68", "379",
"1951", "554", "555", "26", "88752", "3560", "3766", "1800", "1061",
"2825", "91", "5138", "366"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "115", "42", "10", "53", "1824", "60", "23", "287", "192",
"144", "270", "0", "3325", "20155", "529", "204", "789", "178", "49",
"740", "70"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "218", "13", "3", "96", "2394", "9", "24", "22", "982",
"106", "210", "72", "3283", "618", "28792", "29", "9", "64", "22",
"402", "1002"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "144", "969", "117", "959", "1146", "418", "2092", "271",
"487", "53", "384", "99", "1230", "260", "42", "239889", "55372",
"13873", "5175", "78594", "225"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "293", "4423", "65", "422", "99", "1369", "425", "11", "59",
"25", "2227", "14", "593", "848", "22", "37875", "414878", "28591",
"17796", "135450", "13"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "1756", "1018", "1143", "1068", "751", "860", "361", "10",
"442", "17", "425", "24", "1623", "183", "32", "13273", "32923",
"343063", "3549", "123705", "12"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "2839", "6449", "1113", "858", "269", "464", "463", "4",
"16", "12", "570", "38", "60", "62", "17", "5445", "28083", "4739",
"140776", "67304", "3"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "24853", "19638", "4188", "32565", "5057", "8288", "4814",
"200", "210", "104", "7590", "1506", "1513", "528", "157", "53062",
"142398", "94108", "41456", "1703555", "1099"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "17", "14", "15", "744", "25433", "124", "55", "44", "307",
"69", "2460", "605", "192", "23", "1293", "199", "16", "58", "0",
"4115", "241828"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzU9I03EcxvGVlljOQ7KwpdUkhR9pCZUiVPYpgk2nyWgIv01yP/LgJiui
JjPIDGmU1WG1zEVE+GcaNaulmzIrUKRD4GSigqtD0+T7jSRXWCNmPTs8vA7P
4a2SzusaNshksnIse+ppeZ2Tkf3jDlUrvOqud7XBzEvTGdfh/qXEggcKdk/m
AMxZc7Fn8L04vuqDo9+DnUPw2qq4cRhOWquyPkN/gvmbXYzOOQON6geM5F/E
6EQnoy1yd28I2ttzfhY8ZCQ9EYTjcNe0WZ+0feDXi1MwYgu1aWC1Uhc3Q1uj
Z8oCvWdN9Reg2zK52QaLd0ZbmqFgydO+/MYo0G00+mBMxYc1Mk6D6THHh1JO
FV3BRNlRTn13cq2BY5z+vNlbMgqlqsW/b2H/zbQD72CgwtGatP9R+HLkNKcm
NrL8CeqNivxNNZxipYNl6TC15N+JrbDSGbVnwCNz98aT1gx1GA7DrLuP087A
Dmvhigir48qTBrjvVReFofdHT3gGruXfl0eg5PDr1+Hzi7qi7lpOwWWfOemN
lLjYInIq0ByUthk4mWujuXvgrPf3ihqqlSm7K+FXxaF5LVy6NVbM4Gu1Sasw
4r8iKRZN6GxvCKVKnCzC7fVgE6f/gVEEMQ==
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citingcited21DatawithClNames", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Prepend", "[",
RowBox[{
RowBox[{"citingcited21Data", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"ClNames21", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "numClusters"}], "}"}]}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.4318234446695433`*^9, 3.431823516681857*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"citedParciting21", "=",
RowBox[{
RowBox[{"citedciting21Data", "/",
RowBox[{"Transpose", "[",
RowBox[{"citedciting21Data", "//", "N"}], "]"}]}], "/.",
RowBox[{"{",
RowBox[{
RowBox[{"ComplexInfinity", "\[Rule]", "Infinity"}], ",",
RowBox[{"Indeterminate", "\[Rule]", "0"}]}], "}"}]}]}], ";"}]], "Input",\
CellChangeTimes->{{3.42794018657016*^9, 3.4279401934070053`*^9}, {
3.42794023391691*^9, 3.42794023435712*^9}, {3.427940415894403*^9,
3.427940422679227*^9}, {3.4279405230102654`*^9, 3.427940565912154*^9}, {
3.43173509654461*^9, 3.431735104331684*^9}}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"Power", "::", "infy"}], "MessageName"], ":",
" ", "\<\"\:7121\:9650\:5f0f\[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak]\:304c\:898b\
\:4ed8\:304b\:308a\:307e\:3057\:305f\:ff0e \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{
3.427940196075815*^9, 3.427940235170912*^9, {3.427940552399766*^9,
3.4279405664865513`*^9}, 3.427942818939046*^9, 3.42993462494246*^9,
3.429998103646237*^9, 3.430286922324394*^9, 3.430354278978479*^9,
3.430354601396339*^9, 3.4305277342826633`*^9, 3.430611166947525*^9,
3.430620921588822*^9, 3.430687255162512*^9, 3.4306932352135973`*^9,
3.431731817858547*^9, 3.431735106031663*^9, 3.431752738820159*^9,
3.431822249656096*^9, 3.431840397245675*^9, 3.431898441631052*^9,
3.4319986093677464`*^9, 3.432003294435294*^9, 3.4320985144472322`*^9,
3.43210037188251*^9, 3.4321778964069366`*^9, 3.432249609988168*^9,
3.432254643277685*^9, 3.432255592140785*^9, 3.432333024895973*^9,
3.4323354781939573`*^9, 3.432339277921912*^9, 3.432357775099708*^9,
3.432361150932897*^9, 3.432362003838189*^9, 3.432444059513459*^9,
3.4338072962411823`*^9, 3.434234703400172*^9, 3.43501391659801*^9,
3.435037998724102*^9, 3.435214745972967*^9, 3.435266378373972*^9,
3.435266732492875*^9, 3.435277688430705*^9, 3.435285527201934*^9,
3.435354067124248*^9, 3.435355784050611*^9, 3.435365123860317*^9,
3.4353766951941833`*^9, 3.435379672026404*^9, 3.4790119372313337`*^9,
3.479018211036327*^9, 3.489811895550726*^9, 3.518907455846713*^9,
3.521761262048656*^9, 3.522544497071807*^9, 3.5225481454087048`*^9,
3.522557919177968*^9, 3.522558328277815*^9, 3.5225589723209352`*^9,
3.5315311827211027`*^9, 3.531534141867786*^9, 3.531614504715919*^9,
3.531622861572153*^9, 3.531627032058552*^9, 3.531629519237673*^9,
3.5316301087026052`*^9, 3.5317132444453297`*^9, 3.531776061029158*^9,
3.531790193488645*^9, 3.531790872940188*^9, 3.5320366208863688`*^9,
3.53203983724701*^9, 3.532054636727935*^9, 3.532124845790997*^9,
3.53560818073654*^9, 3.535608661789846*^9, 3.537097431899761*^9,
3.537408785729258*^9, 3.537436911205324*^9, 3.537520503851416*^9,
3.537524984189561*^9, 3.537528513715873*^9, 3.537848710023621*^9,
3.537939043136383*^9, 3.540983979196281*^9, 3.5410510112727833`*^9,
3.54667109247351*^9}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"Power", "::", "infy"}], "MessageName"], ":",
" ", "\<\"\:7121\:9650\:5f0f\[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak]\:304c\:898b\
\:4ed8\:304b\:308a\:307e\:3057\:305f\:ff0e \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{
3.427940196075815*^9, 3.427940235170912*^9, {3.427940552399766*^9,
3.4279405664865513`*^9}, 3.427942818939046*^9, 3.42993462494246*^9,
3.429998103646237*^9, 3.430286922324394*^9, 3.430354278978479*^9,
3.430354601396339*^9, 3.4305277342826633`*^9, 3.430611166947525*^9,
3.430620921588822*^9, 3.430687255162512*^9, 3.4306932352135973`*^9,
3.431731817858547*^9, 3.431735106031663*^9, 3.431752738820159*^9,
3.431822249656096*^9, 3.431840397245675*^9, 3.431898441631052*^9,
3.4319986093677464`*^9, 3.432003294435294*^9, 3.4320985144472322`*^9,
3.43210037188251*^9, 3.4321778964069366`*^9, 3.432249609988168*^9,
3.432254643277685*^9, 3.432255592140785*^9, 3.432333024895973*^9,
3.4323354781939573`*^9, 3.432339277921912*^9, 3.432357775099708*^9,
3.432361150932897*^9, 3.432362003838189*^9, 3.432444059513459*^9,
3.4338072962411823`*^9, 3.434234703400172*^9, 3.43501391659801*^9,
3.435037998724102*^9, 3.435214745972967*^9, 3.435266378373972*^9,
3.435266732492875*^9, 3.435277688430705*^9, 3.435285527201934*^9,
3.435354067124248*^9, 3.435355784050611*^9, 3.435365123860317*^9,
3.4353766951941833`*^9, 3.435379672026404*^9, 3.4790119372313337`*^9,
3.479018211036327*^9, 3.489811895550726*^9, 3.518907455846713*^9,
3.521761262048656*^9, 3.522544497071807*^9, 3.5225481454087048`*^9,
3.522557919177968*^9, 3.522558328277815*^9, 3.5225589723209352`*^9,
3.5315311827211027`*^9, 3.531534141867786*^9, 3.531614504715919*^9,
3.531622861572153*^9, 3.531627032058552*^9, 3.531629519237673*^9,
3.5316301087026052`*^9, 3.5317132444453297`*^9, 3.531776061029158*^9,
3.531790193488645*^9, 3.531790872940188*^9, 3.5320366208863688`*^9,
3.53203983724701*^9, 3.532054636727935*^9, 3.532124845790997*^9,
3.53560818073654*^9, 3.535608661789846*^9, 3.537097431899761*^9,
3.537408785729258*^9, 3.537436911205324*^9, 3.537520503851416*^9,
3.537524984189561*^9, 3.537528513715873*^9, 3.537848710023621*^9,
3.537939043136383*^9, 3.540983979196281*^9, 3.5410510112727833`*^9,
3.546671092516391*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{"citedParciting21", ",", "0.01"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.427940615462954*^9, 3.427940621538932*^9}, {
3.427940974421184*^9, 3.4279409915414257`*^9}, {3.431735112528977*^9,
3.4317351197505817`*^9}, {3.432250109845661*^9, 3.4322501326098833`*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "1.`", "1.25`", "1.17`", "1.35`", "1.67`", "1.69`", "1.28`",
"1.77`", "0.8200000000000001`", "0.76`", "0.98`", "1.41`", "1.04`",
"0.31`", "0.8200000000000001`", "0.68`", "0.46`", "0.92`", "1.04`",
"0.41000000000000003`", "1.55`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.8`", "1.`", "1.31`", "1.3`", "0.77`", "1.44`", "1.18`",
"1.37`", "0.55`", "1.3900000000000001`", "1.02`", "2.44`", "0.96`",
"0.79`", "1.`", "0.74`", "0.51`", "0.75`", "0.9400000000000001`",
"0.51`", "2.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.86`", "0.76`", "1.`", "1.25`", "0.71`",
"1.9000000000000001`", "0.97`", "1.2`", "0.86`", "0.46`", "0.99`",
"1.3800000000000001`", "0.49`", "0.12`", "0.25`", "0.7000000000000001`",
"0.18`", "0.66`", "0.9`", "0.34`", "7.5`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.74`", "0.77`", "0.8`", "1.`", "0.78`", "1.1`", "1.21`",
"1.`", "1.6400000000000001`", "1.27`", "0.8`", "1.32`",
"0.9400000000000001`", "0.56`", "0.87`", "0.38`", "0.12`", "0.25`",
"0.44`", "0.37`", "0.52`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "0.6`", "1.3`", "1.42`", "1.28`", "1.`", "1.34`", "1.59`",
"1.32`", "1.03`", "1.31`", "1.16`", "3.72`", "1.21`", "1.`", "1.19`",
"0.8300000000000001`", "0.37`", "0.98`", "0.72`", "0.17`", "1.29`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.59`", "0.7000000000000001`", "0.53`", "0.91`", "0.74`",
"1.`", "0.8300000000000001`", "0.9500000000000001`",
"0.9400000000000001`", "1.1`", "0.47000000000000003`", "0.75`", "1.26`",
"0.71`", "2.25`", "0.47000000000000003`", "0.46`", "0.72`", "0.59`",
"0.41000000000000003`", "0.58`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.78`", "0.85`", "1.03`", "0.8200000000000001`", "0.63`",
"1.2`", "1.`", "1.28`", "1.`", "1.1`", "0.6900000000000001`", "0.92`",
"0.62`", "0.45`", "1.26`", "0.45`", "0.34`", "0.58`", "0.58`", "0.4`",
"0.43`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.5700000000000001`", "0.73`", "0.8300000000000001`",
"1.`", "0.76`", "1.05`", "0.78`", "1.`", "0.8`", "1.05`", "0.81`",
"1.27`", "0.73`", "0.64`", "0.5`", "0.31`", "0.61`", "0.91`", "0.44`",
"0.13`", "0.34`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "1.22`", "1.83`", "1.16`", "0.61`", "0.97`", "1.07`", "1.`",
"1.24`", "1.`", "1.21`", "1.1300000000000001`", "3.97`", "1.11`",
"0.49`", "1.03`", "0.79`", "0.6`", "0.89`", "1.45`", "0.36`", "1.05`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "1.32`", "0.72`", "2.19`", "0.79`", "0.77`", "0.91`",
"0.91`", "0.9500000000000001`", "0.8300000000000001`", "1.`", "0.71`",
"1.46`", "0.59`", "0.46`", "0.92`", "0.8200000000000001`", "0.27`",
"0.49`", "1.2`", "0.14`", "1.01`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "1.02`", "0.98`", "1.01`", "1.25`", "0.86`", "2.11`",
"1.46`", "1.24`", "0.89`", "1.41`", "1.`", "1.17`",
"0.8200000000000001`", "0.5`", "2.7600000000000002`", "0.56`", "0.49`",
"0.39`", "0.84`", "0.45`", "0.72`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.71`", "0.41000000000000003`", "0.72`", "0.76`", "0.27`",
"1.33`", "1.08`", "0.79`", "0.25`", "0.6900000000000001`", "0.85`",
"1.`", "0.2`", "0.`", "0.61`", "0.9`", "0.17`", "0.14`", "0.3`",
"0.18`", "0.73`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.96`", "1.04`", "2.04`", "1.06`", "0.8300000000000001`",
"0.79`", "1.6`", "1.37`", "0.9`", "1.71`", "1.21`", "5.08`", "1.`",
"0.93`", "0.87`", "0.68`", "0.56`", "0.5700000000000001`", "0.66`",
"0.29`", "0.52`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "3.23`", "1.26`", "8.3`", "1.79`", "1.`", "1.42`", "2.22`",
"1.57`", "2.04`", "2.19`", "2.0100000000000002`", "\[Infinity]",
"1.07`", "1.`", "1.17`", "1.27`", "1.07`", "1.03`", "1.27`", "0.71`",
"0.33`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "1.22`", "1.`", "4.`", "1.1500000000000001`", "0.84`",
"0.44`", "0.79`", "2.`", "0.97`", "1.08`", "0.36`",
"1.6400000000000001`", "1.1500000000000001`", "0.86`", "1.`", "1.45`",
"2.44`", "0.5`", "0.77`", "0.39`", "1.29`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "1.47`", "1.34`", "1.43`", "2.64`", "1.21`", "2.14`",
"2.21`", "3.18`", "1.26`", "1.23`", "1.8`", "1.11`", "1.46`", "0.78`",
"0.6900000000000001`", "1.`", "0.68`", "0.96`", "1.05`", "0.68`",
"0.88`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "2.17`", "1.97`", "5.63`", "8.19`", "2.72`", "2.18`",
"2.98`", "1.6400000000000001`", "1.6600000000000001`", "3.72`",
"2.0300000000000002`", "6.`", "1.79`", "0.93`", "0.41000000000000003`",
"1.46`", "1.`", "1.1500000000000001`", "1.58`", "1.05`", "1.23`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "1.09`", "1.33`", "1.51`", "3.98`", "1.02`",
"1.3900000000000001`", "1.74`", "1.1`", "1.12`", "2.06`", "2.58`",
"7.21`", "1.74`", "0.97`", "2.`", "1.05`", "0.87`", "1.`", "1.34`",
"0.76`", "4.83`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.96`", "1.06`", "1.11`", "2.3000000000000003`",
"1.3900000000000001`", "1.7`", "1.71`", "2.25`", "0.6900000000000001`",
"0.8300000000000001`", "1.19`", "3.29`", "1.52`", "0.79`", "1.29`",
"0.9500000000000001`", "0.63`", "0.75`", "1.`", "0.62`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "2.43`", "1.96`", "2.91`", "2.72`", "5.94`", "2.45`",
"2.47`", "7.98`", "2.77`", "7.04`", "2.24`", "5.66`", "3.4`",
"1.4000000000000001`", "2.56`", "1.48`", "0.9500000000000001`", "1.31`",
"1.62`", "1.`", "3.74`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.65`", "0.5`", "0.13`", "1.93`", "0.78`", "1.72`",
"2.33`", "2.93`", "0.9500000000000001`", "0.99`", "1.3900000000000001`",
"1.36`", "1.9100000000000001`", "3.04`", "0.77`",
"1.1300000000000001`", "0.81`", "0.21`", "\[Infinity]", "0.27`", "1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->{
3.427940622578985*^9, 3.427940992582011*^9, 3.427942822704279*^9,
3.4299346296812973`*^9, 3.4299981076320868`*^9, 3.430286926342247*^9,
3.430354282916397*^9, 3.430354605354479*^9, 3.430527736787817*^9,
3.430611170972642*^9, 3.430620925684719*^9, 3.430687262370092*^9,
3.43069323923344*^9, 3.431731821980495*^9, 3.431735122628312*^9,
3.431752739583254*^9, 3.43182225074501*^9, 3.431840398314227*^9,
3.431898442830472*^9, 3.4319986100338078`*^9, 3.43200329506949*^9,
3.432098514792469*^9, 3.4321003724700947`*^9, 3.432177897470438*^9,
3.432249610852247*^9, {3.4322501211035013`*^9, 3.432250133371541*^9},
3.432254650905016*^9, 3.432255593124586*^9, 3.432333025373146*^9,
3.432335478464739*^9, 3.432339278398879*^9, 3.4323577753785543`*^9,
3.43236115147558*^9, 3.432362004393906*^9, 3.432444060248104*^9,
3.4338072967823133`*^9, 3.43423470448099*^9, 3.435013917942575*^9,
3.435038000006858*^9, 3.4352147475086813`*^9, 3.435266378953679*^9,
3.4352667331984663`*^9, 3.43527769724966*^9, 3.435285535060281*^9,
3.435354075921525*^9, 3.435355792771017*^9, 3.435365127281563*^9,
3.435376695586231*^9, 3.435379672549156*^9, 3.4790119373297462`*^9,
3.479018211130804*^9, 3.489811895657096*^9, 3.518907455906743*^9,
3.521761262098584*^9, 3.522544497118825*^9, 3.522548145844531*^9,
3.522557919211903*^9, 3.522558328312117*^9, 3.52255897235715*^9,
3.531531182783152*^9, 3.531534141910995*^9, 3.5316145047566853`*^9,
3.5316228616150017`*^9, 3.5316270321244593`*^9, 3.531629519304543*^9,
3.53163010876538*^9, 3.531713244519719*^9, 3.531776061094615*^9,
3.531790193552472*^9, 3.5317908731311703`*^9, 3.532036620933855*^9,
3.532039837274577*^9, 3.532054636821155*^9, 3.5321248458350573`*^9,
3.535608183430707*^9, 3.535608661914384*^9, 3.537097431988674*^9,
3.5374087858542643`*^9, 3.53743691129769*^9, 3.537520503936022*^9,
3.537524984380307*^9, 3.537528513782236*^9, 3.53784871010863*^9,
3.5379390432363567`*^9, 3.540983979269435*^9, 3.541051011361023*^9,
3.546671092577485*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedParcitingplot21", "=",
RowBox[{"ListContourPlot", "[",
RowBox[{"citedParciting21", ",",
RowBox[{"FrameLabel", "\[Rule]",
RowBox[{"{",
RowBox[{"\"\<Cluster ID\>\"", ",", "\"\<Cluster ID\>\""}], "}"}]}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.42794141855196*^9, 3.4279414315583057`*^9}, {
3.431735183002239*^9, 3.431735183133506*^9}, {3.431898747502898*^9,
3.431898754326227*^9}, {3.4318989506850233`*^9, 3.431898979696973*^9}, {
3.431900965747347*^9, 3.431900967509725*^9}}],
Cell[BoxData[
GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJyNnAk01N///5F93/dtxhhmjDGbpcK8UiTatJcltFiKkEq0SWghUSmFtGev
rGmTvd2SNor2IkJZSuk/fRpzv5/7Ob9z/s6cnj3m3vfbeM9dXtv7TfBdN2+V
iJCQ0GwJIaE/+venj/tvFYJ/syTGihirYqyJsS7GhhgTMSZhTMbYFGMqxjSM
6RgzMGZizMKYjTEHY0uM8euIqyTGihirYqyJsS7GhhgTMSZhTMbYFGMqxjSM
6RgzMGZizMKYjTEHY0uM8XGIX0dcFTFWxVgTY12MDTEmYkzCmIyxKcZUjGkY
0zFmYMzEmIUxG2MOxvi8xccdft1wVcVYE2NdjA0xJmJMwpiMsSnGVIxpGNMx
ZmDMxJiFMRtjDsaWGOPrHj5v8XGHX0dcNTHWxdgQYyLGJIzJGFMxpmFMx5iB
MRNjFsZsjDkYW2KM7xP4OofPU3zc4dcNV12MDTEmYkzCmIyxKcZUjGkY0zFm
YMzEmIUxG2MOxpYY4/ssvk/g6xw+b/Fxh19HXA0xJmJMwpiMsSnGVIxpGNMx
ZmDMxJiFMRtjDsaWGON2Cr7P4vsEvu7h8xYfh/h1xJWIMQljMsamGFMxpmFM
x5iBMRNjFsZsjDkYW2KM23m4nYLvs/i+ga97+DzGxyF+HXElYUzGmIoxDWM6
xgyMmRizMGZjzMHYEmPcLsbtOtwuwfdZfJ/A1z183uLjjogxrmSMTTGmYkzD
mI4xA2MmxiyM2RhzMLbEGPcrcLsYt+twOwXfZ/F9A1/38HlLxBi/jriaYkzF
mIYxHWMGxkyMWRizMeZgbIkx7pfhfgVuF+N2nirG+L6L7xv4ukfEGB+H+HXE
lYoxDWM6xgyMmRizMGZjzMHYEmPcr8X9MtyvwO1k3O7D7RZ838X3DSLG+DzG
xyGuNIzpGDMwZmLMwpiNMQdjS4zxOADux+J+BG4X43Ydbpfg+yoRY3ydw+ep
JSjfuPRMtlUY+9y0/0PpGDMwZmLMwpiNMQdjS4zxuAnu9+N+F+5H4HYwbsfh
dggRY3xfwNc1fF7i4wy/brgyMGZizMKYjTEHY0uM8TgTHifB/Xzcb8X9MNyP
wO1g3I4jYozvq/i+gK9r+DzFxx1+HXFlYszCmI0xB2NLjPE4HR5nwv1U3M/C
/QTcziVijO+T+DqFzzt8HOHXAVcWxmyMORhbYozHKfE4Gx4nwv123O/E/Sbc
7idijNthuB2Br+P4uoTPM3yc4NcJVzbGHIzxuC0ed8TjZngcCI9r4H457lfi
fhERY9xOxe0sfJ/D1218HcLnET6O8OuEKwdjS4zxODcep8XjjHjcDI9b4H43
EWPczsT3KXzdxdcNfN7g4wL/u3HF4/h4HFoSYzwuiMe58DgNHmfA/WQixrjf
gtvduN2I20H4vo7vU/g6i68zLAEPLjVWmu3/f33vlv+nasdU7XvdJiv4vNyu
T53fbVWA8rl1OPWMCf99VXAWc/D87fFfP+ANsa4xPgPxxZ0VmrciCPDmAis1
cfv48UTw9/uy9cL2//oBI4sY7+cnI3bdNn9ZvQ4FcmR6n9sojB9PhZLovLM2
b3E/QBK6mjr12lZQ4fP24WnzHEX479MgvMhAeQpLXsD3mDpJR8TF+UyHsUTT
+ZNVpAU8fr7TMp3Wiw8ivmOacvnIOgb0Wm5IE28aPz+KU89VWq+0TpcBo1cu
nd99TAVrJ4FTxLDb9Ube96hQYRqfaCRo7waVrTP24X6zKXwqjw2NDuH1VwuX
r89E+5vv9Tv+nFkUrL8kNEz0nW91kAkvdKzidmTL8d9nwcGzpps+fsfj6CQI
S3no1O/EhMz4rvJdrmg/UMrdsuJWKAXrbwkK3g6baQeYIPLRYK1qBj5vFaFk
p49yQxALFGgLWspGxr8vNrQ8DN+bLon7VZbg5G9UtXQ+2u8af62arBzAhoVn
3/50zkXr07oDnr4LlTUE/FcNoeCG8R0dczY0M12rT6eg9crP/qT/4YcErD8J
voVKNWutZEMSoX2D+mSioL3mxLbPxw4aC3hQb+cM+aP4+kaFZ2/Uj4b0sOHc
kS9GP4i4X2MJah+tjV+8ZMPq9Uaqd5rx9UoVJq5Q2Pd+F/r8W0+rfl/+BX2+
vE9f9zSdQH7my0PdX8SS0O//slVHPFAD/b5jCe3dluYcWHu7SLFsJQd8XDNj
y40ngIFG0tX+QhPg0vU3vVmuAlWRJ8vMl5tCzKDDOvcbqmC6KlcpMsGErwQ4
ISZ8b3SNKV+JYBQcK3LFyISvFLhQsrhmfZgIBPao9aenU+FIu9sy7kdTvlJh
RfPn89zHYpDGGf2UtMEcigOMxl6dkoOg57u3l/ubw7PGmSfPesqCFWe+f4CG
BZjnaR0XOzgB4ixXFHmHMUBcpmnFNao0+BAiExY7MkCiv23j7xNGsGsk6Orv
hwzwknITGr1EhsJdpjt+LWHAB+nnmzQqlaFi59ALsYtMOJMX2a77gATzFtkF
y/sxYULvsMONzWQQHo4idNgyYX5ejZzfDApQF72OKzrDhG/0GSORhzl8ZYKB
w9qnJH0l2K2oY7VnOgskkx3OpHaZwC5nwjzXQRas8LXXt1xBARbTIOnYJRaI
Pn51s0VeCaI3jHwpnsqGnDaf9Am/dKFro+YH4LJhsrbKTo+HRNBLlJpS4McG
6l2PObWfyXB4VcF5341sUMn70rvoKYevbOiaSGoU2qsOkfJSnB2nOJBNjbha
sJgAC9SueT7J5YBCn03kxUXGIBGha7eExy0l5fnbp1Pg07L2xzdPc+DNzC2/
vtRSIYx8Y2zYlwOHtqofkXyrxB8nKO/VpnvenfJqVMCmOnt9ckcHuD0Vuv4/
HZX5/VFeh/Nrw5H7Mj+5B4+wZTb6qgna/V94793yXEtw/sfp+2qX39fDfp8h
vLM89GTuyx/c1+1yQa9PEATtus9ruEnJKM6swt5duegDHrcngdXVkKhssyEu
TbJ8+k5VI6ydDJlPWog/dEa4Os3Lm6Q0/hvXGjm3e9Wq1f0Cdt6sTLIy/M6V
kNluU5uH4ohxgQvjpnubYOenQp5/FMMjf4RbGNxM5XylCNrfTeteG+6EWEdH
tLA4DcXRCIc/bQuOMhN8Hra9aX+G/n/jHO0i0qcnzRri1v6cH1F/Hfnxm38u
Gj7f/F8/6oDzQFfahl9ce86AZKUa8ivWcww74y7+1452se48cTRsiKtgn3Jc
vB3ZifsHlL8mKPzXbiwSeZnUFzbGZfSr+bxUQXZWjtZUpfu7EJMcQm5dHUTc
8ao9ARYgu7MvJNjJMAexneOjQo3H4+MR5Qkr7rXlzFYTBoKUa9bxnygPO+fH
yQDvbHWsvy4sv/PuDLwXB2n7HwqRnTqC9vKowybN5Vr/7r8D5dGke4yLjzAI
2PlI4BU5x9wwS0LAqZt9rFLcJoDRTE2tJbeNsP5kgJW7L1+bJwbzKh6oFlLw
OL4pTB4tWFinLyHgW3L5ehOXTYBQNznv2bJ4nJoKXgPelVpPJMCHOq8p9QdF
0J7Yt8CksQ2Pw9LA7fzvO/OiJvCZDgv/+RGDenqiiJKuBdafCaFiBdV25kJw
7gljPcMXxTEc7Xp+vc/G6xM4sHGHzvT34UJgOWO7vV057ndZQsXHU/voFcjO
Dm9y1PAMH4+HaYL7hkk9miKysP+ywuroq+PfH8pbHqe65P7sQ3m4G7e+jsz8
oADTDyjCxm8GWH8iHFNfkvF9tZSAv7yLJvUkyIOPaUdMvzDK4w0ZB9H7kwjY
8SToTHsqoxOMvu+gGBXVed5yEDukkdBzkyjoXysnc/8zyVjAjdMne5RX4XkE
KiTO9pxfSpUEVaEnP0hFFKydBnPjs4t7+8btTDqEs7YeZljJ8JkBXZFNFy/+
kIV2UpD9j2gL7HgWsK3FlHeYjfdnwz2dtAGpt/LQzD3qcqkT99uEwHGmzCPL
m0qwLVx0+1veuvb3bTSPEhbdPp7hOj7vdOF8qk6lrKgKyPcS98zeoQ3/7m8I
JkUvn5VKKMKjafvyDy3Xw9qJkLvHuYjeg/IqQBwpAeb4vmEKr5RKNQpcUZ7g
Sua9wSsEJQEnm71pqR1GHFj+/VLT/fHjqdC92nid4wtFSJW76GxZM359VeHr
5exaIy/Ec5ecdlAeQf5H3q/0m0IpiO9rFy5f8N1MwOPfh/Wq7c6MY7x9+7BK
rb0EHkdmwKbSY+/61JWg8+4z6gtpC0H74knhrSqleJyPxft7X4++9VCCxzsn
HJazxuNabPBNypni0KUI6aGZM5euwuMUltD/UWNo4k5l2F9AIQ64Ijvx5/dv
Z8Nu4PUYQqDNbDeM+TW+D0vCgKPU0OOOcVaErRc8fneJjNvJ/62v8AltaZmk
pyHgHb6+QW5b0fffHpx6P37HeDsRyu3eKcm7q4HurIzlUQ1E7HxkiBWf8OXW
Uw0Bw/y0r2UDqjA7713Aii5jQX+5gbm2V91QHvODY8tjFwbKwwUJTR+9NoTy
SI97E9ZvHMDzIHSYPt1tL8VMTcBVGjr0FfIaoBnnw3uhPMCGuRK8l7mAm7Xz
m7TzzbHzMWDKwdRFaqc1oGoD8WTBkIWg/dEtHzEFP8Tv5U4GrHuC4uTDSzvv
P5yOOGC0huFvguKYxZ+KpnptxeNQvPXzgDBtTpYanNq/lawWj8ddJOHw1Ev3
9Wt04N7wrZrbReP+qS78rCrJzyBJCXj8OGG+Pk1S3XE5VR1rNwSqI9UtPRHl
3bU+t9m39I3vm2SQaIgPSd2uCWv25Hw5vx3PK1Ph2rPTR5+cG99XaXBJZTLv
pQN37lb7NAWbYf3pIP3kdIidtI6AJ2RYNQZM0IJlb4e+vtdHeZkFd1bnaS8z
F7CSXsrHY68sBEyxmqyjfA7lIZ7kyZ+eWYjiwr1CG0MCIvC4niXENtovaDAZ
X9ckIe2fH1Q/o/WjKORXvwG8nd3v6fFaQXCdZJcpyrGkUT1Io6LR4/jFGgJm
V5RXDJXg9SBEWPT0dp+cmC6U2uTEHk8xQudLGV40JRjPy5vCvAczHdpe6wLt
3aL7po9RnvnV9kzxJ2N4npQG158nUcplx9dhOlxQSo3S9hlnJmy8ad/quEIf
drYm50/JwvMKbDj1nqSoEagPlw/E0la+wuPEQjCloDG6cBvigsj0ofd+BAiv
uMPuDx3+T53vacVSha8LkR0VplsfqitBgNPhE39ofhi3S8b7K0LJjLw5jAmG
wPIf3fh7prSg/dDQeyifpiZgtyjylPv9OgKe37purZIoXh9CBl3b2PiVVuO/
3xSm3PEqrDFD1zeb9vag717EikkBEUKfEEf093pkTh8/ngrf5tlNnBpMgKWp
9PihK+P7CxHk/Mvjz3sjrpzosHuJBOJwmXu7pQrw+BXv+3p1t766kwAHSly/
JI+YCdofVmoJ71+K52npcLMuXKPkJQEU8lOfB0mivOQ2cqXflA5zrD8DVJaY
fHxQbwhOHenkT854Ho4NHklVg6a66Ps/9mf4axFgee3yW5uYKC9wsVxSLbED
xb01Tp7qXx+Ix8Et4dzj960joSjuybq8zSD5KQFU7vpfIbFRXDjKPMunuBuP
Ewvx/M1JK6W3I78toWKnA/sIET5RflZPTRjB6mMkYZepdl5JNlHAVo9n2Rw8
aQQ+eQdEnsWM25kkIFUOH9a1ExXwhxYviveQuIBl1IIMPO/LC/jKpoGLv/pl
BOz/fJNDprqUgP8qb5949L0kvn389xuCsMHmS9/Oj39+MnDujkWEpxGhvuj2
4LQGvA6ECl9WsvbXBhDBuqN2h7ssRdB+bd3D3gA3M6w/HWK27ty6M4PXf+A2
K4+B56GZ8Flex/V2OhGG5tzVLD+I5wVZUKv+3Xuwxwhiu93K9cVQXK9c/887
iLufEUJWZKO8hn98ZeIqBuJiilihUACKQ81uHUkqHEUsGb/Dut9hBKu/kYTU
ITWiu5mxgBf6fbtyaB4Jap8HCXc6isG/+ytCctbl201dJOjan7pBJlEZa9eE
ttMD7sVk9H0oUrIXHhpF7FiwfE54ozEMzeQM9oWhep5FjaKrHsqoC7h0fuuj
/DMa2Pl59q/ecbt9i0lA3DA5ZusNtA8WeD2MGivA64EMwVra9tXXJSRYtN59
wxJPgqB9FW0wacNaooDVw7+nNv1CdSvrLmV4T/thhp2Ptz8+bkirUkPf/9Wr
1xMashCvPXl5+wPB9aSDbvz5sEelxqC/euGhR/9Tl/D6bJFPdSjic++ULC6/
RhxoHPIza765gM1XPbidVIO4UbUh8+tRCwEnqud8/UFC7KqZ4CxyCeXxJbWD
M6TsEAfffOLZ/QbPS7NB59PFZHkdY9i4eF5eFhflGd8/o/VuaMfzaJYQeD7I
yUeLBJHSNQwrwXqC4jLvj26XPFNgAktOHA96ZTKK1Sv1cVu8l3lEGKLxaDJ8
ulJMiQx2Em4ByW4i8O/+ivCyIZ94QRjlMSKUe6HO2gRGDTXesbSVsf6a8CmV
tPTRfhMBN9+ZXNHoTAap5vjLKR0oz2H0q+De42p17HhDEO/+dapYwQQ2Zgvv
ajTQw9qJ8Pr6/e1uNiago9E3PKZMwNpJwM3NPZ1nZAIt7+xSlpKMsPb/1kNZ
2Fx60yxpAs6zGC/v2FOwdjrU5YhGuJ42EfDD2N9dK2iIn3r/8NxSgsbrq8mD
jYfsyTBx/xub/afNBedLoP+JBOB1CGyw2+7uaTrNBDhns1I3HcLrpYTAtiAt
W9gF8VX9R99LOyng7XzQT919BKufkoT95jqWrWtQHCRk49zEYDqKk7jdjH0n
0U8B1T9m6aVx+4MK/5iplyTg3+dTBPNZqsWzjlEgxPdIYK6frKBdKj7CPmEu
Xp+lCllW0ifnt5jCR4Xb5zRllLB2TTj0afCOqM3459EF5Rnb/XJ55xeRckm/
I6El6P+gt3Oe5TYd7HhD0DNKsLp+xRQackRuRDfoYe1EyKGukV5WbQoWBbPO
1B8mYO0kaBGaIm+agcZL3uS7ce+PUOC397cp/XZEQf9qz7Jbw1FG2PFk8Llb
fntukymYsQzdrjzG68X+O87+jivEyce8rx3eivjZhwO8dxATLW9FmI2i8Vl+
+SHB8pYpXymC99etOjE1cCdiE80/7yDm/dL4R6KI/yoNCMkGLzWUUR5sp5vx
IZ0ilLdKXb8uMvzCOLPh9oFWYoA2BTqeaSndW4fy+G2vd7868xblWY5e06Nv
VRgTxGlDDle1Nf78LuAZwX57SF2DAiZOl7WOeNIv4L/ax92UN5awVQrFfSsi
Wp65RyL+Ne0CeVI3YlDaul7TA8WNd71wqxy6N86S8KHv/Pzrxmh+JHRmVJ+Y
jcb3rSHfnkC2GSieCLhScGPcv6GB2ZRT5+YTEDu9eX5wJAblQ/+qKkxxf3Jl
YNgM3ux6F2wdpYS1a0JJXcE6ci6qR3xY9mDkuYsZfEsO5L1Q/V3hr08Fvz5p
Y8cbQm9wtuy62Waw8OGBiTWL9LB2Iqy+Pbnhuxka/w4xmsdvySE7Ws9uMGjP
FzOonl7kbfqUgB1PguRKEnMXG+27Py94uqwtQ+N9rfs6v31D4+10OOw9+VvE
C1Q31bHRxmeK8ng7E75tXRjWUDLOLNjGmXvDpXOc2aAZ3JPYajDOHIh3dRY1
GKXCeRWwUo/C60IsoVto6ZVJQAXGg7QNY4l43UQfV6s+62BKmbmAHzz/uN/O
BnFML2Pvx3LU30Zkc+zBiag+soQyjZX8gQa7ucGeL4XHv286TEy74aJ5XE7A
3QPyNvM4sgJOn7ncOOE+nv9WhTfe/ROyeH6Jn+3z5XM+KmHtmkC78drsxmsU
VykLaisNaqNBReTLgxYhGlh/Xci/nU61KEF+f3F+gWeWMOKK5MoDSrNpcCbE
TvrJaRT3eSR51y7xIoozBO56l+m0RB87PxFiZ2pe7/6C/KYjsu5VBUKIs+9l
1Icq0cB7RcW+ZV8IguMvMl845g/j9Y0kYHdfVQ8HcwHLb3iqXbGUBowmehNd
UKeA7CJdj2qPia3Izkp+uXXHkkmIxX1szmw6gey0LW8G6lNFaXBW53AHJxPZ
fV+nSK03tEV2YVBV4FIva7Qv79/8dtqT34gvMrwYcxvQPn7m5Sr/YwfQvp9+
pqXqqgga9/9/ygQz9j2Tb5mobi63YGh2+1JzaHXJf+Qih+oKXzQktjck4nWG
LHi0yaprsg4N3pj9GSio7q5u8ZbaxVsQX4iZxHvhdXls4JR9tq5RGb9+HHhO
zPwUNc8ctj+m6RaW4nVWlpAUtLgS3NF8C6nKdfJfZQ5VTYvtjAxQXdKSaZVz
fPLxOiVFkF2kM0N9M+LUl6wUSRKK0xP8XNp+PLAAPZ2DpcsiUT2oAsO8IKQG
xfmFHevPxskrCPivqkJMrcYy83Y6kIUe7fnFVBG0tzWxVzrfUxJw8umD9gdX
4/WlmmC1Kr3+tiKaf3rfdO69Oo94Qszxxu/2KG7ZpaTTqvTYAmyNfykz7NUE
5/NgRITkr9bAzq8LsfI1q6Rc0XytOXLsq8FvxBMIodFWRePnN4SBxsj3Bk9R
ffC7k4P3uBctYFOSe7InXU9w/qn0yU5b7QwE/FeJQKg75n1mIh0ms1X8XG4R
BO2BSdY2vZMRp3W7S6WUonrZ29N3PLdk4vWzPD9MtbifzkTzMXri2qcObxB/
9iLdXHTYAqze9pQGf8Pra01hrWnhyWtxdBCOFa26+RLV2x44N7x3r6cZ1p8J
3HYDM60zFgKmxF0Yy1dGrMJgNjtEo/H803yNs3+WBYh7F/pKhON1lBzYL71w
3acaOhwSkX211givG7QEmbRVotOCx88vBApRTXPDuQwojSPp3jn/6z/3xUvs
Wek6WRrlkWPMNh5dXYXygDfnkC+uFUVsqz2T20lEfOVt6IP5UxBbFR7xrF+O
6p+/X71qHq6IxrfC64/sHwzEzUniamJxiA/ZkYYU2hjwWPrgAa27qD6qJqTd
yf+YmoD/qi6wjtSWHeP9PtloicaD6VpYuyGcKHyw7WU1intqv6IGMUIRH1aO
d9+pz4B3xICNut36guNfXZ6YtiJYDzsfERZGPLHvP4LiLJ3Vh+aq6yLeOdnQ
ds0cxKSiXJPKnYhrqdYqaqVoPOolLXC708mAsl3+YBQ6vr4zobX6kezzZ/+t
9/onn6qKxuM/bhYd8T/pV2fEp3n4UZDXpUKVR+CGm7zPa6ZTFuf1HtnFddad
JSnZiL0XSL2rW4u4/U6lWOxjZPdIR7d4rc3D66fpf9f9fAZIX7naW3bOXNDO
WXxnoiUN7RstVqeHlxpYYMezQPy5RvtTG1QHm3L9kKrwcwbY/+7JMmnC64g5
oLbWaVD9BQOG3jUV9RrjdbOWYLJm5F3gQlSvb7mKA6HX0Pg/efXa+3eZiEUu
Dka1mDDBf9my+gvZ4/4hqj+7XGY1c30ZyuNRMtXmaaxFnLXr2+Krhky4tzrg
XMVSFcHx73s2PhPNV0bn27BLdo4QYu2fydy0+Uqo/Z8fTXgc1zEg1YbyRiD0
taHdBo3/kd3phu23EftXpniN+TJhTmLT6dMztbDzGcK84XeX1KYwobpmNLll
ix7WzltvdYN9ts9kQvOdt1K7HxAF7VJlj9Y+7TDC+pPhqfBbV7d2Jmz4My6L
jQXt8kkT60o+ID9rlejLh2/KEV/dvPOZ0l7EGuwp8Q09yI5uI1v/DszC683p
0JUlz3uh8davtpz3Qjyyt5D3YgLPqBjMkEP16YMZiT8eiJsLuMtS5ba+rIWA
LwykPd8gWMdQnfVgXipx7jw03ioG001Z5kxoVD/cs+owXpdtCekZriUEFTT+
zDYXrc+2QlyxQIfFXIZ4BiOmr3wrE7IrSkqPqw3957kku+7Lz7ArQ/X/brOt
n90VZUH4b9ukJ1nj9jgbiG4ShKNC8gIW9y5dXB6vImBr3ZH5anOV4N/n14T8
cPn4Ox4sqGufxdQR1G+h+vc42kqCzFI0fsz/YAMLFhE3tgYY62P9iXAl57fw
t+msv3mFNIKgfcj0T+YB5R3m/ROAxuvrSbDpxgltixcoLt32fVvgtXDEXEuv
ihmyaPzJR5XuZdQjvn/TPio3EPE+0fo1ZHkW9Lg8KpjWg+r1ZQp+vPIPR37/
urmEWOG3KE7VMjDd9Nh8xL9vRzaw1iK/Lj/3ecpNGby+n19vU8KCXuFDJzRa
8Xp/Bhh6pBmqRfLWA41AKWKphaB94li+MJOB17ULwepLRqp3t7DBIk+o5W75
mKAO66/2cV3nT3L2F0fj5coU7/3tnohNGHGP5pagOh3Ri9W7oq0Rs0Or7ldt
Q+zLuqUuWseG7z4XfwbNRfcHtE9XmWabKCrgv6oI5Mt1L6ojUd1CKUt8/7AY
4m02R/caEhE72VPjZ9gjVph2LSZsGRqPhXLMW8tW88bL4imHbPtRPe9bWrxo
nBde36sLi+krLkX4oPGaqDppkZkM4gt2BSI7CWh81lw9pxVJRnw3+pKD9ErE
zdOvrTl2EvFzufpD1A42fHthdlzt03/rhS+2Fk3tFEfj9+aih/LROogfPOl6
RvifPMqLJeJnq6Yh/ifvshTFvactWrPnigtijy2py9bU8Mbnu84JN96i+uMl
7mOnFxUi/qtU0B4UO/dkCopbSeVdi/sWi3jEd72f0h0UdyjOchpqXsyzO3Ot
dpe9R3GK0cz1c9xXI/6efFH99ztUzzyyq+fFqVV4fTMdSJd3hWVS0Hyo8T21
+9J+xCtVKjNrvrJB2yu5OtoM3Q/Ss7Fg4QpJ5MfdTLr7Ydo7c+z8DMiUKa/p
0mCDrWnvRaVhC0F7YkXQp9dSiF/O7CEU66L7S8Lct9kFf8TvL+HtOym0gPOh
bNjdnN/vQ8TvN2HD0Y66/S732XC3IN2qIA3df+JvODG0hIXff2IJ9s+K/SwE
490StlwOeOg1DXHFPn3r/asRj6xsyby+G7GV/W7xnhzE4Rp2wbr30Xpws/qK
VvQFVDe5LX49W8QNrQdPXxE+295HbGB9ftL8WMSrE2h7AuzQfR/ORjulTV8i
tkpjJwpfRGyk8E6hLRqxUmxqSvF8xGM/pqvtN0brwR37gNpfHxE3TFsuuX06
B8SnW9pzT43nUy2BfLM66nC7jIAdredd6VaXF/BeQgtRcZKKgOcta1JctlVJ
wH9VEyIv3Ng+PYO3Pi1Wq3YfQHVTa6wHgzsE9wNYAmt0lSlDUI/M23dTSLyX
HnY+IgTW1SvmjKA89aBnzckZlxHvGKxkfVqDWCbxevVu3t9vJjPldsIAQXC+
WfJS4TGhiNcpNelH9qE8ebJq2u2Qdfj9QmTwV1xnX9WB8lwXXvvb75vBgbik
Sa4TldH9Q9ffHTjUGo3fL0SD+31+T5cpoLhhg9bz0DmeiKsdZspMy0V8Y82N
MzbfOdB6YcTakoruN/ryhCznJmMmYCmJha/Xfkb8V+mQ9ELhwtUONP97opKU
ZI8idtVWiPKYi/hC+f63eZIceHOTm8C5by44nxnNZ527B+Lwozvn7exGcZpr
omcssyMRi4XWajZKIX6w00+xf6qFgLd5SOsQAvD7oVhwUPfBnCnX0Pz39Wi5
ctGZA1sVpu/U2oXfL8WBHcfZC84U8HTlvVx3NzTPYTFjRNZfGX573OpkZ33n
RsxTi7z0SR06Zyz8WHtulKsVed85a6sWrPpoaRQ9NMhddP+uxmoHAhQFet1g
qPzgvoyv6H0cYggD9o82lMV95XazYk9eOEmEBUcoso5yg9yYRf4lhm3GoFns
kCv2bIwrurKj4YY4GYiGo05Dln3c2qHilNQSMpBLzx8uzhvkxu7Z6xG80gQo
Mxe8DTMa5R6yO/QztpUCGZ9PvrXIG+Om1v6y91pKhUJa73D/nYG/dkQi//r5
f+Mey3r/RZm3/mVKBY7RCQPcYCHKoUBlNrwWP+CQTe7n5kTFrqPLcyCzYvHI
+9d93NB5BSdue3FA1eTdj7TPg1wbypOHKws5sPdg2K+ZQz+47Z8a9zySVIby
lpMq2UqicMPZ8erZJlXYmrx3o+tpYfjZcSzJNVUdvt+0NDhCEwODSZHe1rd0
wD78W2XwTgkIznRbJbGJAGWbnQ7rtYvBHzf2lIwR398VhbmtYndufTUG7kIN
U4mHEpC7I9Y5/hcFckXUiXpDEvDbiDJzTyQFviedYRh3icG8+ntz9g2bgrMe
m2v+cgKcCwyZnxhuCqk5t2ZZNguDyYbl+u5aZpD+aOvmtatEoWlRzAdJVXNw
dJfLNJorCnsUhIAVzICZW4SEUkInQFfEXVn/62yYXe++GrrFoOLGyVNHDZUh
fOtUR+YUWfC4onhg/Yg6XAkjGH7ok4MqvTYQWagNMZNLo0VzZOHaQYN7mz0I
0Dd7G+NDqBxMuKgmW5zPW08qFzEaS6UhYapp0Q4gAV3+5D0RESmIe174KU6e
DJqBN8/pTJKEY9JqXieuU8CfuiBi65A8PIsq3nd9OhVWfGmiD+lLwXU2M3OO
iDkMPKiJsJeShYivB4erlzCg6viJawZ10rB+ja1KMs+vOO7+Jm33NTmQVlRb
s6SS9/fsuLCkWkQeZL+8KXr/lgOeEQYnLE0UQGdVVfK+VcPc6Wkhb32fKUFO
0MOUxpci0FrqN8N/nRI0eRxK3eomAwF0l7s3LihBX1wYcJPU+KoEI5fv6R6y
0+GrCjj+WFLtZGQIe79dikt0UoTChVa6zCdE8Mxda+NboATba86ufbrKHH7t
dn128a4yHLjitzIhhAnwPjOZWaUEuR3EJfm7WZC3bZ93CVEZjmVtyu8h8fbl
nS9LSg8qgrKcNMWet4/N4JieGalUBtFVvsObdCfATtal0cn71eDo6LsRswR5
uPcr7KeakwZMrKeLXtdU5qs6iJi7ZdsVavNVHcamHDtcWmrAVw3QzJevCz2s
y1dVmGj2teNUDgHCFr2/6bhQA1TUNhZe/WIMJtTPXps6NGDNJ7oz6RoJHjd7
HnCOUIODE7x2BNzjzV+Ja0ItR9UgYqnvvMYHFOi7XHMmK0MDZNS6xpaupoA6
9dGvonvqcKIxNPfNL1OwO/lmUf2oGrASvi8OOmwKKzS/Fj6nqkFmUvyvxBYq
2BoojOqcV4OzuaPi+sI0cFk8LGcrogqpQkcCI+7TgCZMb+07pgbxC1kPmtPM
QSF3ZfpZtgaY2mgsF/9kAW4h9BuyzRow2yWc+jaODumHPi5okFODGccJj6vf
MMAoKG6JQpIGaDxd+eYwz+/29D6YuHibGigsDr77s4gNdh5XzL8+VIfFajMr
zHh2iPtCxqcCjgZM67HbHe0qAaeG9Gsqz+pAo4px27TJ6nzVBlEFxfXtW/T4
qgUJ+6KHfQcJoKkx4Uttlw7Y2McmuVYTIWSLtMGROC0wODymfDyKBPbUX8ZW
w5rQGjbDU12fDNnvUipotpqQuXuskfzKDOyUfp2cVaUDn+uI+7afo8KzREf1
3zO14K3N/jc28uZQH/qnQFEbrngesJoxYAFhVw2DUt7qwC6/7+TuFRYg+XBg
1uN6bZgT6quR2EqHzNc1dO1cLdCOuithMZ0OlkOpCl77NcFEQcn0zRImHLed
lpWwQgviOpI4Yzy/SHMbt3mkWwtuLd/lbLtPg68GoEYOk135SYuveuDSRt37
2oIAh0sXqtYu1wfP/hhSchEJrr6WmEH00wNLd6W7P1VMILCUmPrdRB/EDc5J
5B+3AFn7mQrLrA0gTmWTzGAiHeRMetW7dPTgup7b/YBZDBjcOM3yvKUewHND
7ZAZTBjzj/GvNNaDf8ofDrLgc81s3ksfPi32oZlYsOHU8thL6dd04YTTkt6A
XYPcv3k1Q5D6I+2jXJ8r55VSowggtyOjtUlBDCZ4+234NpUAhC7v9a+cFUFx
w8UrISRDsPv1ocNdXwMyx75+MU8iwJTDS0NvdOvAyTt5Nh287zW8NXYBhfd3
V3Q55Bz6ZgiZ66cbnxkk8tUQnhhuU6jg2Rt/lQBtsr85Ji3mfCWAkfju87PO
MsBJVnHOcRcC5Obwfqgs/v0uhnD9/G49cz8ORM1RmrzsgSFYNa2Tbe/jQNCp
Ds3yV7x9Rac0cPfvIe6m6kVy/R08v+/PbSpNE/7Gsb4R4c7NyBCtdTIwUKjv
UddGhKTu50XLCrWgYUPP0nzeOkXOnmB/gkLgqxEE1FtPzHxM4isRzvXvDlt5
i8JXIyBQuarPNlD4agTpvoMls6gUvhqBxvHcxVUvTflKhIMtPt+tDprylQhX
dK5Os3lhxlcjMN7sP7NoAZWvRFCusKKfkabxlQirHZq1TNzofCXCXNucPSn7
GXAiYoGKsZ4RSPUalSd1MkG5fXqIAe/zbbumbWq7jAWjEZZzI4qJMEXDOc+i
gg0x9ANLlocbgUdG8c8LS9hQPingu9slIpi5XRl0teLAolNh3UfWEkH/IbfQ
9gcH7DK3e23+ZgTODufTPA1/c2d85BTJ8PzW/JidUpRrEtCd5e0gzVsX9/Xs
iYprk4MVUa8zX200hrWd9JjsDCnQKb/rHehHgt/RHwjMyzx7/tbXA5pLSVAR
c/R2Ol0dXk65t3K2hjFsjJ0RKpmrAVerztjsajWGnFc/PXZn89aBkG30mgUk
2KF6rPIGgTfupWd5dxwgQb48h37xCJGvJMhstLYJczDhqzEcF9/u8j6Uwldj
sPOecqe7y4yvxhDl+DT9Ec/e/Ksk2CDr41sXQeMrCda1fDIp/0DjKwn8j4X1
ZC8y56sx+PqMXj5ea85XY3h8Yfbwvh8MyHfL6NUYNIZuZfrD5dIseGzskXlT
lQROtus1dvSwISHiPV2IZwdOVAoMb5vKhlDio4+l8SQ4o9eyVv0EB6ZPPveM
Zm8MyksTZ1dk/OISc5tmlBWZAJy75tQb08dtOPSkYasiGUTLbC6/mSkJt8z3
f7ZRIcNlf117b3kVWMqRN2DEm0B7RWKDyAQlCH7htDI6mgxvz3w6bMVRg7Dm
by46x8jQH5QG9d7aMFI6M2sFwwR2fS8OMV6nCVVblpWnWPP8lM8bw12v6cOC
jZMrjL1M4IjckhNTtxP4agIWD+va9bcY8pUM4Qa3nopHGvPVBMwvJiR/8abw
1QQi1s5ui1xmylcypOk62aTcpvKVDHMm9tzarUjjKxmetH1UiH1rwVcT3jr4
x6Cz4KsJOIQJF5Y10flKhojriWNznel8JUNWa+mObBIDIDdIeP4MMhR80Yrp
2MkGzw62+E0xE9h91nfJYgYHFF1rLxZ4k8H7+a08JcIYd+bko5bEGgq4hsW5
LwsTgoPpr1JTdU1hYOmhO7ffi8BW9bNhl6+YwrEppyZOdBcDvwP+sx8sooAD
5eKFCzy7da40jdr1lccudc+uHpCHAymhQ/QzFJB4eiuKUqsGop87rx96bQpL
lJ4E1u3UhrzdayxXTKHAsdjqhiWLiXw1hbf7TlfSJIz4SgGLlJhyoTIjvlIg
PimHIMM05isFdvuuMYxppvLVFCRIdbeyjc35SoGUIxNOTGpiAslCwn7DKd73
csTp7tlLLFhGT0x1XUGB7LeB9z72cGDe7dajTW0UCDTyCEuyGuAG7XLtbXKi
guSEQwsYIAVVQsZqsnOpsHH7i0U5PDvl6s1gs4WHqXBtQm01LVUTXka/9lF3
pULXw2hbpV9aMPjhz9ZNBc10+5LBFTogO/vE8x+XzGCTTPyadF9DvlJhxsK0
1g9vCHw1Aw0v2u+jZCJfee1rZ+jVfCbylQpRkasnf7lsxFczsP2mUDzngzFf
zSD37tSXhNsUvpqBZUV7wOQ9FL6aQeWFDYMLZlD4agYuR+Sjg6UofDWDDw6+
y6YfoPGVCo6xahlSp+l8pcLAxr0HNR8y4G2Pqgkz0wzKTot55/UxYd10mcol
PDtl1qjsxIIMFhwb0grzmMz3s/1/8v00vl/cyK9/1OazDb++7Dzfj8vi15dx
eH69khg545gChEyLnnH+vTkYxy4WjpJRAJdXCytfVplDwkh2+5It8mC0jWqt
fsIcvq75WWbVIwe/tH/nz4oyh9J4i8Gx+SrQVn0k8ne2OaS3rFgQNEkJHnxi
5lhl0CAU+udoH9MAm6wREzmeH79611oDCTFVYDuUJsWI0P7uxzna/P3YHIwW
0R6s4n1ff9Uc4rZdXPtooiFfaTBr+5qcc4ZGfOX9ffcvD2eoEPnKu660wprA
Z8Z8NYc5T/O9y2cZ89UcymLyfopVkfhKAwOL3KPzrUh8pYFhq/Fqc1UyX2lg
oTQQlHiBylca9Dlvt1vMZMCr5LHIAl8azCdGnLmZyYBz0/60mMPohuf02QQm
DHUXe6Y70Pj3UbD+1tHb0KA5cKhruIMNZ1s/t365aQ7U6anrz8xiw4L9tA/O
x2lQ4WieZbidA+H7lsGUMRrMdg/pP/lODlrUPbb4b7aA15v6mo22qUL/5IhP
Slw6tD4jzvWSVIfutUqmFqIWcHvywvtHUzTgbUbO6pm3LWD00Z4miqEmbOuq
+aiqSIdmN1+LU1O0oMv0kkZTFh1yHkxK1F7Bu/5+GU6JTAuIdlXpTtmlA7fO
7tkwo8oCJrTQLpks1YXogNSnB2l0kPY7mmhooQex7HtOB47QQWl0QqCWmD7s
/iVckiBiAZpJ65yU2/Qhod7aaE+QBRgYtRFlLhlAUnJQcuxTC/i+2r/HnufP
/lUL+HXzyGUzByJf6aCSuWDTGooxXy1A9M/C7EXmKx3+rNJKxSZ8tYAFEx24
cJjCVwv4cn3N7zsPqXylQ15gca1JKgMWt/rvm0OzgMhrS2v3jzDhW0TRXr1+
CzhB1Lu26xQT7BwnRUg5WkD17s7LkTOZEKd0a9XgUTr82GJ/4uEHFnz7/uc/
FuDZK7bhqg0HrrTLdG0MpcPyXTvWj77p4zpJ2pRx5RmQ46r6VZelxtuna23j
ZzLA9Gzi71OOGuAS8OamfxMDDvVTruuUacGqLS5f6oIYIG9rLbkpkufPPJSr
yvBigM5vYrPKfgLs3670SaqeAXcy1C9IvzeEd7NlFoitZ8BmW+ltwvaGYKsv
dlPIgAG5CZvCGgpIsLBu8sSVixkwy161warXGMgG0it1hhkgNsbuPslbp0V+
pw02pvDWleERfep1MxiI2qJw+CUD7LKNl8rtMofMRyl54lUMcO8dWR54nw70
TT8tSlYzIGbNJJJkPpOvPLvQsEWqWYnFVwbIyXwTetLB4isD2HSLL3mHOXxl
QFL2dBXvmp/ctEiOsNM9Jgwk943R2V+5BlJfvrDYTDC3OCs346oK3HUNmNrc
y4QVAXOff1zPsze0D1n9aGfC0dOj53bTVOD9xxsU4l0mPHhxbr3pO2UIL/uk
63KFCeemvstZdEEDPs29kqPWxYSl824cLTJRh9RDFu8/72GCnM+ROMXzqjD1
6VlCDYUJQU1OJ9ekaYF7sdvHZauZkK7UmzSVbAB+u0bfHLjNhKzzTyZoquvD
x0+DQnGxTDhtd2vTZzE9CJjTpxc1hQkr73m6NsQbAut9gfHbqUxwPK4c5FJs
BKdm7bEyfs4EcvGRRi+enajy3NXf4iQTfCoW32zqpADzRW6HP28dV6teG1/G
27f3+ZRWuzcz4fbd6DkZ/hR4967y/OxiJsQGHtd/2WsGDiWzFNYNM0Hoalf0
khIq7PAchLxlTP76QoNfk4I0zivy/LR/1By2ZZTum7+bCfHtpF6zGXSYFqw8
fJjEhJC0L/sy2iyg/N5w7YMeJqQEZVzh8sbVX2WCFLN+mkIJm69MePJzNDlM
k81X3vEynvsZv2Uh+ORdpfcnWHB71p4nmo9VIGz+a8u4Qd4+NFPSYomiCpBV
qmTUa1iwxjU+7oiLMrQ1n3x1NoUFti7iLx/vUoKklOgySx8WvLhgFjzcrA7W
XXvbrhezQHFGQXWinxZMS+kOebOUBc2GcryXPnCcY3gvFmzpuyVhwLMH7Uc6
YxTsWVBPBe8DT4mwUs2Q4byWBX3FSxetdzGGiOe03IlnWdCQVl7bQCTB25nt
vit54/S62rx1sY8o0CGdXebQxYJJtEz5fecpoK8+J762hQW8N/MPRFLAgzC4
yPk6C2jRwg4SSWaQWil0MqaeBUvNIOBUNBXy1bI4TcDzg914K7kZ7W+eWo3F
Xx8sYOsf+criKx3+kc0sUG32IhjoMvjKgnvf8nPnb2LzlQWHnlauv7GYw1cW
7Frb1qObyrPHS1888JFiw5aH3u0iR0a4I7J15iF72OB83G+d2UdhCPj6OUjM
jmf3S7j7xSuLwoB39+e5PDu0af3s5W9sxSHywac16fVsWG630YDxRQry6nsn
vOf1L2h1lH8VKAulFQ0Ej0Q2/AxS+5X8Xh4q809xm9vZ8PH2/Te1q1UhMuxr
xCUtnh93yEvnjqs60M8+iRtIYcPBveIu9vu14Oyp6JSkFWwYeRn15fqwIWzh
/fsyig3EoZUaG2xJoBR1ed8kfTbEPT3o+aifBFM/36Z3RbChu6LqNPu8MWzw
fNWU1sKGU9fiBrRdqODmNXWznDEbJEzYK87a0mDXwbRL83jHi80w2jT1Pg1i
ziRfPbmaDRPWqOx75WkOO0v21PYVsEEkccKJ7b3mEF0X/ZA7zIZPxVU7r/Pm
/V9lQ7Oc9evtM1h8ZcOzwNdZz9pYfGWD6ew7g+xno9zXZzy4B69zYG76oW6/
y8Pc2hlXtpGjOLCpy+vV8X1fued71W5c4a378qtNGAdWiUPVZ1Hxy/c40Lal
KbTTUhTSLSbJX4vjwIWDUUUMcRHYELZOvQ44YCG8/f6TQAUgdxZ+X8azg9UD
NYZ75svA1J7XN7YGckDh/PnrNXtVoOZTgMWl1xx4/tpxh0+MMpRFKHk/zeLA
Wf23DmNRSpAjceXAby8OhCzbKXY8XBHSU71vkfU44LtiR8KeqxrwVNNwxete
DtQlOV1ycNCA/tNueQcaOUC9Jvt4tEEdpC1iBu0vc6BeiLRSZoousISknjko
cuCAht9hzk8CNOwrctEe40A64Zr8/ScEeKDoFf++mwPZZkq7VxUR4NFhyZrL
zzhQYrlaeIy3Pz3XLhLaXs+BKu7VyNRAAnSe8LRzLeHAeofa6NZRI5h48nVl
1y8OvCl9vk1nrRGEugfdlCvlwAKzviifdiJkq41cZwT/eV6W2ObzM4nw+uHO
a/PJHGh+f3f3tCFj3vheNY04ygG3svrkzw3GcKHtjfPGtxxojK8+dug4z76r
9pl15z4H5iy5edo22BhM8jrc9Ms4IC62NPFboQnE7Mxz+vGEA4y9XKXviWTQ
rD2x+6cTB3YtPTnZhudHVeU16qV/58CxV78eyBdS4H7fNr94Xv+LAct83wVS
4CnH/FIY7++xrrwfqOlsDjqdqy1lz3DAcP+J6zeiLECx/qFXB2+8aK5PqC5u
oEPCxDqfZSt5ft+Szbdz1OggmXdtZas0BzS6qmdZlzP4ygEd+XkbGMeZfOVA
6bHLKtKP2HzlwHHrKUfzNrD5yoHoRw9152iw+coBo1mzUw6Jobxq1vSgvE0a
iPUdEuqWURAft83ttJuMWMv6zg/DWYhTmZ9URZfjz/ezhLWSUmk3whQErPat
c5VyJ8q73ugoZ62ehdjv7oHfVyrkBKxY5n9PzlQOpi3fuXfnVPTc9JVp89Qf
n0e8q4V4iiKL7qM7I/fVfGsI4r9qCkmk5UXvczQEPFuau1R4DN0nJ9+n/1vH
DfH91rEzVmfUBJx49aWL27AqNAl5+M0WfB4iKIeI5lAzEM/vyPssPoz48OyF
Fm/moucNjp9PefHdXuIwuo/OcE/uqk3JiOlX97XfNUM8uWfNfMM6Iih81qlX
IaPnZ+sMd6rM90dMFjnnnZKDmCW3Jr/pM+KQjj2rnR3R86wvcCKe1D1G3Pmn
2V9YwBodC65Uf0f8188aZ579/8+PiID/qqiAx58L9O92SbC1O3pybz96TtCK
I07RkvsR7+3/5h1HRXzZ9TSI1vPs+5kPryspouf3bp+f+PGNibCAu5e5qpRy
RQQ8l3ma4bqAKGBZ7fptWY2IG0S67w3ORM8/tHawobXboucbSt9dIDxnK/48
X0lQiRedtOYVYqVrt6Z4VyFW6N82Y+FpJrT3PE7YdGS8HoG337NuDqlZyghY
M+K8d3GzrID/KgkuaGa+FxHUj5Jgj5GFwWAwz77NDh9rpKPnI7pn3VGVVkB5
5m4vVeUIOuIoPS+F97MQy7Sfl10QhPj4sX6pqoT/Pj/Rw+OAlNwrxN5Pn2+g
H2ZBkfW3Mz9c0H22uYUrt6nXIj5l0rqYxUXPWzx2wpE5+wriv2oJ0/+E/d+h
esb9F9tbJO8i/psPQKzzT0IA8d/8AOK/z6NgQXBgw93sJeh5jbG3fLJDxdDz
GGM6Jld6+yJeNazDexEF/KpC4aKtYH5xwD7zSCs5FPE/eXrB9eWptd8FZ0/E
0c3Hfn7eh1g4+MHc5Ir/Pn+xkmKWMfQNsUXflwpqO+ITpcVPvaoRy2/dPJSS
g3jbVHvV+mT0/MboqKVte3+iejHL9OdqK34j9sxujLfrQhxbWvddo/V/nvdY
fW3NwE3Ejxovv7gn+H2moKkwf1fDMOLTXIae6HPEFiFypdxriCuyumZHZaJ6
MXNd7YQ3XxA3SMzdNJSGeMXXWF+paaju4Z86iKb/eU7s7aOLy04h3m6+aoJK
OOLfyczCYEfe97f/Ud+QEgdkN52JK0sSAqdcsr8TiQOsZZZT2ERhyK2P6Dhs
xYGldnWjBcXCoPj2zqJ3zhzYbri4lDqdZ3cJ6T3guHPg3ISPIeeeiYBGXWJO
G5EM9ASdhWWOilATfPNzeSQZ9rzY9ix0UBFCNfrpqc1keEt/7Uk7qwT6lcTQ
9VQT4O5wfP1+gTLc819QNHenCaQ1XVh9UlQFUkyNhicZkPlqCG2+2adlQ8h8
NQRShsXcl5VkvhrC2iclPwuVTPhKgBIl2+xoXxO+EuBQ73afZiUyX03h4XLj
0qDZZL6agnTTHWmpfWS+moKjQ8jyM/VkvprCjiK1Yq6oCV8pcLb37gqznUKQ
PTrwdK8hFXbGHaywUBCGrFdneu9OpcKfsAknXRiO1i8SlfOjgm0p0d+GIgJJ
+ZLas/dSQWZpg4P6ZSGYqv7nSS80OJUv/lDJVAQCcm+tF91Lg0kifyodJkDS
P5UPNH79gxiUtHZOFHE0h426BRlWLkKQVF3S4iTFgAH6gKPhRGHocLwhSTJh
QPAUq14p3vnoDXV2wo4M6JofmfpVfQJsc3kY9tKXAds2FBSOqUnCxQeDrTdF
GHCJEyy/PJ9np9Tdf5WrxoC3X82Dbk6Tgi03zvYcMWWAelHPXYN2KVhRuvV7
zGQG1C0iKUgyibDCLEVilyavne12fVYaEfalXXh5biYDVitsW3NQ2AiKJG6W
3N7BgNLuHK1nAUbQtqE14XMxAyrfbBYK1SRDZ7/tDhtZBjifD+z0XUiGM/Mt
Qy5RGdAY6F65IIUM/iXm3tQZDNjNemCcw1vPp2l9UF6owYSqSVCg6k0GHz3D
xdIMJlwze8Fdrs/hKxN+MAs9rHl+wV/l7Vc20ZsVfDl8ZcIG+/mpH2I4fGXC
83Mv7hAYJhDUEvxO8SgLmG/mjs6bqAj3bB7dWCDPhrG6i+ee1SrCTWZewEYm
G44SXIMcLXRhdcM89yYZnv8lafj7yw5dIIg0/J5syIbwL98OHGvWhReT7c6c
47Bh0vH6QKYWETLuryg5Kss733fxLTumEOH3lgn2lbz+VUucEh8GEMGHdrru
A69/XFlspn4KEarbHOYo8PwpF/XawqAKIhjve/3EypPnT9KMt9GMyLAtVZmb
qsSGL8EPv4Z7kGFT2YfNk+hseH1xc8D1w2QIeXqt+KULGx4NGHWIPSRD4Pfk
Lzv92JCz3DQoyIDDVzb47Z/dvZg3v/8qG4yvhwc4hHL4yjtf97EPtGMcvrIh
S/vWKg3euvtX2fD/AIIm5is=
"], {{{},
{RGBColor[0.3556322664597134, 0.16558168493730901`, 0.6168644889981311],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlVlolVcQx4/nu+e+KKGFVB9EzUWrRsUENNUgXtRYFxTriqYgioU+aYOp
uyJqKeIGVlE0UappWgwtRlEkLaRRY2tpQ1HxKUWJC4oPFQxuD6L+/sw8DPP/
5ps5Z/ZTWFW38KsYQmiCMqiGj0nw/imECeDx4EXwQclwNXgxeD/4LPhb8L/g
HMZFvieAl8F/gfaCz8BbHHfAN8IPBLNfkEyu/5XgheCV4M5cCIf7hLAuH8IX
yOZBn0HLo+EN8F3o/xPM6a2w76CD0BHkd+ADkUeoC9wH/qXuC3ZHD/an4XXo
NkI94HJ0ViSTn3KSb4pjGv+eCfN/ssf4AXgKeCK4VGegMxyf34GvQ6+Rz0FW
5TksQTYVXA3+CPyz68vuJFQA34L3g78KZn8NvV74LOSzoRfgevjHyIvgE+Sn
l+/R2PQFr3f7Bvhr1Qt8U3FFi30oshnRbAeAH2KzE51a+O3M9G9kFqfircks
d8rhN8gyqAQ8mDOGQB+Cy+Czk+V3e7TaqsabguX1ZTC/q9Gph+9D54rrrUI2
PZn+UWQ/RtOZj+xesDzI/oDL98AvJjtP+ZiVrPaN0WzqXfcU+BG4Ep1xmeEK
eAvy/8FF8FyXtyXry71e85nJem6LaoXOE3AV/Idk+JPMYtBd8ndKZmdOhi9L
FncD8nfR+lN9ehd8AdwNX+pntnv/3vM8rUmm8x86eXApeAR4YLScD4IPiyYf
Ds8ly38B/LfPi+ZmbWY9o97ZDv0FfoNOL/+a0DlGrU8if4B8DLq1yebmPDpf
Z5bvP132k2L0nlPO/1DuOaeZc45rNvlu1l3YrvYZ6Uw2t/LnEPTW+6oU2W7+
/YrOE/SfJuvb3/l/yf0Zm1k/KS7FV+W5Uu53eH6Uy3avhepz2fv/t8xqI7ly
XOn1VZ1r3Df5qBqf9h3Q4f2gGrZ5z6hfil7TFZntwvm+fz73eS8k23HaA2XJ
aqMaaT7U0+rtc9HsdY7uqXB/1Jt1vmeuorM52vkVyDqj5VN5XeR7Q3t3gM/7
zGg1Oej7rtV3XZnXrcf76aXXSLWaBy0BF/OW+2av6TW/6360flJfqe+0U3SX
9kS39+0an0f1a5f3uuLSPGnfaY+1ZlZL1UI76YbXXXtIb4nyOD1anaSj+h/x
90A7oNZ30Tb8LXef5fsZn029FSX+Buldqvb8aL+2+i5tgZ9I5qN2/2P3Tbv2
qM/C22i9KN+08z71907vXoufI7uR7kMhbzt0vPey5kdz9DxnOZXOqJztpnrf
cwWXKw7Fo7ja4N/7W5nPzEY6umeavwt6H/SuqK/0lmqnK1fq8ffY2fNa
"]],
PolygonBox[CompressedData["
1:eJwtk8tLlVEUxY/n8zRqWCMn3tJBKDdnJVGEZJpCljjoqfagYSGVmVckiHBS
UAMdqJcIsqG9g4YpWmD0D0SQRkTDgrJBVL/VOoPFXeusffZ39uOWTl/oPR9D
CHtALbhUhLDO78aaEC7DhwvzX5y9TiGME3wO3gta0E34q/C3YBa9H4zAr4BJ
Yh+BW8FnR/AW0PfgN8Ep9FkwB78PFvHmoz3FDODNg+/wb6CNb21Gt8J3gr3E
ljn7BH8H7uJtSvZ2gN34z5Pfrpq6iJ0FpRrXpNoqxBwOrmkM/hW8DH7TEHf3
oXfBe8AWdEd0r1R/Q3JO5VYP1Is68CH4zXq77ujuQXAiGuKqoQ0+nfurN1Xh
vzl7E5xjkrulXI/ij+P1g0PBb2qHPwF34BVQhY+AM7nfmkVz7o96oF6M5fkp
vhO9Df8j/Ad4hl5K5j/BRbzlZL6ed2MxeRaqbwg9E53rNjiKNxU9e82wD/05
91PzuYGuT56NajqGt6Gwp5iJ5BoqeR4H0KO5HvWwjL6evGsr4C/e4+hva17a
pVDYU00z6NqcXz2ooqeje6OcHejOwrWo3w/R3YV7pfgXyTuqWrTDr7hbn+er
GU0lz6Q1z/dk9E5oN7RTA+g/eZ5PwTW8rcmeZqhZbk/mOtMuDuf9+D/D6B1U
bQ/AF/Ra9H9F/VJvy3m/lOMqejD6+9rRRrz30d/WG8bR/wA2PYFg
"]]}]},
{RGBColor[
0.48006479937914026`, 0.38193625481192695`, 0.7917694669943931],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFl3eM1VUQhd/e9+6j16AUDdKLIEgzRCCySGeBgEhH6QhLEZG+NJcgmAjI
gkhRECxElEWKiuIqHcWCCSaARI1BURFdA5Eixe8wk/jH7D1v7tzymztzZrb6
8Em9J4ZEItE6I5FIMj7NnxLgwzGRWM44H+laJJHIZW4CMhFZkUokpqHPRL+A
39nIeGQ1+unoR6eZY/1QdFPZPI9xDjIXGcjvLMZqzK/G7lXs/2bdWPRd0Jdh
z2WMM5FZyClsJmDTF5vj2KxHVwGbAdHm16GbjYwCN0Y3ivv/Ba6MzRhwITiy
fiY2I8GNsClgrxXoJrP3NfRHdB76jshw8Ax045ifi8xB+qfND/OQnSnTT0rb
+dpTZ3+Pfi36a+hzg/mqPzII3J2xOntn+x5avzCYL1ugL2TtBnTnGPPShs+D
5yETwQN1Prbj3Neb0c9CPw79IvaZhO4B9nkW/CS4JXhBMPum4EeQqXo3dCcY
C5BPkCf8TfQ2FZH7kIbInT42QE4jh5A89rjF+vfAueDyjPWQukgxfjfWGuar
cK9GyEV07fD/GfTbwIfAjTNsfhj4T/T70fdgTUfwaMZO0d59LbgcUgJ8k2/t
if058F7mj4Gbssc/4K7gn9Dv1j7Rvn0x68oy1kFqI13Q5zC+jH4V9kVYewrd
i+Ci4NPg0uBPsVkOfglcHP0ZxSe4GPg78PvMb5LvkWPyhd6W+TJ+Ti1kKL8D
9kuT9p1p5CS2GUgN5it5DM7y+K6A3T7GF5h/G1wX+9/AO8D1wb+Dr4I7gsvw
1vX5/TD23dhnEfqb4M/RdY4WgznoF2C3Rufit4rBztX5yh/lUSbzbf1t9cat
3Vd6x34ZFvdtsempeEL3Bnu08Xm999aE+ep2/DgPdMP+QfeBfNGSNS2Uy+zx
it4EWYK08ftUQL/QfXo22F5v+d7ijG4J44hMv6Pi8n7smjCWjPYOWqtYLE6e
12e8l/mjzF0D9/C3vQi+5HfSO5X1eD7oMd0auz8YhyQtzhRv5dnnB8bP5FuP
XcXwXdj0d5/L94o5xV5D8K5oa+ordsBVwEXD/7mk3Ho9Wu6Vw2ZAsG8U8Tbw
GFYsr4t2poh4rufnWOQ59HsZC7FfAT7g39CT380Y70ZXL5q/2iGVPR8bMT/e
OTkrbXykecVQtmKdcY3OUD7Ip9ingt3/cspyRrmzIxivid8WMT4TjIeaKV/5
vQr9l9hfDMYtJbn/8ZTpL6VNhGV7ImXxucDvo7rRXFyOPgf9o+jz/V5rkcHB
YqsGNhuD8eAuxoHRas8m5VS0mvEuuC1SE3yHf5PsZXcS2Z8w35XBpjjjDc4c
H+2cD4Pxr7hXHPxYsNyoyfxHXndUf0Y7XzVA/7jnRq1oNUk2H6MbEewt9CbD
guVb3WjfK98rj1dFqzvXVb+SFreK3zfBtbnDz+Bp4FLg9UmrGcpN1ZB27hP5
Jtd9pbcc6/mo+nw+WMxMicaV4swv2Gelx3MV8GHnZHHzUcUW+lHR8l9n9VEM
MFcNvJZxA3NnFVdJq5e6/7+sOx6N90Y470XnPuHGXg/2BcvbYdhud64T58nv
8v8exuYez4rryUnb4wD2fbjPGHAv7tPEeSCLcar3KupZnvI4V7w3RDqBa7Fu
S7QcV64P9reWv4ZEe6/bb+u5rFxU3dJ9DyaNf8XDu8F7nJPFzXobvdEW8CDP
ow+CcZi4rMDjVW/UXm/l98/iXjOicY/yN5k2P8gfV4PprzBOcb4Ub6pOKLaX
JqxOq5fSO+VH47fO4qVo89uD8cZKt9O8eFA1L9/PVPwXBOPlb4Pxo2qc7N7x
HFFNqsbd+qCrk7Lv1PeeYZzmvYd6kNLYPAy+Ij4Mdu7OYP6Sry4kraZke+x2
8JxSbmV6X9ePfcZFO/sr9D9qPXijx4piZr/6DtVCcLek9Zd6a725arBq8YCk
rdmgN1BsRHsHcdJg76OGpKyXEpau0HNEubLE18ovqmfKI+XTFOfeC8FyXrnf
y/NO7673V4x3QNpn2JxsugeLP8XhDe7WHPlVfBWtB73dB2BTKlrMK/bVd6r/
nMZ4T7QaoVqxyvXqT2urnwMPRdcnYfVBdSLf+VJ8phqpHFGuTPF+5lC0O+qu
yvsc75nVO9dI2901P9t5eBvjLey6aE3K6oHqQjpYj65evV+wPniu97XXsKmK
vjT65zNsH/XPy31ePXS287F4uW+wfdT7X/CYKZa2Gq0efit33uz9bfdosaRe
qGba6qvuo3qF6naNVa3VXXXnOvrfwvvwXBf121ns85r3yT081/XtiuN+7gOd
odotDhd3V43Wz7Rm3WKPN/WA+Z5P06P1fOJAcaHqgepCp2Dfo+8Sf/zivKe8
X4LNN8rPpOW8cl/csMf5UFw1JNj/DvofYn60nuRmsL5fOTgzZX1hR7+3/Fbo
vjsSrXaohmT6/0GaVy/Vzr/tjOf1dWy3po13WkXr9XR/5WrbaP87LAv2/fKD
+rsG7puHxE3OWdqjmfOz+rXefk9xRiXvXXX2Yve//l85EIzfRnp91HupJ1Af
kOPx2Mr7NHF5nvOn+PJr9M2wuSxdMM4bE+09G3ms/wfc4bof
"]],
PolygonBox[CompressedData["
1:eJwtl3uQj2UUx9993t/729zWKiUVdm2tVSJEMS4r67IsldlmVzOilXHJnWUY
IcqtiI1dl3JNDZUurhW7a3dl3GrM+ENoohI1RRMRxfb5znn++M7vnOec97me
8z3nl1owbsBYFwTBaRADaVEQdOK3MxiMIR29K3ImeBG9WWRyNzAUfSp6JXIF
uI6+NCEI/maiVfEgWA3aYn8Z2yjwKvbH0UcHNjYHvT36OOSx4DX0NpH5jgSz
0aOQfYF3GV8LUkAOtr4gX/7YLiAfB7WQWzLWCvk+UBPfJ8H4wNaYh+1fcBD5
DFiOrRUYhvwSmIYtFb1fYGs8jz6WM7zCmWaC7ZyrXWR7HQPmYj8HdiIf1vl0
FrArsLGz2J5BX4A8H2xG780eryAnMl8Vtj8Y2+v3v1C+YD74lfHfQAHyJmwb
wX70X8B58Drj80C3xCCYwlxTQQn7G838EfKf+HdHHgwc+u/oXZDzwG3ki6A9
8gjm+BB5KzjCvC0Z+xn5BtiF7SH0H5Cvgk8VC+iXkE+Chsg5rDmc+aeDAdzV
C5GdVWfey3y52Ecl2B3mYa9CrwSTkQvBo/49deeT8b8bPQ35QcUY+uf4Lubb
DTof/v+h19DbgrrYh+K/BPktUIleH71pYHNkot+jMyCn6z7QG6BnIDcHPdGH
o7+tWACH0IehFwU2dgC9b2h3UYf1D2Jzfn9aowH2MLK9aqwRegy9mV8vBb0I
FCIP0XmwRZGtrT2kYbsVs7PUAvXQ++lOwR78vlAs+vxQDL+HPQ//MexlNsjn
PsYoL7CtA6ew94ksd5RDa9FzfLxqjk06j88/xe8GxXdk364H36P3Z+2byOfB
bmy5ocWKYiYfeVrM3lpvnsv6HfHpAN7g2zfBGjA9sJzqzfiMmO1Vex6I/zrs
M31+a6/ao/Y6W3tAniU7eAxba/A03/cHXfi2K+jBWBYoxqcEfObs7bXmQMZ3
oxcrF5W/kb3pch/fR5G/BR8jrxQHYT/mLP71zUj0c5zxLKhGDlhvo7O5dGe6
ux3O9ir/XchX8P0L1MK3NnhOdwa2YfvE2Z2u93wgrlCMK9YLwFRnOaxcFseJ
64LQuET+cxjfj14OvgRfgcuMXQKlyGUgEcRD4wxxh3JSuSlOLkJfpb1x9ylg
TWgcKa4R5yzCvo89vOP5Sbl7f2jcKI5cgd7Zz6eczxQ34L87ME4aHxlHiasm
IE8Un/r5xcltkR8AhwLjEHFJc88nOuMa/AeFxk3iqCHI2aFxjXx2YE9FTwHF
yCXKHWIhF9/uIFV8gK0tcjaoDo1zxD3KiVLkfXxT7eNX3LeYsUmen8TNH6Av
DGxsCfKzns+0Rifmn6I3wFYOrulbZ7msnM4Ud4LL/n7Ejcl804tve4Ib6Ncj
218bcES5HTeuFmePYK0KZ9yumqHaUQniCcbh4vLV2KcFxnH5kXGw7kc1JCu0
GqJaom8moNdn/j7+Pm6jT3e+toFe+B4ANbHVABNDyyHlkmJWsdsgtFquN783
tBhXrCtHVCuUQ8qlUt0BermP74+UV6DMGZ/oTrcgv+8sthRjg/Df4yz3lIOj
0KucxZLOJy5XDVVsKGZu6a7RB0e2hta6Fdr96j7vilvN0n6U4zuRt/t8F8eI
a+rhfwK5DCzW/TlbS2uqtm6MjN8Ur+ol9Mbl/rzHfA4rl7WHIT7GFesXGLsI
vo4sv3Snk0LrgSr8+cQ133i+UQwplmqHdnfaU53Q3kBvoTdV7Bf6+FJNVG1c
Gtl+9H197FnYOwZW01Tb4s56HfU8NRQLGlMNYjwDLPPxqz3pbRcp3p1xtrhb
d1Lm4zsJe7rPL+VAx7jVTNUy9YQ91KtEdle6M9WGPMaykduBxnq7yHJNObcg
tBqvWl/EfKUx4zBxmThMXFag2Ausx1SvucPXe/UL6r30xnpr5ZByfa7vr8RB
CehJfN9YXKP7xPaEM1ljSeiN0esGVqNVq4+GNp9iSLmqHkM23elTznIm2693
HLm2s35D891kb/WYIxl0YbwraJho+a9+a3hoNV/3lQyaOKtZql0P8+0j4CfG
fvQ9nHq5ZL9/raHeRpy/0/NBtbMeQb3CnaApcqozWT2Geo2KyLhHexgWWu+t
HnwzuIbcy1kvrznU+2zFZ4t6ZsU9OIP9tGou8izQwlksdVf+o5/0fCSOWRFa
D6e3maGej/k7OHt7xUAjfL/zfHQHKMa/H/ae2FrrjZzVrFJfM1U79edDvbxi
XtxapR7e83sSa22L2VqKCfWCU5zVTtXQQc5qrmqvaqRq5QQfa8tAOf7/hDaX
YjoFW19nZ9MZG7LX9Li9tzizNf6nItu7crJE/Bta7VSOFyKnxY3bFT8t8D/j
+VR21docZ2fVmfurvut/kGzgRMz+06j3Ucwr9q/GrLfV+VbiezqytTXnytBq
nPafBTLwPQIO+x5avfT/wNCkBg==
"]], PolygonBox[CompressedData["
1:eJwtlEtIVFEYx4/3dmckqAxaiI2V1lROSYlNoZa9LNAyyZHIlWlrNYhoY+Ui
iB7Sqgc0o73ExhQ3gbqIWgTSKi2DHtLDLBUiRDcqlv3+nLv4zffd//875557
vo/JqmusbHCMMYXgwUt+XsA+15g/PNcSy4LGNKcY07TEmD7oh3lq1qEl8N/C
O6iGRdY8xysgL4S/bP4arRntC/lXiEMTWinaRfJL0E/eB/msGcerIJ5HryO/
RSzBOwT3XPveQeIsz3NwBh5R94q6UfgBN+A6tMMV7UfN7oAxVazN4fzHoAJ6
0X/ib2e/o1AON1lzDu0J8Th+Jewkj8Jy8jV4abo01pex3yr2HWbdezgNDlqN
a+9R95lO/oHyPcQkz50+yovRfuMVEdPZM1t1xDS8ldAKCdiKP4oXIRret4jW
Q76Jd/0iPtYd6JzkE5Ts8O9ffYjCMFo7/gO479nv1XfnEbt57oKD5FNo+4l7
OUMxnIQjaGt1T7x3DKqhnvd+JD6EGH4YP06egJD6iLaLtTGoUo/Va1ggH8Cb
J0569vz6jiR0Qp7OBqccu+8F4gTP4/AUP0x9B9HVPUMK9FJ3GX+GfkzDXc7Q
Qt0z8hL8GfwezSt5lmvPqLMeZu8cvKVB2zv1cNCfL823ZlUz+wnaqGvw501z
N0RdPnVv1Hf8Vvx69M/kI7CCPIpW4M+N5ieV2iG0ba7tgXoRQl8NmbAez0GL
+OfaSAzwHIQM1oygHXBtr9SzMP4Gx9ap3kPbwjdHYLO+nfNlB+z8ao6T1F2l
roPYDV2OnXHNesyzfVK/MslL0U6QL/NnRzOk+dKcFcFZtBbtB9cgF38MrQ0v
QB507axqZuOe7ZV6dof8Nvzz/xdCaAue7av6+w2+w3+QWo6s
"]]}]},
{RGBColor[0.5937274791023952, 0.5756170398221259, 0.9101805199534891],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxNlnuQj2UUx99939/zW13YpNpd1q5WEVnTurUx5RKNsJrRsiv2YiWUQSKq
MRvKbNrRRbXtEIUyKRSKKTVNIzMRmhpqXUYm08iUf0zIZfT5dk4z/XHmfN/z
nPd5znOec7u5dsao6XEURVkZUZTAB0HdoZwQRcdSUbQC+ZV0FC1nsQDcBH+I
tUZ0tvHjdNaWIt+K7nHkt4DXoLOZ7wbwRvhN0D3g7plRlA3uD27Pf4XwO6E+
0Bn+zYW3hTJSJu+E/gLOGMNZPVkfwD9jkJdD1eCZ4uhOgGaB6+EVyKdJBzwD
Ph6qhE4nZoNsKWavyexZx96P+X4V0Dl0BsLzU2af7PwLWQfwIPB5cGCtBNwV
2xam3AbW5/93HvgKekPBl+BXI++rc5EP8bN0h5+xoZ3fV+fp3AJ0gsvki+XY
+DH0ETQT/e3wE9j8C3rzWJ/Bf23SdtZlzuqYYbbJd82J4Z2st0jb3eWDjmm7
q+wYwv8T4YPhZcifAT+VsnX5UL6pc67vYnRq4fei0wVcDb4LPDht/tc7VLtP
qlLmd2H5ZSDfNfC74fenDUumvbTnJHg58qngMnAu9x3MfYdzX8VnDpQdWYzm
+vcl9Arg16HAc0TtoTxfUwwXQX1i08livy7QWHCFx7l4OdQJ+Wh4rWINGgou
g+cjHyYd8EhoCHiEzoLagc9zfoxOS52LbAf0FrgqmE/l217c6VPkryPfCi9G
Pk6xrZjyu8uvx1nbis7R2O6J+N9793A/dk6b7+S3IvBvscXDr/ARnPcceFFk
tldBlZHFgXJMcbEkNnk/dHv7ntr7jgyLwzyPO+FvcPLfwfJdef9sbP7pgWxh
bD7rBV4Umz97B4tvxfmJxHKjxGOwFfIixSF4Mfrj0C9Bfy54Ang2vCgYngN+
AqoGqygN13ng1bHdTfgd8NtQHXhlbHVH9eeMfOlx+DD4vkzLEeVKY9pqkWrS
sGD/rootP5U7yqG1rC2Rvjg6P6BzDev14P3gzMTrosffOf7fCJ8r30N7FZvo
XEC+WbUF2WV/0wXB4q3of7VVvBvrPaEe4FJ4P/7/Cbw+mCzPY7o/8mb4B8HO
Vg5gZlQM+F4+Qd41MRtWgnd6zZgX7Mxst7uQM9rAO+rMxO64Otha7Pu+y/cp
eF8+ekE/gtciGwg+DN6geA9mV6vYcq/A8+wqty8NXuz1SnFamGn9ZQd+foR9
UuBl8KbI4nY8uvnoXASPSsz+TX4H+U4+VH7Ip/LtkdjeRvbrHrJPdrYEH4rM
Ttm70t8lgKugDM5tSMy/8nMO+DXwLvDF2N5yo5+d6z6X72s9/pUHD6LzovwA
fgH8OfhP8DpotuwP9h56lxb8Oxq6rNhNzHeyrS14v8eP4mhKsPqgOrHHa4Vk
qxPrp+qrDW7/PnCN40r4q8HslL05Hj/Z7kP5Qmvbgvl2ZGK9WXsehC9ze6RX
7z1UOVThNpfBp6YtL5QfK1KWU8qt7Njqnupfk/tM95kW7N02eZwp3gKyPinr
F+obqo+qk1+w/h30Pvhb+BF0lqtWqQ+g8yHyverR/i7y2ZdeY1VrNZdoPlma
trdXDFwLX+pvoTfR/9rnLHy3n3Ua/lVs71jD3k/6WfuQzQmmI7se9TlnO/gT
fxe9T43HwCZwJXgx+L3Y+vXzkX03eT1WfI/zOqZv9RzVTNXOWcg/A5+KLaYV
2wc0U3nMHwMPCFYPVRePJlZjNVMoznTHl9SXvH6qpqoul/s5Z/3uut/jyrPI
+sIqr59bYnsbvdGtsdWXZo+HOu/5mqfqOfd68G7lGbg3+EKweqf8Uu3Z7/Oh
+kaSspnuRv6d6PNbZ+RTvCeOSFs9lJ23BZvDNI+tiG1f7X+A/SZ6v9O8UOZ9
OY/1Pazla14Dr3fbflcOJda/NFs9nbJZQjPFDcgP8u/LyB9wXzTE1j/kB/WE
+W6DZsN16Lfm35PgtbG9aWmw3qN3VF8q8xzZAV4T2zurD0/y+vZ1sDxUPr7i
NVm+Vb5O8HrSyXNHsa0YfyOxPtwcbFZUb85K25ynvCsF70pMrnXVaNXqsYnN
5fL/kWC9Sj2rCL7F+6Pm9Dfdb4eD5ZvifDL4ZGxxqHic7X1ZPbmbz4KaGQt9
9r49ZXGp+FR/O+DxoIZ01OWK30bk7ZEf8rvoX+2xwfNO+dca6qB9NMepRqje
IitNrF6pbm3TPMG/fwSbddRTNAtned/RDPgPtCBwQA==
"]],
PolygonBox[CompressedData["
1:eJwtlmlslUUUhr/7LffSFqglEmxZClXLvgSwRaiypCQEZBFthS4glD1IARW3
H5UGCyqisthGhBBQJAa1oAgUU4sCouwKKNsPjaIBiRDZsdHnzZkfT3tmzpm5
8505y3SYXD52ju953n4IYSODKv7Pg9GR5+2Je16/mOfdCw3IMwLPmw4R46f4
vxGbi9hegFzGD7LJRHTzIR/7k8zdh9wfziF/hb4e5qGbD58gL0X3kkAOmQug
Ftst8D37t0CXBlWM45wv3Z31Bn9mMp6APAwKkeMJz/sA27fgMvtks+Z+qGWf
LTACm3xsx0NnxumM74E0/Q4cwvYg3MXaNEiCgez1MFxivhnjIciD4TrjGtZW
QwFrC+Fz5FXsXQHrfPORfJUOx9FPY64Y3VAYhbyB/dbDGlgLZwPzlXy2Cbkc
m4nYPgN52h+bfchboBa5kbl/4Rdsf4UC33xRCt2Yfxt+Qj4Jd6Pvhr6HZz5M
QreTuS4x+0Z961wohwrG2/BvDNmD89j9Aa+z5kemftB6xpXQ6Nn9LEZugj4B
nfidzrA9tLt4lz1WQ1Fg8RJjbgJyBveVnrCYUmy1gDR4gz2WQSpkYt8e+rFf
E3RHkXfBq+g6smcpe5VAH37rPOPf4RSchpu++Uo+u4U8SzEDy2EFdIdhrC2C
XshN2bM1tm2gF/ZdIosX3dcUxhG/fwh5B1Shq4FqaMN8W9gUma/l8wGMU/i2
ZOjC2q4wkt94BMZytsegPrLckU/km898ix3F0DbkHYov5EooxnYKNmXQgLwb
bgYWj92huYtZxe4t5m/DCH57OOzkN+ugEt1C+Bn5FKyP7C51p321F7aDoRpd
DRyDo3CVNdfgeexrXfzJt3nuPvXN+nbFoGJRMaPYyUA+4/y/0uWgcjGf+aHQ
L7J8KIHF7HctsFhUTCaz/gpzl+Ei/AV7OcseeBbdAujN+gLlPixEvwtWe1bD
SiOLWcWuaopqywX0deiOwBL0v/l2l7rTRYz7RLbXE/I5uk9dfVoHK1nfP7Lc
Us15Df0l32LxQ3ha+cT4Fc/OUOebz+S7F+BFOMzcZs/udBb2WZytQ2AxpFiK
QVN0zaCVvhdda8Um7EN+E5YpB7A7Bl8j74Zd8CXsCSwWVG/+iSwm27gaqFp4
UfEG25C/gBLkRZ6dWWdXzin3mqNLhRN8//HQYkaxo5qs2rwZPoY7zN2GKlgc
txzTXevOV7BPHuMc5OHQjnF/N1Y+t0QeIJ/GLSeUG9tdvMtHM7Ff6lsvks/l
+47ufnTnk9C9zJoKKGKPYtV7Yjc3Zj0rYj4X+xx9o+4FWmKTEzObWGgxV+L6
3RLfaoJqg3JAuTABeW7MaswDofUs9a4G5N0wjb2nwl59N1xVLcC2LXyLf3qq
3kIy8ymR3ZHu6m/ky+pH7DUZ2zKYwX6NoflGNS/Vtxpc4fqZamlGZLVINWk4
+vG++VY+zUS3gvFyGIw8BK5HdpZ2cEDx41svUU8ZhO5GZLpMOKL6A1sDixHF
ypTQerl6+jDOWsB4NvI46IF8K7RaqZqZ8K3n6qyqOao9qqHS94Y+yH19k9sq
xtl/ZGSxpxjc4FtNVG1cwL7PQdfI7kc1Qr2zzuW3atDsyHpCe/f9irWxrHkU
8tjjIRgVWS3Qb7zvW49Vr1VNVm0+wdxWdGugHnlTaG8R5bxyv1NktUAxV6b4
CazWqebp7aMaqVo5jT2nwzcu/1ST9VaY6ttbQ/elXvK4+g+6QhiE/qjrT/om
1a4/I+ulevN8FFgPL3X1cYZvPWio88d032povqshqiXrfesVyqEi1s5y8aH7
1ltCNUO1Qz1EveSUi1fVmFWMj/nmC/nkJPJpFz+yeUc1hjOnIt9RPics55X7
qhGqFXqj6fx6E4xDHhWYrdbs113qfRGznKrEviNkh1YDBriartquN6Leimdc
fOoM1YG9QfUW1X5Z/P4c9z7SNyoXslUHXD/vyfok5hKunytWU3yLPc0lI38X
WG3V9yl3u7P+SRfvOaHVbNXuQ8iHFZOB/bbOcA77g8wdcD1Jvalv3HJZOT1E
PVc9AUazbozelsgH1PNUe6E0tLeLfFKieA8tNhQjA+PW49XrJ2E7GXok7C2q
HtkqtJzUWXXmMsaZcXubKv6yQvOBfKE3zn+sz03YWD4aF1rNm+f6pXJFbxS9
VfSG01uuGXJTuI3tndC+Wd+eBWt1/sDecsoHvQWUc8q90diOgbOR1RbdYY16
F7r3kFfDWfRXQuutyrdqdP8DxFxy0Q==
"]], PolygonBox[CompressedData["
1:eJwt1Htol1Ucx/Fnz36/aTpcswZNEyysoNIsqoFFstFAzDGdTtNJ5GSzrYtR
mZfVf92YsEYGChVEItM0Mi3L6EJB3irpAkIR0R/dXWU4tLasXl/OA7835/N8
zvl+n+/ve855Lulc23ZfnmXZQpRjrMyyVrzj4ZzndnpPVZbtxk28O3hD9Ep+
B5bjV9575jaUsqyvIsuWmF9Et2Gh5K242Py8yEeXUcJZ835ZJX0p0SR2utjL
6SsiXu4x8y3Gg+LfRov5DdY9YP4e3ItneS/yTtE/4edSqjFq7ZG7ZlyWnY+l
4tvxKm+zuZeNb1lXEtvlHfXWTEGX+E7ebeZ66F58h37eFt5Jehh11l6Id+V5
Qb7P413yTMKg95zg1dGXiZmBc/Q8OWZGLs/P0d/So/QYOrAiestba+5R4yzc
Tl9dSjkiV6c8q/BhOdXeTS8230NvMrZbsxT/0f9isrqq1XJBnvoQ/VhGz+f1
GtuwCC24jjdV3gPiBuTbH7XIdT++xleRm7fCXMO41P/YhwX81bxm+kn11NJD
xh/k+hHHUcG7kzeApzG7yBP5GsU3YUQNp6Ne81+qZbO4u/m92Ficr53GV+Jc
4hfzk3n99PeYQ39j/CfOL9Zb+zC2F/vXI0+d/NPlrs1Tf6JPB8S8gd9wi3Xj
q1K/om8V8lxE1+MurORdVU49i97Nx628et4s+po89TB6eX1x/uMenJG7Ue5q
uT+I/cME+kre+/RpjFSm/xL/6Snjx/J8gjXiO+R7wnij5wb8pe6pvPHFfYp7
NRbnCZPoaeYmGpusbcQ6ehVvME9nP+7AYv4z9BY8jsdwA2+5uS56E70RY/Qh
3uvqHVXX36ihZ6vzKP0I+nDE2hreenpmnuqr5l0bZytPdzPuaNyj2I/d9GFr
p9Fn4r/Sn+KEtfvEjubp/VHHKfxRTr2Knr1pHC4nfZDeh/24mfeQ2IE8fbf2
FGcrztiyOK/Wt8e9sK4Wc6On1s+JfeK3Ym5Vuk9xr+IuxZ3qK85ffOf2en5N
zGd5+gbEt2CYPokH5RwydzhPZz/uwE51zRD7UrHHsddxDuI8nKUnWjOhnPYy
eha9Gyz2q5m/ld6GNWK6q9L3L76Dzxsbim/wjvg/cXYqU1+jv3Hu4+7EHTok
/qPIYd0u64/lqcao9Yixi9+N88R/weuPnvP/xO95illXTvdzpNjP2NcFaDY3
xdz/vXa/YA==
"]]}]},
{RGBColor[0.685214183477007, 0.7226107173058707, 0.9122661350303296],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlM1LlVEQxo/vOe/xpggFtkgXURCFZV0kcRF9YItKim73UpCFkd2utSnB
SFu4SaJNYYS4iSBc9Q+ku6KCPhdF/gvRqmVZ0abf08ximOfMmZkz88y875bx
6/VrRQjhAhKRTg4V9N8UwidksS2E2RzCIHgMPIauI1fAM+hZZA58Dp/LxI4S
ewd9GvtZ7MPYG0gLfCLZWfYqeDvSAG9FH0Quys79mWz5G9j6Ssup3L2cD2Ef
aA/hPsV2g3cgLXye4vMWn3aE8PAH3xFwFdzD/b5sb+nNQfAp8Ef0Bs418Cbw
HvdX3JC/O1GYCDfVF3IEXCusT9nlO+OcqPZ34AXwNHg1G2+fs/Ujn1qynlXP
Zuy7Ssup3FPYb2F/gu53Drfhs985Eff3kClwM1vP6v07+oPjN+hx+In4vCzt
PcUqxwG4uwGeSJZX+XeDL3nOo9iuZqthOhmP4nMdOR8B5rGvJItRrOb8LJl9
kvth53MveFQLBX5ODZVss1rG9p7zevAc+IXvz03159yKj17npF6YCOt+0mtY
Ttan+tX8NT+92429wrkP+87C+hcPTd4qOXMMv/HpLG3Wmrl2XTvfVVj//7lN
Nm/NVzs44LvRj16KVv+30s6yK9+Q7/kxfSveuzho+Sw0k7seexvdht9x8Ebi
InN5DH4A7tJOgF9He0P+invoeVax/Yr2LfxAH/Yd066t+Cw0k45sPj/x+eLf
sr7p+WQ7oF2oObfiu8c5Ua8nfQe0j9F5E39fk9Wpel9Fq3MtWh16S2+uuV19
VH1PtMvaA3FynvsO/8/of/MPFzFuKw==
"]], PolygonBox[CompressedData["
1:eJwtlltsVUUUhnfP2XsfBBMppQVripEmVErERJGDICYCrQFEuUQuCQIFhVqk
JWICor7Ag0qBYqhJm3B5oNrKRXu0ChRIxGAEIihESiiWULxQIyA11BjAy/ez
1sOXrD2zZmbNzFr/7AcWVk2vTARBsBVCWBEHwatwmI+vYAoszgqCGTCG9nq+
62AJdjm8x+BNUAf1sJi+l6AClsI7+LwNZ7DboBMuwhW4Kh/GVEAVLIe+ySC4
B3IhD/oxNhtuYt+CTuyLUMXY5fA+di10Yf8Gz2JPgWXYlbASXs/yPdBeAxvh
R9o7IIPdDLkp1oPGKAg+hDRrjYLD9H0Jg+krhAeZpxff1+j7A85jt0OavlHw
rvYMC2lbBEuwX2NMGUziuzC0s1Q8ab6/h3nYz8BR7OPMeQxuEEMP7KFtNzRC
E+RzRvdCP/py4FPIQAljShUTfdfgBvTAWdraoAMuwHh8x0V2Z7q7ibHFtwIW
EdtQ2nLJg2LohV+evuE/JQffY7BHe5v6Ghi/A7bBdriKzxX4jLVaoD8+OR6z
Yv8iaWfYH37H7ye+L0EWYxOxraG1NEZjj9L3DZyAkzAcn4dgJD5p6Mb/Ouyl
b1/Scki59ARtYyOLSbH14W7uhlrGbIZx2ON1X4wJPJ4N2IOgAIZAEQzEdwAU
MMcgqKZtHXzL3CfgkdDuTnf4GHYhfYOhjr56eAv7TVgJq+AQcxzUXKx9v/IJ
uwgeZewImIbPVHgeZsJErz/l8HP4nWZvp6BNdwu/4PMz/MNa/0IX9mUI8Y0g
RzUEG+mr8ZxR7ugOdZdrmX8NzMd3AcyibybspG8X7KZvl+qUvld8Ts2d8Xsc
Td/jMIG2Eu2FPQ2BiLY4tJpR7WjP2vvXcMRrSrXVwDw7PEeVqzoTnc107Bkw
DLsYzmG3QzVj1sEtuB2bJtz0mlHtZOPbN2WaIm3RnevuhyUsp9cyZg2cI7Z2
+Du8k3KBUi+VMA2QFuiMddb3YedDOXO/DLW0bU5YDamWDkBrZHemu3sxtlpS
TdV4jipXh9JeHJsmSZtKoBQu0/ara4i0RDmj3CnwXLzte5WGSksfJpbhKcvJ
ga6p0lbtSXuTJkobpYHSwiexx4ZWM6odaUSJ52ih15RqSxorrVVNqDak8dL6
D6DBNbvTNVPaqTuovnNo1KtrqrR1AOTFlpPKTWlyl+eQckk1qlqVRkgrLkFn
ZDnQ4Hesuz7iuaIz09kpx5RrqmnVtjRR2ljktZpxLWzG55PQ3gS9DRdc+3rT
1ic0TZW2SlOkLfn4TOOupkK2apn9TIZW7AOhaZK0STWl2qr3t041olqR5kv7
Z+M7R7oPZf4G6C1QDe30nFHuHGKOg0nTLGnX04wtTdmbprcthR3Ddezu2Gpa
tS2NlFaqxlRrZb7WU6G9Lco3afkb+K6GFuzPY3vD0q4B0gK1tfibp7dPNaZa
a/Vc/hh7j2uctO472k5KO7A3JU1zpD1aQ2vpH0D/AluIY2toGiGtaML+yP8B
Klxzpb0jYjtrnfkEvnsz513QzZx/QiX2MviBuc9E9obpLavGXi+SptXS7Hmu
QRmPWbFLc6Q90gxpx1+s1wOrdTbKB+bogG34bvd/DP1r6M1vdI2UVuofRP8i
Tf72SlOkLYpBsShmxS7NlHbOZ80FoZ2RzuoUPqcjO4Mmz8lmz0HlYp7Xyip/
GxSTYtMZ6iyVE8oN5YByQTmp3NyPvS82TZI2SZPK/cx0di/QNzc2TZe2/w9x
Xzjm
"]], PolygonBox[CompressedData["
1:eJwtkbsvg2EUxk/7fW1XQxmINkjUIC5NjO6XQQwuYVG3qiYWEhWCVNAYJAaX
xiYRIbEzEomEFFUpf4CwkjaalJHfm/cbfjlPnvN87znv95YFZ/tn7CJSDg6I
OkUObCJpUySP/oEE9ODZ8CpdIj5YxIvjJfFu4Q5MMKDQytvRK+hlSJk6n6C+
MshAhw2RfYjDI5k+vCL6NZxfC5N4QQjhRehtU1/4Ng0hQ5+xRx2CQdiAArx7
+qtkY+hr6hxnRCBm9Y+p72Q+HHpvtf+CU+c30U/4SQiQE7wtQ99F3clP9ZGt
gm6YwGvHm4Iw7JJ1q12pKc54Bi++B7zkB+hVmHqOmhelBvBHYB29BsPWLuoO
4zAGowo1i54HSiHPjBa8Eno55lSjb/Au4QpyPOw3fMEZV5kn4+e7eqfeWe3e
THVDL7rN1D2V8bv02b+GtTvUWfdtRTdCE3RBJ3SY+v0ayFzwzTl8OvS/UP8k
CxlDv6/KFZPbgUP0G94fWlx6R7XrAztnIAtH9JfITZM5QZ/CP7m3US0=
"]]}]},
{RGBColor[0.7752667142290602, 0.851211674004863, 0.9083702113486568],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtkz1IW2EUhr/c3HsFp9D4A1oEN0cFBUHpErCiEDCCXaXGHyhERNux2A6V
UCWJCOLQuYPQKYMgWTq1ghYs7dapCIKIVHBSpM/LOcPHee/53vd85+/2v1wt
VaIQQpGT5UzEIZQzIVSwn5MQfuHr4mIb3ALfQc6D+8E94E/wqvBX0hBuI+O0
w9/Cv4Z/vA19ZPwxbM1j5uFsotmCc4Wd4/sB/wz2B5xO/A3wW+K8B7/DjhCr
BD6D/wLOG/gHkeWh+B3YDc9TuShvvZXD7qP7kLH3nsYW5zn2xnOWLnhdyvc4
sXxm0dZi05VTe0Mccb96buupxVJM5fjdtappzPnq2YzXqNg5z039kF5xVOtf
acCP+Jf4fg2e4v6P97mWWu+kHc3anTjLsWmkvcBfd+1iajzxNc9Jn+9v/HuR
9fAQ23BcgLMDPw+nio3gT4Nj7HZsPVxAe8/dEPgJeCS1mNqdFv5u8G1iu6Le
qseapWbaxB5xusD/4HzzOHfgZ+iL4EHiffEcBjRv54j70f26l0b+k6wdYeVV
97e0R03H14ntimpUrVWPc4r/EjwOjlJ7T3714ND52rVX3k/NRPutuvRPFFLb
8/nYejHk+fb6PvSpz96Tn4m9p/iqo+KzKMIZ9j4PgHe9P+eJfcuvORR85zW3
/4yqbm8=
"]], PolygonBox[CompressedData["
1:eJwtlWtMj3EUx5/6Pz1/m8xlurissto0TFYvRG4bCstl3rExzBt00dhkXWYr
0fSiTCxv/G1lMpky5paNTRgbFdXKmGJkC3mhN2w+353fi886nfP8bud8z/nP
21e8vSja87wi8OFG4HltcBVaIT3sefMhIBiGAj4+BIehBBKIxUMPdi/khTwv
F1IhDaYQi4UF7L2B+H32vAdz8M0N2zf6tinG8y7COnxroYmzLsIG7Dz4xJph
2A+nojyvBuqI97ImATsezrJPMiTBfEiHGaydHrY76+6NrDnn2xk66yj2EYjA
ZfgCnyFEzIfNkA8P8D2Eas6vgkHsIajEroA/MAEv8D2HY9ilUAdn4C/8gxbu
1Az9MAAN+OrB44wo6MJ+Co/hCVSzVxXswd4LlaypgFI4Don4cnj7Cpjqm0+x
D+TlIxRjF8E77D64xjetcBPa9R5iVTBMbARa2K8ZLkEksBqr1iuJrYJb0BFj
NVatB4j1Qxm+cnjEmk5I5i0psA17a2A5Vq7vYN+GduiAGnwnYRf2bldj1fow
vhI4yBkH3Bv0lvfEhiCbvZeFTaPSqmqsWg+z5hOMwQ9Iw5catjvpbjn4lsN6
7FyYhr0lynKoXErj0vpC1iyC6MByq/gI518h1uLO0Fkd7i3qAfXCE1c7namz
R6VD1v7k7y/VnTV9vmlIWprEN2EYx/4NacRSYaneGFgNVctLrI04TUvbHa4W
m/h2o2853uY0Jq2dhlr4Bl9dzpS7V/ASMjhzCbzAfh5Yj6vXs3U2LMC3UOdL
SzAZX6xvNVatVUPVMgVfsruz7l6IryAwjUlrerPePls9H5jGpDX1gHrhLb5e
eAPdMEYszvXzXeLP2KPLaURayeKbTFiNvUY9yDeDIeuZLqchaUk9o97JwF4c
2Jv0tvEY21szozNkb9RbpQlpI8COCaxmql23u5typFx955tRuA5tmhch04Y0
lODeqLdOJzbDN41Kqzuwd/o24zTrktysOs+3jYHtqb1rXe2kEWllwM0K1UC1
0EzRbFFOlJteuBBlM/EE/jj+n+lbjpSrcigLbCZpNmlG97ieVe9qxmnWaQY1
OM1Je9KUtJVFLDNsNU5xM0OzQ3fW3TXDNcvVo+rVCTcLy9zZETdL9Bug34Ie
l3/VuD5kGpQWE9lzlpvBEddjV1yOlWtpqtD1iHol381mzSTNJv1m6bfrtW+/
DcpJj289rF6WRqSV//mu4HQ=
"]], PolygonBox[CompressedData["
1:eJwtkbtKQ0EQhidms6eIeCOiB4OXF1BR7EIiiCaVRfICGhUFQU1hqQiKQRNJ
ClMo6PuIkhSKndZCwCew8Btmi4/5z7+zszNz5qrH5aMBEYkhBX0vUk+ItJxI
PhIpwCzMQCUp8kfOBfGW8xvYIf+a/Dv0GIxCjJfD65O3jd5S8Gt4dWe5eqdH
POPsHJ61Ht4XscF3E2roE9hE73JWQifoQ6DlLf+X+Ij/AAfB01pddBk9hV4i
fznMojPt451y1ibmIuurGubRuWKYhOlQI4se0j7QeeI8/gJ8hr5WiK/w5m03
uqMXlnmJvoIN/HVvb+hb3+hBdBomvNXV+nve+jpE30PH2Xw60xO6SK+lyO5r
nTXiO3zAsLOd6+4z6HFYhQIshjdGnP0TzfshpvA9/AOpLjeC
"]]}]},
{RGBColor[0.8574279840577403, 0.8786102682281658, 0.8715620360928028],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtkb0OQUEQhYe7ViNoJDqRKHQKDdHoaETiASQkt0R0CoXi+ouaiEeQKMRD
iFpBRe8pnJOZYjInZ7+dM3dvcTjpjeMiUkQFqIwT6cZE8l7kBb2B3kIXcPjB
+SkhUjLdQn+AWYKZgymbT/YKfwf/jH5HRdAzMFmb30Q/eGXIjkxfoL+4X4d+
B5rHmcy82Mwf+gL8EfoJvbL5zLkZz11+xjOngupAp53uRJ+ZVa/75OA1kiIh
c+HVnPK817Sdye7tTUKv388sZq7tHQbwI9un77WouWPesvgGaZufQm87zZ06
3YMM/8Mf08Yv7g==
"]], PolygonBox[CompressedData["
1:eJwtlEtIVVEUhrfec8+5Qja4DrJS8IJCkUFRRvayQQ8tjGoS1CiH9jDFoKLU
4DqpjGxYkN5AowYFBQU9oaBQsqh8FJQ3tCJTtMegJkXfz16Dj7PYe5299vrX
2itV17DzYK5zbhcE8Cx07ik8hidwkcULcAm6oACSMBlzbgru4HMbbsItyGOv
Mse5WsjH/sDae6iMnFsF7wj2Fo7HnTsBl/HJQC9c0RffHuiGDEQQwgSxvsE1
7KuQ5KwCaOKsRljHWVWQ4IwIytlbDGuwV8Mm/tkMPzjjO8zHLrI76+5z8C2E
19ivoA/6zUe+Sct9kFhvLAfl8pK9F7CMf5fDPHzmQhEUQxmUwkppAFuxt8B2
7B3KC76aRtJKmkrb0HIfx3cMpmFGsDYN1cSqgRvY100TaXME0mjfDn2B11Ba
5uM7G35h/4Ra7G2G7Pv4PoAR9obhOQyEXvMJ00za9Zs2C/hnIaT4p8RyVK55
rCUiH0OxDqDRfquRatXOGWkYp1afYK1qBKf49zQsxV4SeQ2lpWqm2o1CNvQ5
KJdqzqqBFdgVka+BaqEzdXYPMXpjviaqje6ou8axA+jE93zoNZSWY9IaZgW+
d9XDWf7vYO0M/IV/kItvTuRrMGNn6CytaS+lWNDGvyehnL1Foe9B9eIQ9qD1
mHqtDN9SeIj9yHpCvdGM72FYz14VnMPuhI3YGyL/JvU2FaPNNJW2+6AeGuBQ
zJ/RbG9Mb01vRm9HNVFt7hHrrvqcteLI96h6VT2qXtWa9urt7C6bBdJE2nzB
/hx4TaWtclAuJabFgPWSaqratmK3wG/4E/oZoFmgGaJZojest6yeVm8fI+ZR
yLL2Me57RL3SAWcDn6NyHWZvBKb4ZzL0mkm7vaF/C3oT6cDPIM2i3dh7At9T
o1aTIZt5mn2qiWqjmIrdTYxMzGaUvUm9zVbWWuyOuqvehN6GZlDC7qi7Kmfl
rhmjWaMZolnyH0nts0A=
"]], PolygonBox[CompressedData["
1:eJwtj70OAVEQRgdrNwqJB6BQWyUh6AiNxiNItESvUBB0FMQL8Ci8gd1kOzo/
NSLEmdwtTua738zcmcl2B51+VERSEIeXLfKEEUwjIlfiyhJZQg89x9ugH6Fe
o+uOSAN8vB5eE6/AuwgXvDMMLZOrqB/WtfBOaA8+DC/jBTGRA+8j5Kl1HeNp
LmGZ2TrXI050R/jBFxbhTrrbnp4d+GGv/q+12hPQu8V72wbVY+IN7ra5WW+f
UVdlfg2S6DZeiZgj70IGnbbMvXqP3vUHUC8uxg==
"]]}]},
{RGBColor[0.9395892538864206, 0.9060088624514686, 0.8347538608369487],
EdgeForm[None],
GraphicsGroupBox[{
PolygonBox[{{1002, 317, 1543}, {1564, 317, 1009}, {890, 270, 895}, {
929, 270, 1504}, {1543, 317, 1004}, {1504, 270, 890}, {1009, 317,
1002}, {1043, 317, 1564}, {1004, 317, 1043}, {1263, 414, 1251}}],
PolygonBox[CompressedData["
1:eJwtlElsjmEUhb/3b/v9LNjYNBKLf2EhYSGRJqawEWkkEnZiZytFJJYiFl0J
CQsbC0HSUkPNNdVU1FxDqaJqqKGlippLeR7X4iTnne977j23tGT5wmWFLMsW
gXIwvZhl31KWXQMv8iyrYjwIvwQeMP4OHsOHwRr4DA5dgH8EExnXlmXZYfhB
sBY+jvXT8FNgLLyDPRfhn0AVfAr3f4CfBW2MW8AReBNohV8Fx+HnwZ085lx7
B4YqYs61FnAPPggewZ+BkdzdxHgf/BVYzf5Gxg3wHjCL8XhiOgc/A0rwyZwZ
gDeDG+ztA20p/uzfS6y/gR/yDONh8ASeIeL6PM541j/61x7eeJtCE7Xxz/5d
TdRmA7gFvwnWwQvc3w1P3LeJvVPB5xQxGms96DQXYDu8mn2V8OdgNGc7eK8X
fgCs4L3ZzP1UOzXjrhr215tbMIa1zdxxF34bbISPAifhJ9QPPoc9Q2oL+jnf
zvnd8JegkrVJ4D38GBjB/q3gPrwdbIEvJYZG+Gv/y95q8EttwAD3rWLPdbUF
C/KoIWvJGIzFnJm7vaCzEDk390dBXVm84VvGaKwr2bMrxR9r/muolk8ZVxRD
E7UxJmMzh+ayT31Zr2X8J4UmajOBuf4UNWgtWsPWsjVircxl7msKD+iFmcz9
SFEz1o4xG7uaqV0zex7Cf4P5xdBYrdVQLdVALVrBvPLQWK33WHN5aKzWxmRs
1rC17J/9u5qqrTVkLZljc70TNOTxpm/rEb3in/27ntN75shc7TcHeXhcr1uj
1moX4yt6A/TCt4Ed5kLkUZPWpjk1t7757+0U3tNjek3P631zaC71iF7p1vMp
NFVbPa23nXNNTdRGT+iNadzxJUVMxmaNWqt6Um/aw+xl1py1p4ZqaU+wN+g5
vWfOzJ09zl5nD7QX6im95R/9qx7X69a4tb4YXE4Rg7HY8+x99gh7hT3N3mYP
tZfqQb3Y5Zt5QG7NWXt6UC/qWb37F26h7Tg=
"]],
PolygonBox[{{1251, 414, 514, 473, 1191}, {1797, 480, 514, 414,
1254}}]}]}}, {{},
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{895, 890, 1504, 929}],
LineBox[{1254, 1797, 1682, 1794, 1775, 1865, 1763, 1851, 1752, 1846,
1743, 1844, 1057, 1061, 1593, 1099, 1617, 1141, 1186, 1191, 1251,
1263}], LineBox[{1702, 1697, 1806, 585}],
LineBox[{1723, 1821, 875, 880, 1495}],
LineBox[{1769, 1757, 1850, 1115}], LineBox[{1801, 1779, 1870, 1213}],
LineBox[{1811, 1706, 1711, 1343, 626, 621, 1811}],
LineBox[{1816, 1715, 1719, 1405, 729, 724, 1816}],
LineBox[{1825, 1727, 1829, 1731, 1735, 1531, 934, 1508, 901, 897,
1825}], LineBox[{1543, 1004, 1043, 1564, 1009, 1002, 1543}],
LineBox[{1833, 1738, 1746, 1749, 1759, 1607, 1084, 1580, 1037, 1033,
1837, 1032, 1833}],
LineBox[{1841, 1741, 1751, 1590, 1053, 1050, 1841}],
LineBox[{1853, 1770, 1784, 1663, 1166, 1163, 1853}],
LineBox[{1856, 1772, 1785, 1669, 1174, 1169, 1856}],
LineBox[{1861, 1773, 1790, 1677, 1183, 1179, 1861}]},
"3"],
Annotation[#, 3, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{584, 1805, 1696, 1701}],
LineBox[{1235, 1664, 1771, 1855, 1168, 1637, 1173, 1860, 1178, 1182,
1676, 1789, 1673, 1239, 1668, 1243}], LineBox[{894, 889, 1503, 928}],
LineBox[{1114, 1849, 1756, 1768}], LineBox[{1212, 1869, 1778, 1800}],
LineBox[{1253, 1796, 1681, 1793, 1774, 1864, 1762, 1137, 1096, 1750,
1740, 1840, 1049, 1052, 1095, 1845, 1742, 1843, 1056, 1060, 1592,
1098, 1616, 1140, 1185, 1190, 1250, 1262}],
LineBox[{1494, 879, 874, 1820, 1722}],
LineBox[{1810, 1705, 1710, 1342, 625, 620, 1810}],
LineBox[{1815, 1714, 1718, 1404, 728, 723, 1815}],
LineBox[{1434, 804, 839, 1459, 808, 799, 1434}],
LineBox[{1824, 1726, 1828, 1730, 1734, 987, 1836, 1031, 1832, 1737,
1745, 1748, 1758, 1606, 1083, 1579, 1080, 1583, 1038, 1036, 991, 984,
933, 1507, 900, 896, 1824}],
LineBox[{1542, 1003, 1042, 1563, 1008, 1001, 1542}],
LineBox[{1560, 1040, 1088, 1587, 1045, 1039, 1560}],
LineBox[{1630, 1158, 1223, 1656, 1225, 1660, 1783, 1662, 1165, 1162,
1852, 1159, 1633, 1156, 1630}],
LineBox[{1645, 1197, 1258, 1686, 1201, 1194, 1645}]},
"2.5`"],
Annotation[#, 2.5, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{42, 1804, 1695, 1700}],
LineBox[{1028, 1026, 1576, 1076}], LineBox[{1153, 1150, 1651, 1218}],
LineBox[{1234, 1231, 1661, 1782, 1659, 1224, 1655, 1222, 1157, 1629,
1155, 1632, 1120, 1603, 1747, 1744, 1736, 1831, 1030, 1835, 986,
1733, 1729, 1827, 1725, 1823, 851, 1467, 849, 854, 1481, 899, 1506,
932, 983, 990, 1035, 1559, 997, 1534, 995, 1538, 1000, 1541, 296,
1007, 296, 909, 905, 1485, 907, 942}],
LineBox[{1522, 957, 1521, 952, 1517, 948, 913, 1487, 912, 1490, 914,
1491, 916}], LineBox[{893, 888, 1502, 927}],
LineBox[{1113, 1848, 1755, 1767}], LineBox[{1211, 1868, 1777, 1799}],
LineBox[{1242, 1667, 1238, 1672, 1788, 1675, 1245, 1679, 1792, 1680,
1795, 1252}],
LineBox[{1261, 1249, 1189, 1184, 1139, 1615, 1097, 1591, 1059, 1055,
1842, 1051, 1566, 1048, 1839, 1739, 1589, 1094, 1134, 1614, 1136,
1761, 1863, 1181, 1640, 1177, 1859, 1172, 1131, 1126, 1610, 1127,
1854, 1167, 1636, 1164, 1635, 1161, 1122, 1605, 1082, 1578, 1079,
1582, 1086, 1584, 1087, 1586, 1044, 1561, 1041, 1562, 1007}],
LineBox[{1493, 878, 873, 1819, 1721}],
LineBox[{1280, 534, 571, 1299, 538, 532, 1280}],
LineBox[{1809, 1704, 1709, 1341, 624, 619, 1809}],
LineBox[{1347, 660, 683, 1367, 665, 657, 1347}],
LineBox[{1814, 1713, 1717, 1403, 727, 722, 1814}],
LineBox[{1396, 754, 778, 1420, 757, 751, 1396}],
LineBox[{1423, 787, 824, 1447, 790, 784, 1423}],
LineBox[{1433, 803, 838, 1458, 807, 798, 1433}],
LineBox[{1525, 970, 1019, 1554, 974, 968, 1525}],
LineBox[{1644, 1196, 1257, 1685, 1200, 1193, 1644}]},
"2"],
Annotation[#, 2, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{515, 517, 1272, 519, 1273, 521}],
LineBox[{522, 523, 1275, 525}],
LineBox[{915, 870, 866, 1473, 868, 1489, 911, 1486, 908, 862, 858,
1470, 860, 1484, 906, 941, 945, 1540, 999, 1537, 994, 1533, 996,
1558, 1034, 989, 982, 931, 1505, 930, 1510, 903, 898, 853, 848, 1466,
850, 1822, 1724, 1826, 1728, 1732, 985, 1834, 1029, 1830, 1025,
1557, 1027}], LineBox[{926, 1501, 887, 892}],
LineBox[{963, 1549, 1014, 962, 956, 1520, 951, 1516, 947, 1515, 950,
1544, 1006, 1046, 1838, 1047, 1565, 1013, 1546, 1012, 1015, 1054,
1567, 1058, 1063, 1595, 1101, 1619, 1143, 1641, 1188, 1248, 1260}],
LineBox[{1075, 1575, 1074, 1077, 1118, 1119, 1631, 1154, 1628, 1149,
1627, 1152}], LineBox[{1112, 1847, 1754, 1766}],
LineBox[{1206, 1648, 1205, 1207, 1691}],
LineBox[{1228, 1221, 1654, 1215, 1650, 1217}],
LineBox[{1233, 1781, 1658, 1230}],
LineBox[{1247, 1791, 1678, 1244, 1674, 1787, 1671, 1237, 1666, 1241}],
LineBox[{1492, 877, 872, 1818, 1720}],
LineBox[{553, 1288, 555, 1803, 1694, 1699}],
LineBox[{1210, 1867, 1776, 1798}],
LineBox[{1279, 533, 570, 1298, 537, 531, 1279}],
LineBox[{1291, 559, 586, 1306, 562, 557, 1291}],
LineBox[{1307, 594, 616, 1324, 597, 592, 1307}],
LineBox[{1322, 613, 645, 1335, 615, 612, 1322}],
LineBox[{1808, 1703, 1708, 1340, 623, 618, 1808}],
LineBox[{1346, 659, 682, 1366, 664, 656, 1346}],
LineBox[{1382, 711, 748, 753, 777, 1419, 756, 750, 714, 710, 1382}],
LineBox[{1813, 1712, 1716, 1402, 726, 721, 1813}],
LineBox[{1422, 786, 823, 1446, 789, 783, 1422}],
LineBox[{1432, 802, 837, 1457, 806, 797, 1432}],
LineBox[{969, 1524, 967, 973, 1553, 1018, 969}],
LineBox[{1573, 1070, 1109, 1602, 1072, 1069, 1573}],
LineBox[{1581, 1078, 1577, 1081, 1604, 1121, 1160, 1634, 1124, 1608,
1123, 1609, 1089, 1085, 1581}],
LineBox[{1585, 1091, 1125, 1130, 1171, 1858, 1176, 1639, 1180, 1862,
1760, 1135, 1613, 1133, 1093, 1092, 1588, 1090, 1585}],
LineBox[{1597, 1106, 1144, 1622, 1107, 1104, 1597}],
LineBox[{1643, 1195, 1256, 1684, 1199, 1192, 1643}]},
"1.5`"],
Annotation[#, 1.5, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{1, 23, 45, 66, 1320, 66, 88, 643, 1333, 644, 1334, 646, 1336,
647, 648, 1358, 676, 1357, 675, 1356, 131, 1371, 673, 1355, 674,
1370, 695, 1385, 717, 758, 1398, 718, 1386, 696, 1371}],
LineBox[{530, 1278, 529, 1277, 527, 1276, 528, 566, 1295, 568, 572,
1310, 599, 1807, 617, 598, 596, 1308, 591, 564, 1293, 526, 1274,
524}], LineBox[{540, 1282, 535, 1281, 536, 1297, 575, 1311, 601, 622,
627, 1344, 655, 1362, 679, 654, 1707, 1339, 650, 1338, 652, 1359,
678, 1373, 699, 720, 1812, 701, 1374, 700, 702, 725, 732, 1407, 762,
1401, 763, 1428, 794, 1453, 833, 218, 1451, 218, 1427, 761, 760,
1400, 196, 1426, 196, 175, 153, 175, 698, 697, 1372, 153, 1387,
153}], LineBox[{546, 547, 1285, 549}],
LineBox[{637, 1329, 639, 668}],
LineBox[{712, 1381, 709, 1383, 713, 716, 1397, 755, 780, 781, 1444,
820, 1442, 818, 779, 1418, 752, 747, 1395, 749, 1417, 776, 1441,
817}], LineBox[{813, 775, 1416, 746, 1394, 744}],
LineBox[{1024, 981, 1530, 979}],
LineBox[{1073, 1574, 1071, 1023, 1020, 1555, 1021, 1572, 1068, 1571,
343, 1600, 343, 363, 383, 1647, 383, 400, 1690, 1866, 1209}],
LineBox[{1117, 1116, 1626, 1151}],
LineBox[{1216, 1649, 1214, 1653, 1220, 1227}],
LineBox[{1229, 1657, 1780, 1232}],
LineBox[{1240, 1665, 1236, 1670, 1786, 1246}],
LineBox[{1259, 1683, 1255, 1264}],
LineBox[{1265, 1687, 1202, 1198, 1147, 1621, 1146, 1623, 1108, 1600}],
LineBox[{1267, 1204, 1646, 1203, 1647}], LineBox[{421, 400}],
LineBox[{552, 1287, 554, 1802, 1693, 1698}], LineBox[CompressedData["
1:eJwlz00rRGEYgOFH5rCbKOVjhYWNf8CUlR2mmWYxkvKRlAU7pdnLhlgYI8tJ
yR+QstCEZBRLhn8xhdm56izuruc5dc77nrG1neJ2V0SUVemOeE4iFnjDed4y
zzuWWNa+XuwHbHKJi5rSpb2fh8zymAM84SCHdG2e5hVzXNaKjvTu2TrvucoG
NzjcG7HJxGVH9Gh+0qx5vCe1Y+8zv/LHe03+8o0dXvBc3+Yav3jGFqv85Ck/
kvSMNh/sWd/84ygnMv6Tcyxyl3VtmfdYYoE55jnDyUx6x3935S3p
"]],
LineBox[{1765, 1753, 1110, 1601, 1111, 1624}],
LineBox[{1271, 518, 1289, 556, 1304}], LineBox[{520, 516, 1271}],
LineBox[{558, 1290, 520}],
LineBox[{1292, 561, 588, 590, 614, 1323, 593, 589, 563, 560, 1292}],
LineBox[{1305, 587, 1321, 88, 1332, 642, 1331, 641, 1330, 640, 610,
1318, 609, 1319, 611, 1320}],
LineBox[{1325, 629, 1345, 658, 1363, 685, 704, 1376, 687, 1365, 663,
1349, 631, 628, 1325}],
LineBox[{1354, 671, 691, 693, 715, 1384, 694, 692, 672, 670, 1354}],
LineBox[{1387, 719, 759, 1399}],
LineBox[{1390, 735, 765, 1409, 737, 733, 1390}],
LineBox[{1392, 740, 1412, 771, 810, 1438, 773, 1414, 742, 739, 1392}],
LineBox[{1426, 793, 831, 1451}],
LineBox[{1431, 801, 836, 1456, 805, 796, 1431}],
LineBox[{1509, 936, 988, 1532, 993, 1536, 998, 1539, 944, 940, 1513,
938, 1512, 935, 1509}],
LineBox[{1514, 949, 1005, 1545, 953, 946, 1514}],
LineBox[{959, 1519, 955, 961, 1548, 1011, 959}],
LineBox[{1611, 1129, 1170, 1857, 1175, 1638, 1138, 1132, 1612, 1128,
1611}], LineBox[{558, 1305}]},
"1"],
Annotation[#, 1, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{542, 1283, 541, 539}],
LineBox[{543, 544, 1284, 545}], LineBox[{551, 1286, 550, 548}],
LineBox[CompressedData["
1:eJwV0MkuQ2EcxuF/a1h3YdgqtRCCGyCGDmopFuZyWGtiiikWxCWwaCtxBYJw
AcYLcAUicR08XfzyvN/JyZeTk02qc9upiEj0mI64Ubkt4oyjXGc/G+0RRbvb
LjHHCvu4xoKm1eWcZy9XOKVJdTpPsINjzHCcC+qxl5jlMld1oEMVPbtintec
5x0rvPXN33bVfuUGX5jwvnk3ayzxmMM84ghPeKoZu85FPnCLb9zkO3/0q0vn
1hb/h0N85iwH1bDTTOnC/vP+OcO5zgE+scwdfdi7/OQe91Vr3q0v/QPiViuc
"]],
LineBox[{743, 1393, 745, 1415, 774, 1439, 814, 1462, 843, 1479, 886,
924}], LineBox[{1208, 1148, 1625, 1764}],
LineBox[{402, 1652, 1219, 1226}], LineBox[{1268, 1688, 1266}],
LineBox[{1270, 1269, 1689}],
LineBox[{1294, 567, 595, 1309, 569, 565, 1294}],
LineBox[{1337, 651, 677, 1360, 653, 649, 1337}],
LineBox[{1361, 681, 703, 160, 684, 680, 1361}],
LineBox[{1389, 731, 1406, 764, 1429, 795, 1454, 834, 1452, 835, 876,
1475, 881, 1476, 840, 1455, 800, 1430, 766, 1408, 734, 730, 1389}],
LineBox[{1440, 816, 844, 1464, 819, 815, 1440}],
LineBox[{1443, 822, 855, 1469, 825, 821, 1443}],
LineBox[{1449, 830, 863, 1471, 832, 829, 1449}],
LineBox[{1511, 939, 992, 1535, 943, 937, 1511}],
LineBox[{1518, 958, 1010, 1547, 960, 954, 1518}],
LineBox[{1528, 977, 1022, 1556, 980, 976, 1528}],
LineBox[{1569, 1065, 1102, 1598, 1066, 1064, 1569}]},
"0.5`"],
Annotation[#, 0.5, "Tooltip"]& ], {}, {}, {}}}],
AspectRatio->1,
Frame->True,
FrameLabel->{
FormBox["\"Cluster ID\"", TraditionalForm],
FormBox["\"Cluster ID\"", TraditionalForm]},
PlotRange->{{1., 21.}, {1., 21.}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->{
3.427941435055889*^9, 3.427942823464357*^9, 3.4299346310719624`*^9,
3.429998108482889*^9, 3.430286927629006*^9, 3.4303542841743593`*^9,
3.430354606673999*^9, 3.430527737302841*^9, 3.430611172078483*^9,
3.430620926718226*^9, 3.4306872640856*^9, 3.430693240363634*^9,
3.43173182306087*^9, 3.431735184128125*^9, 3.4317527401205053`*^9,
3.431822252243301*^9, 3.431840398930739*^9, 3.431898443627676*^9,
3.431898756068738*^9, {3.431898971795752*^9, 3.4318989806957083`*^9},
3.4319009706213284`*^9, 3.431998610557043*^9, 3.432003295409217*^9,
3.4320985150608892`*^9, 3.432100373186995*^9, 3.432177897908894*^9,
3.432249611388623*^9, 3.43225465668748*^9, 3.432255593662037*^9,
3.432333025591858*^9, 3.432335478712553*^9, 3.432339279161872*^9,
3.432357775616049*^9, 3.432361151724135*^9, 3.43236200463806*^9,
3.43244406082406*^9, 3.433807297052806*^9, 3.434234705039208*^9,
3.4350139189184*^9, 3.4350380004877987`*^9, 3.43521474867346*^9,
3.4352663792438*^9, 3.435266733529842*^9, 3.4352777066868267`*^9,
3.435285541239642*^9, 3.435354082926366*^9, 3.4353557995880327`*^9,
3.435365127530658*^9, 3.435376695824086*^9, 3.4353796728138037`*^9,
3.479011937574162*^9, 3.479018211365615*^9, 3.4898118959598103`*^9,
3.518907456108519*^9, 3.521761262323944*^9, 3.522544497346466*^9,
3.522548146141951*^9, 3.522557919419817*^9, 3.522558328519415*^9,
3.522558972565593*^9, 3.531531183020472*^9, 3.531534142121626*^9,
3.531614504966277*^9, 3.531622861812085*^9, 3.531627032370352*^9,
3.531629519542397*^9, 3.531630108958418*^9, 3.531713244860491*^9,
3.531776061306823*^9, 3.531790193803679*^9, 3.531790873372699*^9,
3.5320366211325617`*^9, 3.5320398374642563`*^9, 3.532054637067932*^9,
3.5321248460494633`*^9, 3.53560818778344*^9, 3.5356086620815067`*^9,
3.537097432171604*^9, 3.53740878600845*^9, 3.537436911480649*^9,
3.537520504122674*^9, 3.537524984555702*^9, 3.537528513961602*^9,
3.537848710294525*^9, 3.537939043411929*^9, 3.540983979468746*^9,
3.5410510115521717`*^9, 3.546671092749896*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[", "citedParciting21", "]"}]], "Input",
CellChangeTimes->{{3.42794141855196*^9, 3.4279414315583057`*^9}, {
3.431735183002239*^9, 3.431735183133506*^9}, {3.431898632767935*^9,
3.431898636921503*^9}}],
Cell[BoxData[
GraphicsBox[RasterBox[CompressedData["
1:eJx12Xk01XkfB3AlNXWJUFnayFKqsZUxUUjZJru4QqIoGpISlSKF0hBDlqTF
OmUXKtugKZVHiRZqKjv3t12SpUSP5nme85xz3+d+z7nn9Tvn/vH7ne/7/D6/
7+f7lXM/aOMhKCAgsPC/v+/XUXmGjs6naT1ex2Ibo06LM+CW2vxnnsFc0Lyl
yXdH7ADoGPXB+6YADd73mpxxZTcHtDCbEzFzTj+4RLUt366kB4yN1Aw5zKbA
j2+6hq00Uc2+TCu/GwT4Q9TEkuo/0XypVZ3R2QNgzcaurOVbe0DmN1E9BUEa
jLAsFhPNJMG479P6ngLPU2p5jZpcUOCf0fFf/z+kRdeb7htn9Hhl5JIWCipS
oNv2zu7EzD5Qsiz/zRXfAXCpblfSxyc9oN0XoVSRsF7wqfIHqSTNFjDCP+eA
WkwfuOpcoJHfMdRx9cr23dUZ4I5/Ri/4LD5Q+9SR+6AGo9jlxe4H3XIrmywd
XoANZkKSpgNdoP698sK7yQTovfl569MVfeCtsZ4b0mYEKPXV88yaHRToW3Hi
6mWGANdz3/RcreaA/PK95/Kvk/tjO0EpJdbMNaYU2LB33cgiggTnna+SGbyD
RpV+q3ml2A/uuXPLbdF1ApwrpcEtPsQBJaiNz/L2oQ7CCYNGtv2gbf/rZf6O
NHhlaDIu7DEFdjqmeEd5kuCdeyb6dtbdIO3NPr5AmQCPqnKFR4cpcJFjZMnd
mSRYvkp6+afpPHk972R4IjqGBgMPKGx8swTl+/5KJGiKXafB/1SDQZA2GJEc
eUyC842K9YzfE2DWq970dWrouu27mgoyO8C2F80dV8Qp8KJ1iNxkDgHGjklM
1plzwOX+jupW9SQY+2TmD7556OKwOLMx0QHQRs9tXGRBH5iSE860vawFdaNV
wllmHLDkj19Sv+hR4FvDH9fMNhsAXSoKt3uMk6Bp9SaNzmwK5Jdv5z6f2gVv
CDDt0idz5QU0mPmxtHlp5RuQ0V4xMprZD46m66i5eA6Atr6PTb8lvABvXjDS
yrkZBS40U1qjGtELst/J5U5d6Qd1Owtd0073gHorNj2kizjgmPAP2cnJ6Phh
3fR9f3SCsoT3iws/DoArv09r1XPwUXNVn7gMBzRXLM4s8KJAMZOLh3R+ZcDr
UU7u810IkF++h07UZwVeJMHUqWuhJwgOqCdzdYv7RxIsYE592GyArg1dtoFr
Q4CF7FOvnjWjQR/MCe0Q1P7pEe9Zz3rBxtWfiipsSbDZ7mCbeF0/GKWysvdy
IKrltd6Ve7cb3PHaz+n35SQo5r9qzoVt6L2R9t+4ohywmcqpZ09/r3h133rs
ynUnAnQmOySTP1MgK0RdLsyeBvnlG+Wya6jbmQY/+Ql1lVhSoETlPaezQyT4
IHzNSKYHDX5WvOwmlkSBuWd6k7StSJDfc5ZHOtsLJ3SAWmurz0lcIsGk8qvd
nHoKjFhjWGpvyqBZiw+lf6RAfvWz+V7p1DojCpy4tk5M6zkJxgTGEE2XGfBU
0Z27Bws4oGvGLdbTeBIkFFrylW5TIL95qw+0L4vzJkC3g4c+OMf3gfz6qbwD
oa9shWgwuzq37dwpBty5MkbNdTYJ1tg4yfZc7AbNTPf0nJEnQd7+4X/Ds0Ki
+/0ijh6v98TFj1rIU2ClTOKuv84T4LVfaxSOHu4HSzK5Pwd84oA+D8eM5ykN
gH3ZLJklUf3gQ12K8tQZAPn1R4dzZ5gYfCD1eOWX77bHd+NGTpGgw1bPSfFF
aBEpP7L+LdqqmpBpOpcCC0edjq2arme8Ptp1yOqBHg2empOhVVrJgCRHtem0
BQXukY4XFvlGgtY6KvJiCgOgcatCkwGHBFnvb3Syn1Jgt/9ev7BhtNHVKol4
zgGzLT30WsoIsELwa7BcOAWyJM+ZZ3hzwDuUT7DK9HeG1yXqr28bvWkD+eUr
Pn+XuIonKtDzID45A7U+tnMgxoUGb2wfz3ZpQwWepO4cfYQeVDBfsikAVb+g
Ouj0jgGNire46n6hwZxu3z1lhmhvudSg+fR6hNczK8pSgrRoMLVWhC29CN1r
WdZhP8qAPyX3JLR2EegymyOmrSSY8SDaS2SUAlfbJ266OYcLGuhaR1ntpMHb
gfaRK8opkF++ZsMOnUmbuCC//uip+3v5B1k0WPX8xeeySAq0VUs5E+rEBQ+H
b7glEYiyyy2yP7UyYM6R5PsF1lxQMW5Tst0aGtSyjHNNWUCBq6s2qmv8hCp9
0o5LlUWXCtH3H6mR4L++xuvUFFJglnHHjqa3/aBfi1VZw24C7Ny7c3eWNgkG
KI9sEYunwLqLLOHfLhAgv3zjH8vLdR0nwcZ2latiLRQo4fIySH4RAy6Tk+xp
ZPeC50oO1J55S4NCE1UTxtIM+FxwSJkKRRu1jL7l/kWBoTkqzjYmDHg4/eGE
uQ4N5j58IKxIEKCycGT2mZ9ocEg9oW52TD/Y/cuwNvG9XvPoE3Bj+RphGpzd
vvNr1SkKjM8S7zYJQ6tDszaX26O/cC2K9z5H+eXbN5kj521Eg/PW23tGuROg
+NJ06W/VNFgjtKBKZzMDaunuWWvgT4EVi7fm/PwWPbDpil7BdP3jNSx8qXTq
CtSqXtY8zZUEZ4rJFz44zAWDhw66hCyiwJfjN8dSLUmQNViRmDcyAI5qyvTu
O0+Cvza0nj2aTYPXLG7uO7+VAvvv5Fcv7yTBQoI4NDadD6/GBmJ3izeQIL98
vWs+SCrbkWA8u9Jc6SZa3TV3jlN+Byir87I5vIIEu1c1mTjIMqBU1y6iaCYF
Tn1O6bk9jDZ2cb89yafBkIeP9wbGUqBfzF/xbnsJMDvvSZdBKgNKO+ek1zAk
6NF8VH5lCw0u+Zy9YaE6ym//87hGUWGyPDpn+yk7rYU02KJa7Fg+QoIe0alr
er5RIL98X4cLml/vRZVi/zLKHyRBmznLr5V1U6Bkpt38JlkSHFKJ1slQo8Ht
YR5u4VEov/7rb9m6IrEnaLvT3z+9zqRBfvWQX/97zCdio/VZLpgWUb5zZyED
Rsi8V/H/SoGh4YlRgxUoq84ka2IOGjMs8lS5FS1t8XYNT6BBp9PzPLKcSZBf
vur7XbrqWSSYGF4aPF+BAte1/71tRg0JJp7rrlNwokGfO6qtwX4UKKwVUWiY
TIOy78a3dW9hwJ99iw2N5UhwMnxiOWv6f16FUh7q0KWoe9CqkcoGGtQ/9PLB
zD9RdoCvRYQfA/5ziuGAlmlMjGjepcH4AOK4izUq1Zi8d/84Oq5fn+AXSoFm
9Dj9So4G+eV7eeOfo7GNaKPDbTElG5Q5d/ZT5F6U337+K/upostrGVCmJyVs
YDENvjeYCuic7o95fUhkB5kb0yC/86PX4Q1V4RoMWGXjNWq0ER3KmWHF+b6e
4nGWSlVfbCVKcNKuSfkwoPPlHifvOhqc8g2NW1WEumcUmsZOEKD9/Pavf59D
JwR/Xn1mPgnyy9ci6eOHpc8JsLlEX+j4Ww4Y6HbhbHQ/AcYrxpz0n0WBR2+0
a64eI8Ad+tdOJp0hwbC6SqXl+Z3gPJHoS6lsEpTX2tNcpkyBslsyc+Z6kaBd
kEdowfR6k9exhhW29QkMGDqpuVhiun/ilR21REVAlwaZhs6TrY5c8P66sY7g
eSRoYqJ/v1qBBm3OWQllsNALp8Xf7ycokF++k2k5JdpTaNfsL8v0a0nQZlLM
66I1Kio8MX5gel55Peg6t/L3PA6YFf5hv870e8nrZMgr48YBCjSpfB0m0EeA
Kfk9Uk4uFBjtG+Lg0k6D7yq3fLyeToFenlOeV6MYkEiO8zobyQU3mf1xcsMP
6BeDckd5GwZcX9PCtr6ETtX0RBoLoNtmq4kElVBgbdyjkHQxGuSXrxfx9Y3h
jyS4IuRzYe10/eO1VErp4Nr8AXAWS0dDy4AC+fUvry4d0/PJpUDBqgLFA5sY
sNT1ZYftjxTILRBi1d4iwOvft/Wn1+m8dsUYji48zwVPPPJ4oD8X3a72MuDs
dhqclUDI3LHigtKPRVgGh2hw/5iGjU4kBUomnu4/mseAhcMHRO/l3QUt670X
VPZTIL98GytquCFcAnzW9mXZgnE0MbehK34uDa5seV1iFECA+juVhXWOkKDl
riMxE6UEGCzsUXS6mwb1oltta/8gQJ8l8peDxSmwoUqUzfzeB2Zo6qrHmVJg
UHJw09shlN+87SjslZopT4Mukca7rFkMGKk0/PWEDA2yHNJ805wp8EpaZpbq
XAbkd57Fd39jRLPxoAYJ7jrbX9odgtq62062NxLgfsGz2qzfOWBRvOFn5xNo
24zNeb8uIEHZQCO3J+s4IHm0UOD4CwpcalFYek+CBtlWuYywNgVemn3VfyiW
AMtqU1RKPpPoOnt/0acMWKf7QlRs+v687h+8/SLJjQZXhh5RTdRmwOIKRYPd
QRT4qOadxolvJDhgdUHKzosB2a8F8nPmEeC/ATGQ4O0=
"], {{0, 0}, {21, 21}}, {0,
1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{None, None}, {None, None}}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVy11Ik3EcxfFtzcmoCRlbBtma5NAoNggNFW2/zKU00iJL9+yiHkpoOrNs
Li2yFy80inKwNBCNxJcKKlkNc2WtRoRRTRYRbOsixHr+pc6SXmjNzi4On5vz
1fBHdh8Si0SibVjGFZ8v2CnQaXmtU+oU6MXkQkgGWeFBcw78o3m4NRfm243p
Flhu8mpa4Zozxu6zcF1WteIcjDIKD8HmG6GUmzAt9F24BZvaf8+7oUsR63oA
+867JB54/dfwio9Q1qsddbgEMgSKrKVXBSrIFk/5uwRyu3WDAfiteviHtlug
Xpst2wDfNz6uTDj9s3OkBNZ0vG0rgyr9SMwKM3ZtDNbC+97Y/ga4l1+UNcEv
r9UnHVDbscl076tANFZncUP5wKKnTMTIvzKp/eVmRkfVgX95hYwmHfr60SJG
d5YYc8dgSubs33Eo2b5c9wTGPzlbE6qrpu3hckZpDv/nCDx+Sp2ZVIFulTdP
DtsaFcVL4aXofPMyyB/ue55QsrqHy4E+8e3kPVBVkT9rhp7+DcUcrHo1REFY
P3M3+A6+6RlUhKFM96wyDheeqvT9+xidSPZbE67XyrgWMyMuYuBTOUYX7NH0
tXDnnHSuFEZmUtU7YMvlLR9MsKRmQi/A8QmbSWlhdFHZoJw6gJ/vWEDKMyrI
uhZ/VMfoPzpuE44=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalCited21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "citedciting21Data"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.427942946349992*^9, 3.427942975006742*^9}, {
3.4317351923940363`*^9, 3.431735196208044*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"251562", ",", "147648", ",", "69272", ",", "719440", ",", "546569", ",",
"128237", ",", "124080", ",", "107576", ",", "50495", ",", "49812", ",",
"202596", ",", "76762", ",", "109812", ",", "30553", ",", "38386", ",",
"365251", ",", "698029", ",", "501143", ",", "224480", ",", "2409371", ",",
"270925"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVy30s1HEAx/FfRS6c5lCtMZ0trZq7G7lym+aL7OR6HDJnRPIHchLdkjxl
q24tdTfOKtPTwomUxbnZJUeo1i6nsroe6fT7qSunNnLoc3+89/rrzc2QHTy6
jKKoeKRZzxKLFTTJXO094H2JJmab0RACDZotz3phxcPW1i9w7PWKNw4v7wlP
E1bTRG7R+KZBXdbSpyOwoJkXXQW1XB7/HEwUuu2tvEIT3kDTzFlYOH6r6iKM
5LUUtcEY/vcDXdB3TUmzCSZ2y5ROSpqon9rfr4SuqqzkUHitXhcphDU7xH4p
UC/xDCiDHWtVdRXw92gmuxJypsTmRigr/+zRDIfj/tAaWLo0N90BD99cUD+C
qb21yzuhaLjN6yNUdG/VymtoIimRZItraVKe5DHRr6bJtzOiu0YYQu7NBNbR
RGmVbY6AfRZ9gsO0kfEHu6Bl9mdVLFToF+3Z0F1ZbMqB0YGs9HwYbKFcTkKO
iHta7vhyt0nap2iy+86xlA6ou0B1xVIMmb/vfH5oO0M0hlcLYeEMCWIF52l3
MuSHKkaog9Yn1nk9pCY9+Y8hu0RV5rD4raXIvI8hlX/7Jz/Ad3b/jc77GeLC
6glbBXO+sqPcYGCu7ZQ7bLc1GBzONVyXhsKQfy0u8XDTC5E1GQoEQVFSGKBo
IiZYX9huGoWcoEa2GRZ09iUswsSkQcHtQwxJHevPdijgu0qLkxmiHiQZHClD
tMHTfhtg9IjzLzGM7/byj4MDxyPGJHCd/LmAhrNDeRKfFIa8tOf7TKQzxHbj
hNEpgyGl1VcXe3IZ8h9cwl0m
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalCiting21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "citingcited21Data"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.427942946349992*^9, 3.427943008332323*^9}, {
3.431735201841831*^9, 3.431735205719228*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"283249", ",", "168506", ",", "79966", ",", "791161", ",", "540027", ",",
"152114", ",", "141343", ",", "117183", ",", "49912", ",", "55338", ",",
"210092", ",", "91243", ",", "116817", ",", "29059", ",", "38370", ",",
"401799", ",", "645498", ",", "526238", ",", "259584", ",", "2146889", ",",
"277611"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzX8s1HEAxvEj3OgYV9ayo3Oc6Yep6a7Mz086Tm5H18ncGTtl6Vhu1rlS
SyTMSmMcG223tYiVdKcYR9rRsGrmrGldlmbZ91NDUf/Iref+ePb673mHFpYp
itxYLJYSq4uUyKSNDMkVRk7tbWJIsfuGLQZOWlNnJ2C+buLZMlws2vfR5fHL
GQXiBwx5kzbOK4DnwrhfL8CsWcXpWtgsORldDysbQuQ1zQzxr1nYugNTOeba
e9B2fkTfD29V7pwdgvKppl47VBirWzxa4Bbb4QV9tkpUIhj+b/SUGA4sa4Lz
YFBCkKAKJm7Pd1TDvslS3xpYF3fG0QP1o8t+vXDE7GT6oIG7/csC498521/C
pbaH7q+g4OfEniWo9RENG9rwP6bUSo3oF4SvTLYzJKo9rXsO9vOtmxEdDOnm
XTuYDFUz09kuN4SRZgkc/BZ6Nx02mpJ2tNCkHbKXwKBib40OdiWz2RVQWCG4
YYCtFrFs4AdDknrL8iyQl+w5lM6ixBHg1TB9gpK1T/M7sQmUHMmNuTKcSMku
mioegYqA9e1x+FfEjX4NS3itVS7nD6/qHZmU3JZOrX6BRMkXemZRUnfVGusN
L0n8UnbDTOvv6xwozDDZXM786VKL4Ib8KVsJP0fErang4P2oFDUMYZ4QO/zA
fmFfgPL6Hl8HPORvy3bC54/9jz3KoSRs7K3WZb4bR12pouSiMaWQq6YkPmQz
mA9l+9nrUtjcGXggA65Mk0UZFEjfH2WguFMnC8yjJGepPHBFQ0n5Tf2cRyEl
32O6nNZSSv4D3dJQVg==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalCitedPartotalCiting21", "=",
RowBox[{
RowBox[{"totalCited21", "/", "totalCiting21"}], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.4279430244682713`*^9, 3.427943085880988*^9}, {
3.4317352106545267`*^9, 3.43173521675399*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.8881302317042602`", ",", "0.8762180575172397`", ",",
"0.8662681639696871`", ",", "0.9093471493160052`", ",",
"1.0121142091043596`", ",", "0.8430321995345597`", ",",
"0.8778644856837622`", ",", "0.918017118524018`", ",",
"1.0116805577816959`", ",", "0.9001409519679063`", ",",
"0.9643203929706986`", ",", "0.8412919347237596`", ",",
"0.940034412799507`", ",", "1.0514126432430573`", ",",
"1.000416992442012`", ",", "0.9090390966627593`", ",",
"1.081380577476615`", ",", "0.9523124517803732`", ",",
"0.8647682445759369`", ",", "1.1222615607979733`", ",",
"0.9759159399303342`"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVy3lI03EABfApntjUNAsi0zSVLHFpm67Tr9PcbLgQV2NbeJQgJl6lSyuP
n5NEwlTMAxRMTZllaJ6YWeGBtAhxKopLpgjy+1ZKGRKE0vv98fjwHrwTKVnx
qVY8Hi8BKVKtKKWVLHlUEjV1qIolSSqHyVAYmKX+/BEOxJp61mBcU+Aip0Wt
ShQ9Y0lb6MqxRCgqFVpuQ8OXoig9PKyQBT+BvWdC4pga/CbP75bBk7Nz+qcw
M2I57w300rvED0PLg2qDCfrMtdfa1LLkTvNBsx2MVeaohbDD5X2kCFYKsj21
cNzR36cYCpZ8m0rhrxsMn4FjpWpzF/y5sO5sgPadrrQbFvXwfvdD1SvbxkH4
LqDHeghql1fcV+GA8eKI7jlLph0y0qX1LAn/JNyYbGCJ5LS2cxYOpVl2/BtZ
8jeq5FQE/JE/p+QUuDNvo+FCfUa5DEao6vbSYa7Zaf4ulDq5JmfDkHC+fT7c
WPR9qIMx1mJ573eW1PXnaPvh1q7jsIxHyajOrmImjJKqSNOe+BIlSeXnMkcu
U/LySoxoFDrf2v43DrvL3II/QP1IXTHn0cebeWYFJWsNU5vf4LzB28/2OiXN
02NiR6h44Sxxgh78nYIDMLytdYKTiW3RCLne+to+ARqZC1tqOM0GSTRw4qqB
mOBqeZ9pHtqsd/HNMCBtQrnP7anJZ9tvUiLym0nnHCzkawrVlIRFy1LcNJRU
MH88vWFBjcO2FBqtj3hdg/eCJEtyeLzvq4CF1Va5cg8tJbvi+x4byZR0NOhm
bVIoyTO27I9lUPIfQxlRsQ==
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Totalcited / totalciting", "Section",
CellChangeTimes->{{3.430286975951847*^9, 3.4302869904018717`*^9}}],
Cell[CellGroupData[{
Cell[BoxData["totalCited21"], "Input",
CellChangeTimes->{{3.531534752149755*^9, 3.531534755357925*^9}, {
3.532125207920847*^9, 3.5321252126371193`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"251562", ",", "147648", ",", "69272", ",", "719440", ",", "546569", ",",
"128237", ",", "124080", ",", "107576", ",", "50495", ",", "49812", ",",
"202596", ",", "76762", ",", "109812", ",", "30553", ",", "38386", ",",
"365251", ",", "698029", ",", "501143", ",", "224480", ",", "2409371", ",",
"270925"}], "}"}]], "Output",
CellChangeTimes->{3.531534756140152*^9, 3.531614505032558*^9,
3.5316228619278297`*^9, 3.531627032509416*^9, 3.531629519605694*^9,
3.5316301090317097`*^9, 3.53171324492645*^9, 3.531776061423616*^9,
3.5317901938719482`*^9, 3.531790873446558*^9, 3.532036621301929*^9,
3.5320398375604753`*^9, 3.532054637258306*^9, 3.53212484611796*^9,
3.535608662305171*^9, 3.5370974324757547`*^9, 3.537408786363387*^9,
3.537436911696905*^9, 3.537520504317863*^9, 3.537524984775404*^9,
3.537528514149798*^9, 3.5378487105155*^9, 3.537939043612877*^9,
3.540983979682806*^9, 3.541051011805316*^9, 3.5466710929810658`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"grandTotalCited21", "=",
RowBox[{"Tr", "[", "totalCited21", "]"}]}]], "Input",
CellChangeTimes->{{3.532125186149596*^9, 3.532125219176742*^9}}],
Cell[BoxData["7121999"], "Output",
CellChangeTimes->{3.5321252204743443`*^9, 3.535608662354896*^9,
3.537097432520199*^9, 3.537408786430399*^9, 3.537436911740649*^9,
3.537520504366849*^9, 3.5375249848197412`*^9, 3.5375285141996326`*^9,
3.537848710559784*^9, 3.537939043667004*^9, 3.540983979734106*^9,
3.54105101194003*^9, 3.546671093031654*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData["totalCiting21"], "Input",
CellChangeTimes->{{3.531534709962921*^9, 3.531534719143865*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"283249", ",", "168506", ",", "79966", ",", "791161", ",", "540027", ",",
"152114", ",", "141343", ",", "117183", ",", "49912", ",", "55338", ",",
"210092", ",", "91243", ",", "116817", ",", "29059", ",", "38370", ",",
"401799", ",", "645498", ",", "526238", ",", "259584", ",", "2146889", ",",
"277611"}], "}"}]], "Output",
CellChangeTimes->{3.5315347203303633`*^9, 3.5316145050593233`*^9,
3.531622861938301*^9, 3.531627032519115*^9, 3.531629519656095*^9,
3.531630109083321*^9, 3.53171324498424*^9, 3.531776061513401*^9,
3.531790193905875*^9, 3.531790873499352*^9, 3.532036621334509*^9,
3.532039837571948*^9, 3.532054637317534*^9, 3.5321248461461554`*^9,
3.5356086624048758`*^9, 3.5370974325757647`*^9, 3.537408786498272*^9,
3.537436911797353*^9, 3.537520504424226*^9, 3.5375249848755407`*^9,
3.537528514249942*^9, 3.53784871061653*^9, 3.5379390437150097`*^9,
3.540983979880777*^9, 3.54105101207386*^9, 3.546671093080554*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"grandTotalCiting21", "=",
RowBox[{"Tr", "[", "totalCiting21", "]"}]}]], "Input",
CellChangeTimes->{{3.532125224928686*^9, 3.5321252387254763`*^9}}],
Cell[BoxData["7121999"], "Output",
CellChangeTimes->{3.532125239925144*^9, 3.535608662455213*^9,
3.537097432620941*^9, 3.537408786563554*^9, 3.537436911841564*^9,
3.53752050448626*^9, 3.5375249849215384`*^9, 3.53752851430643*^9,
3.537848710659964*^9, 3.537939043762491*^9, 3.540983979939746*^9,
3.541051012314033*^9, 3.546671093129614*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalCited21DropSelf", "=",
RowBox[{"(",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "citedciting21Data"}],
"]"}], "-",
RowBox[{"Tr", "[",
RowBox[{"citedciting21Data", ",", "List"}], "]"}]}], ")"}]}]], "Input",
CellChangeTimes->{{3.5225460247774363`*^9, 3.522546058304668*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"62616", ",", "64483", ",", "25433", ",", "147894", ",", "142806", ",",
"42969", ",", "46395", ",", "40113", ",", "16809", ",", "19756", ",",
"64800", ",", "17925", ",", "21060", ",", "10398", ",", "9594", ",",
"125362", ",", "283151", ",", "158080", ",", "83704", ",", "705816", ",",
"29097"}], "}"}]], "Output",
CellChangeTimes->{3.522546035790784*^9, 3.52254608250515*^9,
3.5225481702869463`*^9, 3.522557919501293*^9, 3.52255832858914*^9,
3.522558972669182*^9, 3.531531183245323*^9, 3.531534142203279*^9,
3.531614505070759*^9, 3.531622861949305*^9, 3.531627032529889*^9,
3.531629519793898*^9, 3.531630109094101*^9, 3.5317132449947968`*^9,
3.531776061523452*^9, 3.5317901939174423`*^9, 3.531790873567381*^9,
3.532036621346706*^9, 3.5320398375836143`*^9, 3.5320546373698483`*^9,
3.5321248461571217`*^9, 3.535608662511986*^9, 3.537097432675666*^9,
3.537408786631385*^9, 3.537436911897356*^9, 3.537520504534822*^9,
3.537524984970945*^9, 3.5375285143507233`*^9, 3.537848710715928*^9,
3.537939043819027*^9, 3.540983979983425*^9, 3.54105101237368*^9,
3.546671093166832*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"grandTotalCited21DropSelf", "=",
RowBox[{"Tr", "[", "totalCited21DropSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.532125252600861*^9, 3.532125278776764*^9}}],
Cell[BoxData["2118261"], "Output",
CellChangeTimes->{3.532125280055375*^9, 3.535608662635997*^9,
3.5370974327205477`*^9, 3.537408786698176*^9, 3.5374369119412403`*^9,
3.5375205045715714`*^9, 3.537524985021542*^9, 3.53752851439979*^9,
3.537848710759606*^9, 3.5379390438618507`*^9, 3.540983980039385*^9,
3.541051012438899*^9, 3.5466710932148046`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"grandTotalCited21DropSelf", "/", "grandTotalCited21"}], "//",
"N"}]], "Input",
CellChangeTimes->{{3.532125297092415*^9, 3.532125302641477*^9}}],
Cell[BoxData["0.29742506282295184`"], "Output",
CellChangeTimes->{3.532125303055977*^9, 3.535608662694989*^9,
3.537097432776013*^9, 3.5374087867639837`*^9, 3.537436912088113*^9,
3.537520504617827*^9, 3.5375249850715103`*^9, 3.5375285144509153`*^9,
3.537848710907509*^9, 3.5379390439193687`*^9, 3.540983980083561*^9,
3.5410510125050364`*^9, 3.546671093263755*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{"totalCitedPartotalCiting21", ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{", "NosANDClNames21", "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.427945349924613*^9, 3.427945378443643*^9}, {
3.431735232246716*^9, 3.431735236700985*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "0.8881302317042602`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.8762180575172397`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.8662681639696871`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.9093471493160052`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "1.0121142091043596`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.8430321995345597`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.8778644856837622`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.918017118524018`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "1.0116805577816959`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.9001409519679063`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.9643203929706986`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.8412919347237596`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.940034412799507`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "1.0514126432430573`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "1.000416992442012`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.9090390966627593`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "1.081380577476615`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.9523124517803732`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.8647682445759369`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "1.1222615607979733`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.9759159399303342`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "ColumnsIndexed" -> {},
"Rows" -> {{False}}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
OutputFormsDump`HeadedColumn],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzltIk3EcxvEZSwnTSreIaeuADvLGRJxILfzNKa6NKUORNlFcWGRGC3pn
SWGukWWiObAWHagEaxPnYTglQlvlsIMhrNSL1TqY9f6VJgVRhqtnFw8feK6+
O0zH9bUxAoFAi50abj+pbuXJfPfAhKidJy4z41k29PsaXjyGmr49Mx+ha/Zw
tbyDJ31HOLUaFvn1Hw5C5ZFelQ06kg9ltkCuVqGzdvKUH/b+Pg9t8i+2Nijp
/8a5oSAg1Y9AxedOZwDee+21C+08ZTemBGOhb9liyIEL7VNKOcyqOrG1Enpv
5O5sgpFJw/VmWKjuSLDCkKwueB/elMwnOuHSRilzwTZT7A8P7Gnb5BiGs+Re
44X7S4LJ72F6v2q0oYsnS9WWo8VXeSrT/Pspc/A0cPbirnzoNi2URzWrBocK
YcaTzTVm+CuUGGeJ/iucbmCRp5QrlkoP3OCMH1ELGOln5JcncxnVDwVW8xSM
ihbHG0b3MfLd0uQ9hOzY8t8xmHYtOXMczrztaoq61MlzwRJGyjn/13dwNSs9
fW0po/Dzsbx10NOTVBAPK6b+nF4PL5i7n0YdUd0x5sDbssG4MnhpWvHdAKc/
ZRcYYUtrLwVgs84TeAMzJO6EIDzHTZRHYOr4bF13BaMH1RJjowF9fQZTkpGR
/6VQuh3Oj4rDxZBi0rZp4Iq0dE4LVaLQbh6K9lq14kpGrxw28XwNI9kZ+7TQ
xMhR6Io8qmf0H4R4ONU=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalCitedPartotalCiting21DropSelf", "=",
RowBox[{
RowBox[{"citedFromAllOthers", "/", "citingToAllOthers"}], "//",
"N"}]}]], "Input",
CellChangeTimes->{{3.5317891887227907`*^9, 3.531789223672263*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.6639873598931105`", ",", "0.7555922710069017`", ",",
"0.7039887065075981`", ",", "0.6734239464517451`", ",",
"1.0480097457875888`", ",", "0.6428058522574275`", ",",
"0.7288164881083289`", ",", "0.8067779565567176`", ",",
"1.0359299889066929`", ",", "0.7814255201329009`", ",",
"0.8963151488325772`", ",", "0.5531383077207924`", ",",
"0.7504008551576697`", ",", "1.167789757412399`", ",",
"1.0016704948841093`", ",", "0.7742696559817183`", ",",
"1.2277816321221056`", ",", "0.8629998635184932`", ",",
"0.7045316813682581`", ",", "1.5920637713326746`", ",",
"0.8131514965206942`"}], "}"}]], "Output",
CellChangeTimes->{3.5317892253173637`*^9, 3.531790193946911*^9,
3.531790873664833*^9, 3.532036621372034*^9, 3.532039837615101*^9,
3.532054637492889*^9, 3.532124846181637*^9, 3.535608662789288*^9,
3.5370974328714857`*^9, 3.537408786899334*^9, 3.537436912192869*^9,
3.53752050485124*^9, 3.5375249851718884`*^9, 3.537528514648642*^9,
3.537848711011005*^9, 3.537939044114566*^9, 3.54098398018517*^9,
3.54105101263901*^9, 3.546671093430184*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{
RowBox[{
RowBox[{"citedFromAllOthers", "/", "citingToAllOthers"}], "//", "N"}],
",", "0.01"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{", "NosANDClNames21", "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.432340000823085*^9, 3.432340093684187*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "0.66`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.76`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.7000000000000001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.67`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "1.05`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.64`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.73`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.81`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "1.04`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.78`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.9`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.55`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.75`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "1.17`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "1.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.77`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "1.23`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.86`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.7000000000000001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "1.59`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.81`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "ColumnsIndexed" -> {},
"Rows" -> {{False}}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
OutputFormsDump`HeadedColumn],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVxVsog2EYAOA5rCUjbW1LOYellKVhE+N1ChNyrE1qKzcoSoztwpWEGylL
oqnFjZbTHELTUo4rNGnpJ2nF/zlrm1jG+188PYnarrq2IBaLJUVN3OiyxQka
hIZmJXOJ76KGefeZ87mG31G8qXV8umg9eANXWij+LV70Urqlm6TBlJ/QUW6k
4X5H5EmdosHqGEkrxENEX43M896X1VK8PyDSdOO8TgGnD7f5DdXLTzT8Zepa
1nC7LHKzgkWgxysbO8oh8Ci8/JXnExCv2HVbCgJWn1K+jfvO3v02fMHPz9jD
k6aNg8ymKNJL1RAYVxw+3ODJsykp7FoCHseePAxfCOYXh+NC6c8AF6+8Me8z
S5fn1Fm4T7zKacAl3QWvKjzvOLtYjX+zLeDE31OtzkvcqFqJoPCr04PGAO72
XLebmwnM22LVehWB9K9WLU9NgP3DiUvATaGxb+X4R644Xonr7U2uKvxEcS+h
cVf9UJWghUDMzLDArSEwYTWeh2oJjEYtBXY7CfwDcojV3w==
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Issues", "Section",
CellChangeTimes->{{3.531531301095042*^9, 3.531531314748674*^9}}],
Cell[CellGroupData[{
Cell["Issues", "Subsection",
CellChangeTimes->{{3.531533085562952*^9, 3.531533099190963*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNamesANDIssues21", "//", "Length"}]], "Input",
CellChangeTimes->{{3.531531922851304*^9, 3.531531924769326*^9}}],
Cell[BoxData["21"], "Output",
CellChangeTimes->{3.531531925486174*^9, 3.531534142254795*^9,
3.5316145052123957`*^9, 3.531622862092588*^9, 3.531627032605238*^9,
3.5316295198294287`*^9, 3.53163010927324*^9, 3.531713245080867*^9,
3.531776061581246*^9, 3.531790193998362*^9, 3.531790873747061*^9,
3.532036621417045*^9, 3.532039837645261*^9, 3.5320546376193447`*^9,
3.532124846223729*^9, 3.53560866289163*^9, 3.537097432975662*^9,
3.537408787033502*^9, 3.5374369123494453`*^9, 3.5375205049520206`*^9,
3.537524985272032*^9, 3.537528514749283*^9, 3.537848711110704*^9,
3.537939044213594*^9, 3.5409839802839317`*^9, 3.541051012840371*^9,
3.54667109351478*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ClNamesANDIssues21", "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5315318926550407`*^9, 3.531531898263886*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"\<\"B-1\"\>", "152543.`"},
{"\<\"B-2\"\>", "122403.`"},
{"\<\"B-3\"\>", "57635.`"},
{"\<\"C-1\"\>", "345502.`"},
{"\<\"C-2\"\>", "384818.`"},
{"\<\"Ca\"\>", "81244.`"},
{"\<\"Cp\"\>", "93381.`"},
{"\<\"E-1\"\>", "131554.`"},
{"\<\"E-2\"\>", "69050.`"},
{"\<\"E-3\"\>", "75438.`"},
{"\<\"G-1\"\>", "144004.`"},
{"\<\"G-2\"\>", "55707.`"},
{"\<\"I-1\"\>", "145987.`"},
{"\<\"I-2\"\>", "57812.`"},
{"\<\"M\"\>", "77345.`"},
{"\<\"Me-1\"\>", "243966.`"},
{"\<\"Me-2\"\>", "296555.`"},
{"\<\"Me-3\"\>", "201248.`"},
{"\<\"Me-4\"\>", "144683.`"},
{"\<\"Mo\"\>", "591227.`"},
{"\<\"Q\"\>", "110448.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{3.531531898771738*^9, 3.531534142265132*^9,
3.531614505227154*^9, 3.5316228621042137`*^9, 3.531627032658352*^9,
3.531629519880804*^9, 3.5316301092876873`*^9, 3.531713245092402*^9,
3.531776061610952*^9, 3.531790194009955*^9, 3.5317908737584467`*^9,
3.532036621427514*^9, 3.5320398376560183`*^9, 3.532054637657208*^9,
3.532124846234826*^9, 3.535608662962278*^9, 3.5370974330272837`*^9,
3.5374087871016073`*^9, 3.537436912449114*^9, 3.53752050500992*^9,
3.537524985371702*^9, 3.537528514809567*^9, 3.537848711168674*^9,
3.5379390442719517`*^9, 3.5409839803360233`*^9, 3.5410510129078503`*^9,
3.546671093571789*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Cited / Issues", "Subsection",
CellChangeTimes->{{3.5315331025195007`*^9, 3.5315331201787357`*^9}}],
Cell[CellGroupData[{
Cell[BoxData["totalCited21"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"251562", ",", "147648", ",", "69272", ",", "719440", ",", "546569", ",",
"128237", ",", "124080", ",", "107576", ",", "50495", ",", "49812", ",",
"202596", ",", "76762", ",", "109812", ",", "30553", ",", "38386", ",",
"365251", ",", "698029", ",", "501143", ",", "224480", ",", "2409371", ",",
"270925"}], "}"}]], "Output",
CellChangeTimes->{3.531534272082411*^9, 3.531614505238357*^9,
3.531622862132847*^9, 3.531627032670114*^9, 3.531629519891335*^9,
3.531630109298855*^9, 3.53171324510361*^9, 3.531776061622471*^9,
3.531790194024643*^9, 3.531790873770009*^9, 3.532036621437976*^9,
3.532039837666304*^9, 3.532054637668497*^9, 3.532124846246537*^9,
3.535608663007327*^9, 3.537097433071946*^9, 3.5374087871667233`*^9,
3.537436912648226*^9, 3.537520505052967*^9, 3.537524985408372*^9,
3.5375285148519573`*^9, 3.537848711211403*^9, 3.537939044314961*^9,
3.5409839803851748`*^9, 3.541051012976211*^9, 3.546671093615313*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"citedParIssues", " ", "=", " ",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDIssues21", "[",
RowBox[{"[", "n", "]"}], "]"}], "[",
RowBox[{"[", "1", "]"}], "]"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"totalCited21", "[",
RowBox[{"[", "n", "]"}], "]"}], "/",
RowBox[{"ClNamesANDIssues21", "[",
RowBox[{"[",
RowBox[{"n", ",", "2"}], "]"}], "]"}]}]}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}]}], ")"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5315342329113073`*^9, 3.5315344310754128`*^9}, {
3.531535152421412*^9, 3.531535160785008*^9}, {3.531535194227252*^9,
3.5315352015468597`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"\<\"B-1\"\>", "1.6491218869433537`"},
{"\<\"B-2\"\>", "1.2062449449768389`"},
{"\<\"B-3\"\>", "1.2019085625054222`"},
{"\<\"C-1\"\>", "2.082303430949749`"},
{"\<\"C-2\"\>", "1.4203311695398864`"},
{"\<\"Ca\"\>", "1.5784180985672789`"},
{"\<\"Cp\"\>", "1.3287499598419379`"},
{"\<\"E-1\"\>", "0.8177326421089438`"},
{"\<\"E-2\"\>", "0.7312816799420709`"},
{"\<\"E-3\"\>", "0.6603038256581564`"},
{"\<\"G-1\"\>", "1.4068775867337018`"},
{"\<\"G-2\"\>", "1.3779596819071211`"},
{"\<\"I-1\"\>", "0.7522039633666011`"},
{"\<\"I-2\"\>", "0.5284888950390922`"},
{"\<\"M\"\>", "0.4962958174413343`"},
{"\<\"Me-1\"\>", "1.4971389455907789`"},
{"\<\"Me-2\"\>", "2.3537927197315844`"},
{"\<\"Me-3\"\>", "2.4901762998886943`"},
{"\<\"Me-4\"\>", "1.551529896394186`"},
{"\<\"Mo\"\>", "4.075204616839217`"},
{"\<\"Q\"\>", "2.4529642908880196`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.5315343684782352`*^9, 3.531534379521801*^9},
3.531534417807218*^9, 3.531535166263666*^9, 3.531535202171411*^9,
3.531614505267084*^9, 3.531622862148602*^9, 3.5316270326829*^9,
3.531629519903307*^9, 3.531630109352743*^9, 3.531713245115842*^9,
3.531776061634639*^9, 3.5317901940592327`*^9, 3.531790873782619*^9,
3.532036621470825*^9, 3.5320398376828003`*^9, 3.532054637680746*^9,
3.5321248462763367`*^9, 3.535608663059608*^9, 3.5370974331276417`*^9,
3.5374087873276567`*^9, 3.537436912750353*^9, 3.53752050510423*^9,
3.537524985456828*^9, 3.537528514904489*^9, 3.537848711262579*^9,
3.537939044368658*^9, 3.540983980436602*^9, 3.5410510130409603`*^9,
3.546671093666119*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"(",
RowBox[{"citedParIssuesDropSelf", " ", "=", " ",
RowBox[{"Table", "[", "\[IndentingNewLine]",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"ClNamesANDIssues21", "[",
RowBox[{"[", "n", "]"}], "]"}], "[",
RowBox[{"[", "1", "]"}], "]"}], ",", "\[IndentingNewLine]",
RowBox[{
RowBox[{"totalCited21DropSelf", "[",
RowBox[{"[", "n", "]"}], "]"}], "/",
RowBox[{"ClNamesANDIssues21", "[",
RowBox[{"[",
RowBox[{"n", ",", "2"}], "]"}], "]"}]}]}], "}"}], ",",
"\[IndentingNewLine]",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}]}], ")"}]], "Input",
CellChangeTimes->{{3.5315342329113073`*^9, 3.5315344310754128`*^9}, {
3.531534795763158*^9, 3.531534821409237*^9}, {3.5315351708117237`*^9,
3.531535213076844*^9}, {3.531535605101261*^9, 3.531535643477786*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "0.4104809791337525`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "0.5268089834399483`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "0.44127700182180973`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "0.4280554092306268`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "0.37110010446496783`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "0.52888828713505`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "0.4968355447039548`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.30491661218967114`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.24343229543808834`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.26188393117526976`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "0.4499875003472126`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "0.3217728472184824`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.14425942035934708`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.17985885283332181`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.12404163165039757`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "0.5138502906142659`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "0.9548009644079514`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "0.7854984894259819`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "0.5785337600132704`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "1.1938155733753701`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "0.2634452411994785`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.531614505278616*^9, 3.531622862160833*^9,
3.5316270327367496`*^9, 3.531629519915626*^9, 3.531630109365584*^9,
3.531713245176659*^9, 3.531776061665236*^9, 3.5317901940780907`*^9,
3.531790873819353*^9, 3.532036621482196*^9, 3.532039837694254*^9,
3.532054637693338*^9, 3.532124846289398*^9, 3.535608663109188*^9,
3.537097433172604*^9, 3.5374087874031277`*^9, 3.5374369128522787`*^9,
3.537520505155143*^9, 3.53752498550915*^9, 3.5375285149536343`*^9,
3.537848711313216*^9, 3.537939044416727*^9, 3.540983980486533*^9,
3.541051013109003*^9, 3.5466710937160263`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"Round", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "0.01"}], "]"}]}], "}"}],
"&"}], ",", "citedParIssuesDropSelf"}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5315356488747787`*^9, 3.5315357182872467`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"\<\"B-1\"\>", "0.41000000000000003`"},
{"\<\"B-2\"\>", "0.53`"},
{"\<\"B-3\"\>", "0.44`"},
{"\<\"C-1\"\>", "0.43`"},
{"\<\"C-2\"\>", "0.37`"},
{"\<\"Ca\"\>", "0.53`"},
{"\<\"Cp\"\>", "0.5`"},
{"\<\"E-1\"\>", "0.3`"},
{"\<\"E-2\"\>", "0.24`"},
{"\<\"E-3\"\>", "0.26`"},
{"\<\"G-1\"\>", "0.45`"},
{"\<\"G-2\"\>", "0.32`"},
{"\<\"I-1\"\>", "0.14`"},
{"\<\"I-2\"\>", "0.18`"},
{"\<\"M\"\>", "0.12`"},
{"\<\"Me-1\"\>", "0.51`"},
{"\<\"Me-2\"\>", "0.9500000000000001`"},
{"\<\"Me-3\"\>", "0.79`"},
{"\<\"Me-4\"\>", "0.58`"},
{"\<\"Mo\"\>", "1.19`"},
{"\<\"Q\"\>", "0.26`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{
3.5315348232834673`*^9, 3.531535181930079*^9, 3.531535214244821*^9, {
3.5315356165242023`*^9, 3.531535652687216*^9}, {3.5315357083460293`*^9,
3.531535718790618*^9}, 3.531614505289797*^9, 3.5316228621894407`*^9,
3.531627032748046*^9, 3.5316295199667807`*^9, 3.5316301093769293`*^9,
3.531713245187962*^9, 3.531776061676064*^9, 3.5317901940924473`*^9,
3.531790873830679*^9, 3.5320366214965343`*^9, 3.532039837705168*^9,
3.532054637704438*^9, 3.532124846303953*^9, 3.535608663158078*^9,
3.537097433227162*^9, 3.537408787467635*^9, 3.537436912951974*^9,
3.5375205052031593`*^9, 3.53752498555764*^9, 3.537528515002234*^9,
3.537848711362167*^9, 3.5379390444652233`*^9, 3.540983980535573*^9,
3.541051013317667*^9, 3.5466710937656593`*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["SpearmanRankCorrelation to citedParIssuesDropSelf", "Section",
CellChangeTimes->{{3.531788852536481*^9, 3.531788870240039*^9}, {
3.531801304753668*^9, 3.53180131028603*^9}, {3.531801342159812*^9,
3.5318013478665323`*^9}}],
Cell[CellGroupData[{
Cell[BoxData["citedParIssuesDropSelf"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "0.4104809791337525`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "0.5268089834399483`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "0.44127700182180973`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "0.4280554092306268`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "0.37110010446496783`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "0.52888828713505`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "0.4968355447039548`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.30491661218967114`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.24343229543808834`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.26188393117526976`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "0.4499875003472126`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "0.3217728472184824`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.14425942035934708`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.17985885283332181`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.12404163165039757`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "0.5138502906142659`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "0.9548009644079514`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "0.7854984894259819`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "0.5785337600132704`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "1.1938155733753701`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "0.2634452411994785`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.531788893000786*^9, 3.531790194129138*^9,
3.5317908738405533`*^9, 3.532036621528762*^9, 3.532039837792037*^9,
3.532054637743765*^9, 3.532124846334216*^9, 3.535608663211526*^9,
3.537097433354753*^9, 3.537408787537079*^9, 3.537436913051227*^9,
3.5375205052541647`*^9, 3.537524985592774*^9, 3.5375285150530033`*^9,
3.5378487114131203`*^9, 3.5379390445160027`*^9, 3.540983980586132*^9,
3.541051013444241*^9, 3.546671093823235*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["\<\
totalCitedPartotalCiting21DropSelf vs. citedParIssuesDropSelf\
\>", "Subsection",
CellChangeTimes->{{3.5317892581727123`*^9, 3.53178927250557*^9},
3.531789462516646*^9}],
Cell[CellGroupData[{
Cell[BoxData["totalCitedPartotalCiting21DropSelf"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.6639873598931105`", ",", "0.7555922710069017`", ",",
"0.7039887065075981`", ",", "0.6734239464517451`", ",",
"1.0480097457875888`", ",", "0.6428058522574275`", ",",
"0.7288164881083289`", ",", "0.8067779565567176`", ",",
"1.0359299889066929`", ",", "0.7814255201329009`", ",",
"0.8963151488325772`", ",", "0.5531383077207924`", ",",
"0.7504008551576697`", ",", "1.167789757412399`", ",",
"1.0016704948841093`", ",", "0.7742696559817183`", ",",
"1.2277816321221056`", ",", "0.8629998635184932`", ",",
"0.7045316813682581`", ",", "1.5920637713326746`", ",",
"0.8131514965206942`"}], "}"}]], "Output",
CellChangeTimes->{3.531789332704788*^9, 3.531790194144218*^9,
3.531790873853406*^9, 3.53203662153898*^9, 3.532039837804861*^9,
3.532054637771008*^9, 3.53212484634656*^9, 3.535608663257825*^9,
3.537097433411377*^9, 3.5374087876019077`*^9, 3.537436913175151*^9,
3.537520505303734*^9, 3.537524985638363*^9, 3.53752851510258*^9,
3.537848711462084*^9, 3.537939044565855*^9, 3.540983980635789*^9,
3.541051013508354*^9, 3.546671093864758*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{"totalCitedPartotalCiting21DropSelf", ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.531789278356599*^9, 3.5317893132210207`*^9}}],
Cell[BoxData[
RowBox[{"-", "0.03506493506493506`"}]], "Output",
CellChangeTimes->{{3.531789309837698*^9, 3.5317893136529284`*^9},
3.53179019415585*^9, 3.5317908738893013`*^9, 3.532036621570691*^9,
3.532039837831514*^9, 3.532054637781393*^9, 3.532124846357341*^9,
3.5356086632935543`*^9, 3.5370974334563427`*^9, 3.5374087876673594`*^9,
3.537436913232259*^9, 3.537520505353651*^9, 3.5375249856946373`*^9,
3.5375285151516533`*^9, 3.537848711517679*^9, 3.537939044614772*^9,
3.5409839806849117`*^9, 3.5410510135762663`*^9, 3.546671093919471*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["totalCited21DropSelf vs. citedParIssuesDropSelf", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}}],
Cell[CellGroupData[{
Cell[BoxData["totalCited21DropSelf"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"62616", ",", "64483", ",", "25433", ",", "147894", ",", "142806", ",",
"42969", ",", "46395", ",", "40113", ",", "16809", ",", "19756", ",",
"64800", ",", "17925", ",", "21060", ",", "10398", ",", "9594", ",",
"125362", ",", "283151", ",", "158080", ",", "83704", ",", "705816", ",",
"29097"}], "}"}]], "Output",
CellChangeTimes->{3.5317894483616457`*^9, 3.531790194167828*^9,
3.531790873902844*^9, 3.532036621581049*^9, 3.532039837849284*^9,
3.5320546377924013`*^9, 3.532124846368557*^9, 3.535608663342059*^9,
3.53709743351193*^9, 3.537408787736994*^9, 3.537436913277968*^9,
3.5375205054033327`*^9, 3.537524985740761*^9, 3.537528515208823*^9,
3.5378487115624866`*^9, 3.537939044671844*^9, 3.540983980741757*^9,
3.541051013642706*^9, 3.5466710939660788`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{"totalCited21DropSelf", ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.531789501781489*^9, 3.531789522854916*^9}}],
Cell[BoxData["0.8298701298701299`"], "Output",
CellChangeTimes->{{3.531789519802024*^9, 3.531789523451688*^9},
3.531790194200221*^9, 3.531790873913436*^9, 3.53203662159128*^9,
3.532039837860818*^9, 3.532054637828987*^9, 3.532124846396654*^9,
3.53560866339572*^9, 3.537097433556909*^9, 3.537408787802511*^9,
3.537436913332513*^9, 3.537520505459749*^9, 3.5375249857897863`*^9,
3.537528515251977*^9, 3.537848711616274*^9, 3.5379390447153797`*^9,
3.5409839807855787`*^9, 3.541051013710581*^9, 3.546671094021813*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["ClNamesANDIssues21 vs. citedParIssuesDropSelf", "Subsection",
CellChangeTimes->{{3.531789591955392*^9, 3.531789602688417*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDIssues21"}],
"]"}], ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.5317896410202627`*^9, 3.531789681040312*^9}}],
Cell[BoxData["0.5012987012987012`"], "Output",
CellChangeTimes->{
3.531789588870747*^9, {3.5317896528095827`*^9, 3.531789681424965*^9},
3.531790194212652*^9, 3.531790873948547*^9, 3.532036621601593*^9,
3.532039837874194*^9, 3.5320546378406963`*^9, 3.532124846492303*^9,
3.5356086634413233`*^9, 3.537097433605953*^9, 3.537408787869474*^9,
3.537436913378798*^9, 3.537520505522591*^9, 3.5375249858394012`*^9,
3.53752851530274*^9, 3.537848711663858*^9, 3.5379390447715073`*^9,
3.540983980932927*^9, 3.541051013777547*^9, 3.54667109406464*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["ClNamesANDSizes21 vs. citedParIssuesDropSelf", "Subsection",
CellChangeTimes->{{3.531791135923682*^9, 3.531791147689783*^9}}],
Cell[CellGroupData[{
Cell[BoxData["ClNamesANDSizes21"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "427"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "243"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "148"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "315"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "248"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "130"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "163"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "209"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "187"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "173"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "308"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "165"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "435"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "182"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "216"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "416"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "519"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "374"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "277"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "751"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "78"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.531791124271854*^9, 3.5320366216341267`*^9,
3.5320398379016533`*^9, 3.532054637852861*^9, 3.532124846504568*^9,
3.5356086634929943`*^9, 3.537097433663329*^9, 3.537408787938386*^9,
3.537436913434373*^9, 3.537520505573892*^9, 3.537524985892666*^9,
3.5375285153542757`*^9, 3.537848711714347*^9, 3.537939044816895*^9,
3.5409839809919643`*^9, 3.54105101384694*^9, 3.546671094123495*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDSizes21"}],
"]"}], ",",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.531791159559989*^9, 3.531791205477087*^9}}],
Cell[BoxData["0.35064935064935066`"], "Output",
CellChangeTimes->{{3.531791202557166*^9, 3.531791205914938*^9},
3.53203662164497*^9, 3.532039837912896*^9, 3.532054637889194*^9,
3.5321248465148993`*^9, 3.5356086635407248`*^9, 3.537097433705715*^9,
3.5374087880020323`*^9, 3.537436913477913*^9, 3.537520505620256*^9,
3.537524985939762*^9, 3.537528515402005*^9, 3.537848711761998*^9,
3.537939044865076*^9, 3.540983981036105*^9, 3.541051013912612*^9,
3.5466710941658*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Self [cited | citing] ratio", "Section",
CellChangeTimes->{{3.4302870469785*^9, 3.4302871002627363`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"selfcitingRatio21", "=",
RowBox[{
RowBox[{"selfCiting21", "/", "totalCiting21"}], "//", "N"}]}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{", "NosANDClNames21", "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.4299983439259644`*^9, 3.4299984045112877`*^9}, {
3.4299984514283533`*^9, 3.429998518844965*^9}, {3.431735247378096*^9,
3.431735257336936*^9}, {3.431735357145914*^9, 3.431735360729218*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "0.6670667857609383`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.4935432566199423`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.5482204937098267`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.7224142747177882`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "0.747671875665476`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.5605532692585824`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.5496204269047635`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.5757063737914203`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "0.6749078377945184`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.5431349163323576`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.6558840888753499`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.64483850815953`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.7597524332930995`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "0.6935889053305344`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "0.7503778994005733`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.5970373246324655`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "0.6427254615816006`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.6519160531926619`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.5423138560157791`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "0.7934993378791358`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.8711038107279611`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "ColumnsIndexed" -> {},
"Rows" -> {{False}}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
OutputFormsDump`HeadedColumn],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->{{3.429998453461165*^9, 3.4299984577073803`*^9},
3.429998519536099*^9, 3.43028693237772*^9, 3.430354610829315*^9,
3.4305277396525593`*^9, 3.430611176413506*^9, 3.430620931423847*^9,
3.430687270383945*^9, 3.430693243794921*^9, 3.43173182648271*^9,
3.431735362709169*^9, 3.431752743665259*^9, 3.431822256526381*^9,
3.4318404015296926`*^9, 3.431898445051548*^9, 3.431998614213087*^9,
3.432003297182762*^9, 3.4320985158917503`*^9, 3.432100375375203*^9,
3.432177899943623*^9, 3.4322496181479883`*^9, 3.4322546696386023`*^9,
3.432255597075129*^9, 3.432333027547524*^9, 3.432335479321374*^9,
3.432339281277143*^9, 3.4323577764256153`*^9, 3.432361152806889*^9,
3.43236200587814*^9, 3.432444063385283*^9, 3.4338072984239817`*^9,
3.434234717900436*^9, 3.4352147538376427`*^9, 3.435266380557889*^9,
3.435266736109138*^9, 3.435277721370203*^9, 3.43536512879253*^9,
3.435376696862615*^9, 3.479011970245945*^9, 3.479018211789701*^9,
3.489811896585606*^9, 3.518907491050283*^9, 3.521761262665331*^9,
3.5225445861891108`*^9, 3.5225481967179728`*^9, 3.522557919549307*^9,
3.522558328637744*^9, 3.5225589727319393`*^9, 3.531531183328476*^9,
3.531534142283195*^9, 3.531614505304702*^9, 3.531622862203589*^9,
3.5316270327591677`*^9, 3.5316295199809732`*^9, 3.531630109391918*^9,
3.531713245202758*^9, 3.5317760616902437`*^9, 3.531790194227998*^9,
3.531790874028569*^9, 3.532036621660584*^9, 3.53203983793004*^9,
3.532054637904162*^9, 3.5321248465297728`*^9, 3.535608663660541*^9,
3.537097433764882*^9, 3.537408788074065*^9, 3.5374369135319767`*^9,
3.5375205056816607`*^9, 3.537524985994526*^9, 3.537528515456317*^9,
3.5378487118961697`*^9, 3.5379390449265738`*^9, 3.5409839810901413`*^9,
3.541051013982836*^9, 3.546671094226976*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"selfcitedRatio21", "=",
RowBox[{
RowBox[{"selfCited21", "/", "totalCited21"}], "//", "N"}]}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{", "NosANDClNames21", "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.4299983439259644`*^9, 3.4299984045112877`*^9}, {
3.4299984514283533`*^9, 3.429998518844965*^9}, {3.429998884418523*^9,
3.4299989243697147`*^9}, {3.43173536869186*^9, 3.431735379235875*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "0.7510911822930332`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.5632653337667967`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.6328531008199562`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.7944317802735461`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "0.7387228327987866`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.6649250996202344`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.626088007736944`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.6271194318435339`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "0.6671155559956431`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.6033887416686742`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.6801516318189895`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.7664860217295015`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.8082176811277456`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "0.6596733544987399`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "0.7500651279112176`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.6567784893128287`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "0.5943563949348809`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.6845610933406233`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.6271204561653599`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "0.7070538327223164`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.8926012734151518`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, {True}, False}, "ColumnsIndexed" -> {},
"Rows" -> {{False}}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.5599999999999999]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
OutputFormsDump`HeadedColumn],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->{{3.4299989092312517`*^9, 3.4299989308513107`*^9},
3.430286933226493*^9, 3.4303546113556423`*^9, 3.4305277401163073`*^9,
3.430611176977706*^9, 3.430620932303974*^9, 3.430687271411079*^9,
3.4306932444260406`*^9, 3.4317318273685102`*^9, 3.431735381986568*^9,
3.431752744256502*^9, 3.431822257742502*^9, 3.431840402007977*^9,
3.431898446039312*^9, 3.431998614838578*^9, 3.432003297525693*^9,
3.43209851606152*^9, 3.432100375414421*^9, 3.432177900353929*^9,
3.43224961852507*^9, 3.432254672474371*^9, 3.432255597272174*^9,
3.4323330277490396`*^9, 3.432335479523467*^9, 3.4323392816337*^9,
3.4323577766095247`*^9, 3.432361153028113*^9, 3.4323620060999317`*^9,
3.432444064213532*^9, 3.433807298703594*^9, 3.434234718193424*^9,
3.43521475492981*^9, 3.4352663808510227`*^9, 3.435266736147376*^9,
3.435277724157507*^9, 3.43536512901021*^9, 3.4353766970678988`*^9,
3.479011970443763*^9, 3.479018211853891*^9, 3.489811896700323*^9,
3.518907491133325*^9, 3.5217612626778812`*^9, 3.522544586364449*^9,
3.522548196778521*^9, 3.522557919561358*^9, 3.5225583286606817`*^9,
3.522558972755396*^9, 3.531531183381612*^9, 3.531534142316278*^9,
3.531614505334456*^9, 3.53162286221657*^9, 3.531627032811223*^9,
3.531629519993464*^9, 3.531630109447258*^9, 3.531713245263996*^9,
3.53177606172116*^9, 3.531790194240818*^9, 3.5317908740652723`*^9,
3.5320366216964607`*^9, 3.5320398379496937`*^9, 3.532054637917478*^9,
3.532124846560614*^9, 3.535608663717903*^9, 3.537097433815177*^9,
3.537408788138502*^9, 3.5374369135825167`*^9, 3.537520505722657*^9,
3.537524986044945*^9, 3.537528515506557*^9, 3.53784871195711*^9,
3.5379390450493298`*^9, 3.540983981139818*^9, 3.541051014049245*^9,
3.546671094269288*^9}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Cited / citing 21 diagonal standerdize table", "Section",
CellChangeTimes->{{3.535610389139483*^9, 3.535610410928759*^9}}],
Cell["\:5bfe\:89d2\:8981\:7d20\:30921/2 \:306b\:3059\:308b\:3079\:304d(\:307e\
\:3060\:3057\:3066\:3044\:306a\:3044)\:3001\:3067\:3082\:3001\:5f71\:97ff\
\:306e\:6392\:9664\:306e\:4ed5\:65b9\:3068\:3057\:3066\:306f\:3069\:3063\:3061\
\:3067\:3082\:3088\:3044\:3002", "Text",
CellChangeTimes->{{3.5356106654970407`*^9, 3.535610724926364*^9}, {
3.535610922172163*^9, 3.535610951547009*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"diagonalStanderdize", "[",
RowBox[{"citedciting21Data", "+", "citingcited21Data"}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.535610468528138*^9, 3.535610540957909*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"1.0000000000000002`", "0.06411029894010505`", "0.10034928605183834`",
"0.002473979516936677`", "0.0016274122683246242`",
"0.0063381740210732415`", "0.002897141320357608`",
"0.00015943028741476523`", "0.0010278276084408915`",
"0.0025079990173111724`", "0.05027369261091418`",
"0.017024342244292393`", "0.0025174431658756646`",
"0.003937730787297459`", "0.0032742540027795373`",
"0.0008360764373328599`", "0.0016572534297787601`",
"0.007215282913847205`", "0.017088494660407988`", "0.07506108188686872`",
"0.00006549466007819147`"},
{"0.06411029894010506`", "1.`", "0.033967614258522384`",
"0.026038922167905345`", "0.000916802368302094`", "0.0625638765188604`",
"0.026866700093201443`", "0.000934533597087721`",
"0.0006140282364593083`", "0.02786218871661548`", "0.04521231661938454`",
"0.00625435460738791`", "0.0009253536843262783`",
"0.0011601974656444327`", "0.00026566671124871304`",
"0.008042718500408656`", "0.03537536815871591`", "0.007024420571338821`",
"0.06138066235116328`", "0.07729299416672247`",
"0.00007403988083202078`"},
{"0.10034928605183834`", "0.03396761425852238`", "0.9999999999999998`",
"0.0019047211408727222`", "0.0008267974078257978`",
"0.005193024503772423`", "0.00118236124514955`",
"0.00020226909937745148`", "0.006232330503029063`",
"0.0009228877821081602`", "0.0814046492748078`", "0.018488854827253487`",
"0.0006332536502349265`", "0.0015643402947639708`",
"0.00021110330230565523`", "0.0013846909630126922`",
"0.0015979263268121055`", "0.011685005747529559`",
"0.014950592044538236`", "0.029936291110371962`",
"0.00008255346644662862`"},
{"0.002473979516936677`", "0.026038922167905345`",
"0.001904721140872722`", "1.0000000000000002`", "0.09386234089769895`",
"0.06720220990519972`", "0.10567622262602659`", "0.060416340349431615`",
"0.0029404232366940504`", "0.05177149055764767`",
"0.014903629629820237`", "0.00772169064040338`",
"0.0021911519108816844`", "0.0006894689674763052`",
"0.0008029263545535774`", "0.0047180456987853305`",
"0.003982942036457758`", "0.0060094169716090546`",
"0.004984935049615594`", "0.06140712724606548`", "0.002930544683592551`"},
{"0.0016274122683246242`", "0.000916802368302094`",
"0.0008267974078257978`", "0.09386234089769896`", "1.`",
"0.022692240312724495`", "0.0323451428191868`", "0.12796695314340223`",
"0.02826604842362371`", "0.019026654323769605`", "0.01421728750639908`",
"0.018691955509563356`", "0.022828752715061598`", "0.02024720201425425`",
"0.02042757157940867`", "0.004072673002305182`",
"0.0004495669337552493`", "0.0020366622128110707`",
"0.0013506048405328825`", "0.021156760106361246`",
"0.07233517453177032`"},
{"0.0063381740210732415`", "0.06256387651886039`",
"0.005193024503772423`", "0.0672022099051997`", "0.022692240312724495`",
"1.`", "0.03060024634621653`", "0.012677202435123195`",
"0.003647783052740264`", "0.024059614196229383`", "0.04241411349938405`",
"0.010313401417788757`", "0.002902547060598137`",
"0.0017488540498609103`", "0.00013118506703611396`",
"0.004586755961421124`", "0.011555969936937948`",
"0.005998841426866894`", "0.00571825774080362`", "0.037508373489353014`",
"0.0011734202397625973`"},
{"0.0028971413203576074`", "0.026866700093201443`",
"0.0011823612451495502`", "0.10567622262602659`", "0.0323451428191868`",
"0.030600246346216532`", "0.9999999999999998`", "0.04773889077494944`",
"0.020203060936993422`", "0.05487284218040155`", "0.007103959038169644`",
"0.002418376486561301`", "0.0010658242847480664`",
"0.0009350648629950942`", "0.0004546047383372978`",
"0.02462038049319492`", "0.00471239379090139`", "0.0030260174166926103`",
"0.006000408735008422`", "0.022964014167766306`",
"0.0006675736973288402`"},
{"0.00015943028741476523`", "0.000934533597087721`",
"0.00020226909937745148`", "0.060416340349431615`",
"0.1279669531434022`", "0.012677202435123195`", "0.04773889077494944`",
"1.0000000000000002`", "0.058588636174216106`", "0.03353347273016391`",
"0.0035885993029115036`", "0.005293437052605533`",
"0.005809085878124147`", "0.009993399885331251`",
"0.0007487644180010422`", "0.004457024967579055`",
"0.00008667123288843161`", "0.00006901913841974076`",
"0.00006669852367295662`", "0.002648899198902981`",
"0.0006772203353423711`"},
{"0.0010278276084408912`", "0.0006140282364593082`",
"0.006232330503029063`", "0.0029404232366940504`",
"0.02826604842362371`", "0.003647783052740264`", "0.020203060936993422`",
"0.058588636174216106`", "1.0000000000000002`", "0.05386671661266624`",
"0.023616363049083544`", "0.004357643999925495`", "0.03394409040662383`",
"0.011187226620185686`", "0.03100213757350951`",
"0.006135014981471398`", "0.0006640254604739247`",
"0.004362758567125876`", "0.0001960400189516478`",
"0.0016509871228399412`", "0.0033127844130639156`"},
{"0.002507999017311172`", "0.02786218871661548`",
"0.0009228877821081601`", "0.05177149055764766`", "0.01902665432376961`",
"0.02405961419622938`", "0.054872842180401546`", "0.03353347273016391`",
"0.053866716612666246`", "0.9999999999999997`", "0.045948086296970746`",
"0.005695274570890661`", "0.014521336792210102`",
"0.00934481792001167`", "0.0037563043237769994`",
"0.0006948343074356951`", "0.0005283554818240754`",
"0.0002560476630613941`", "0.00016910746667648778`",
"0.0018472795011466444`", "0.0008034737421362004`"},
{"0.05027369261091418`", "0.04521231661938454`", "0.08140464927480778`",
"0.014903629629820237`", "0.01421728750639908`", "0.04241411349938405`",
"0.007103959038169644`", "0.0035885993029115036`",
"0.02361636304908354`", "0.045948086296970746`", "0.9999999999999998`",
"0.10854418235602212`", "0.005552147451947208`", "0.007722976308033832`",
"0.002270292504001841`", "0.0029563441973066793`",
"0.014100829315121332`", "0.0034954922719290155`",
"0.004487427048679761`", "0.025415740292721412`", "0.01612199063719281`"},
{"0.017024342244292393`", "0.006254354607387909`",
"0.018488854827253487`", "0.007721690640403381`",
"0.018691955509563356`", "0.010313401417788757`",
"0.002418376486561301`", "0.005293437052605533`",
"0.004357643999925495`", "0.005695274570890661`", "0.10854418235602212`",
"1.`", "0.0010932330603809857`", "0.0006969386987092955`",
"0.002308141492149316`", "0.0008796013010821893`",
"0.0003136249584439429`", "0.0006933045168450182`",
"0.0008955050470958746`", "0.015845190923000258`",
"0.005989956668852504`"},
{"0.002517443165875665`", "0.0009253536843262783`",
"0.0006332536502349266`", "0.0021911519108816844`",
"0.022828752715061594`", "0.002902547060598137`",
"0.0010658242847480664`", "0.005809085878124147`",
"0.03394409040662383`", "0.014521336792210102`", "0.005552147451947208`",
"0.0010932330603809857`", "1.0000000000000002`", "0.0813942027074304`",
"0.06972243142402249`", "0.01038289331301958`", "0.004309791223044044`",
"0.012745555490201012`", "0.0006754505611912842`",
"0.00855243531489887`", "0.0019044160674872334`"},
{"0.00393773078729746`", "0.0011601974656444327`",
"0.0015643402947639708`", "0.0006894689674763053`",
"0.02024720201425425`", "0.0017488540498609105`",
"0.0009350648629950942`", "0.009993399885331251`",
"0.011187226620185684`", "0.00934481792001167`", "0.007722976308033832`",
"0.0006969386987092954`", "0.0813942027074304`", "0.9999999999999999`",
"0.023807078511237926`", "0.003336502208237506`",
"0.008950907716417373`", "0.0021706952926773566`",
"0.001041926949828757`", "0.0034215254670645376`",
"0.0006660521884207378`"},
{"0.0032742540027795373`", "0.00026566671124871304`",
"0.00021110330230565523`", "0.0008029263545535774`",
"0.02042757157940867`", "0.00013118506703611396`",
"0.0004546047383372979`", "0.0007487644180010423`",
"0.03100213757350951`", "0.003756304323777`", "0.002270292504001841`",
"0.002308141492149316`", "0.06972243142402249`", "0.02380707851123793`",
"1.`", "0.00042715674573402904`", "0.00014181937870060175`",
"0.0004829680259581645`", "0.00030629110456457535`",
"0.0012620245859724186`", "0.013751924689266774`"},
{"0.0008360764373328599`", "0.008042718500408656`",
"0.0013846909630126922`", "0.0047180456987853305`",
"0.004072673002305182`", "0.004586755961421123`",
"0.024620380493194916`", "0.004457024967579055`",
"0.006135014981471398`", "0.0006948343074356951`",
"0.002956344197306679`", "0.0008796013010821894`",
"0.01038289331301958`", "0.003336502208237506`",
"0.00042715674573402904`", "1.`", "0.14778811256949287`",
"0.047313354615187174`", "0.0288951560034736`", "0.10297395982293467`",
"0.0008801919693301598`"},
{"0.0016572534297787603`", "0.03537536815871591`",
"0.0015979263268121055`", "0.003982942036457758`",
"0.0004495669337552493`", "0.01155596993693795`",
"0.004712393790901389`", "0.00008667123288843161`",
"0.0006640254604739247`", "0.0005283554818240754`",
"0.01410082931512133`", "0.00031362495844394284`",
"0.004309791223044044`", "0.008950907716417373`",
"0.00014181937870060175`", "0.14778811256949287`", "0.9999999999999999`",
"0.08152613039195566`", "0.09492037256269421`", "0.16524905959527483`",
"0.000045777756766380124`"},
{"0.007215282913847205`", "0.007024420571338821`",
"0.011685005747529559`", "0.006009416971609054`",
"0.0020366622128110707`", "0.005998841426866895`",
"0.00302601741669261`", "0.00006901913841974076`",
"0.004362758567125876`", "0.0002560476630613941`",
"0.0034954922719290155`", "0.0006933045168450182`",
"0.012745555490201014`", "0.0021706952926773566`",
"0.00048296802595816445`", "0.047313354615187174`",
"0.08152613039195566`", "0.9999999999999998`", "0.01885682174534041`",
"0.14245863566247172`", "0.00012151441816422002`"},
{"0.017088494660407988`", "0.06138066235116328`", "0.014950592044538235`",
"0.004984935049615594`", "0.0013506048405328827`",
"0.00571825774080362`", "0.006000408735008422`",
"0.00006669852367295662`", "0.0001960400189516478`",
"0.00016910746667648776`", "0.004487427048679761`",
"0.0008955050470958745`", "0.0006754505611912842`",
"0.001041926949828757`", "0.0003062911045645754`", "0.0288951560034736`",
"0.0949203725626942`", "0.01885682174534041`", "0.9999999999999998`",
"0.11104443864386222`", "8.129683841645738`*^-6"},
{"0.07506108188686872`", "0.07729299416672247`", "0.029936291110371965`",
"0.061407127246065486`", "0.021156760106361243`",
"0.037508373489353014`", "0.022964014167766302`",
"0.002648899198902981`", "0.0016509871228399414`",
"0.0018472795011466444`", "0.025415740292721412`",
"0.015845190923000258`", "0.00855243531489887`",
"0.0034215254670645376`", "0.0012620245859724186`",
"0.10297395982293468`", "0.1652490595952748`", "0.14245863566247172`",
"0.11104443864386222`", "0.9999999999999999`", "0.004061716987663517`"},
{"0.00006549466007819147`", "0.00007403988083202078`",
"0.00008255346644662862`", "0.0029305446835925513`",
"0.07233517453177032`", "0.0011734202397625973`",
"0.0006675736973288402`", "0.0006772203353423711`",
"0.003312784413063916`", "0.0008034737421362003`",
"0.01612199063719281`", "0.005989956668852505`",
"0.0019044160674872334`", "0.0006660521884207377`",
"0.013751924689266776`", "0.0008801919693301598`",
"0.00004577775676638012`", "0.00012151441816422002`",
"8.129683841645738`*^-6", "0.004061716987663516`",
"1.0000000000000002`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.535610463536249*^9, 3.5356104794777393`*^9}, {
3.535610530008778*^9, 3.535610541829995*^9}, 3.537097433865942*^9,
3.5374087882079153`*^9, 3.537436913634591*^9, 3.537520505857482*^9,
3.537524986098257*^9, 3.537528515558909*^9, 3.537848712001107*^9,
3.537939045109322*^9, 3.540983981192494*^9, 3.541051014152145*^9,
3.5466710943232*^9}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Standerdized [cited | citing]", "Section",
CellChangeTimes->{{3.432179079032941*^9, 3.432179109038226*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"N", "[",
RowBox[{"citedciting21Data", "/", "selfCited21"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}], "]"}],
";"}]], "Input",
CellChangeTimes->{{3.4321791395878077`*^9, 3.432179208117066*^9}, {
3.432179449483206*^9, 3.432179458314206*^9}, {3.432180617657241*^9,
3.432180653260957*^9}, {3.432180705814992*^9, 3.432180754867651*^9}, {
3.432180890834896*^9, 3.432180957902364*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{
RowBox[{"N", "[",
RowBox[{"citedciting21Data", "/", "selfCited21"}], "]"}], ",",
"0.001"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.4321791395878077`*^9, 3.432179208117066*^9}, {
3.432179449483206*^9, 3.432179458314206*^9}, {3.432180617657241*^9,
3.432180653260957*^9}, {3.432180705814992*^9, 3.432180754867651*^9}, {
3.432180890834896*^9, 3.432180901164672*^9}, 3.432180940260688*^9, {
3.432256152295154*^9, 3.4322561569916153`*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "1.`", "0.047`", "0.052000000000000005`", "0.005`",
"0.003`", "0.005`", "0.002`", "0.`", "0.`", "0.001`",
"0.043000000000000003`", "0.011`", "0.002`", "0.001`", "0.001`",
"0.001`", "0.002`", "0.009000000000000001`", "0.015`", "0.132`",
"0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.08600000000000001`", "1.`", "0.028`", "0.077`", "0.002`",
"0.075`", "0.028`", "0.001`", "0.`", "0.019`", "0.059000000000000004`",
"0.007`", "0.001`", "0.001`", "0.`", "0.012`", "0.053`", "0.012`",
"0.078`", "0.23600000000000002`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.192`", "0.04`", "1.`", "0.008`", "0.002`",
"0.009000000000000001`", "0.002`", "0.`", "0.005`", "0.`",
"0.14400000000000002`", "0.025`", "0.001`", "0.`", "0.`", "0.003`",
"0.001`", "0.026000000000000002`", "0.025`", "0.096`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.001`", "0.009000000000000001`", "0.`", "1.`", "0.069`",
"0.027`", "0.043000000000000003`", "0.021`", "0.001`",
"0.013000000000000001`", "0.007`", "0.003`", "0.001`", "0.`", "0.`",
"0.002`", "0.001`", "0.002`", "0.002`", "0.057`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "0.001`", "0.`", "0.`", "0.125`", "1.`", "0.012`", "0.017`",
"0.06`", "0.008`", "0.006`", "0.009000000000000001`", "0.011`",
"0.012`", "0.005`", "0.006`", "0.003`", "0.`", "0.002`", "0.001`",
"0.013000000000000001`", "0.063`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.007`", "0.051000000000000004`", "0.003`", "0.166`",
"0.042`", "1.`", "0.027`", "0.011`", "0.002`", "0.015`", "0.035`",
"0.007`", "0.003`", "0.001`", "0.`", "0.005`", "0.016`", "0.01`",
"0.005`", "0.097`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.004`", "0.026000000000000002`", "0.001`", "0.259`",
"0.057`", "0.035`", "1.`", "0.05`", "0.013000000000000001`",
"0.036000000000000004`", "0.008`", "0.002`", "0.001`", "0.`", "0.`",
"0.027`", "0.005`", "0.005`", "0.006`", "0.062`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.`", "0.001`", "0.`", "0.176`", "0.27`", "0.015`",
"0.045`", "1.`", "0.037`", "0.023`", "0.005`", "0.006`", "0.006`",
"0.004`", "0.`", "0.004`", "0.`", "0.`", "0.`", "0.003`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "0.003`", "0.001`", "0.008`", "0.009000000000000001`",
"0.096`", "0.006`", "0.031`", "0.092`", "1.`", "0.056`",
"0.051000000000000004`", "0.009000000000000001`", "0.058`", "0.006`",
"0.029`", "0.014`", "0.002`", "0.013000000000000001`", "0.`", "0.006`",
"0.009000000000000001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.007`", "0.039`", "0.002`", "0.199`", "0.06`", "0.039`",
"0.084`", "0.049`", "0.052000000000000005`", "1.`", "0.081`",
"0.009000000000000001`", "0.018000000000000002`", "0.005`", "0.004`",
"0.002`", "0.001`", "0.001`", "0.`", "0.003`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.059000000000000004`", "0.035`", "0.046`", "0.034`",
"0.022`", "0.045`", "0.006`", "0.003`", "0.011`", "0.025`", "1.`",
"0.077`", "0.004`", "0.002`", "0.002`", "0.003`", "0.016`", "0.003`",
"0.004`", "0.055`", "0.018000000000000002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.025`", "0.004`", "0.013000000000000001`", "0.021`",
"0.021`", "0.014`", "0.003`", "0.005`", "0.001`", "0.003`", "0.153`",
"1.`", "0.`", "0.`", "0.001`", "0.002`", "0.`", "0.`", "0.001`",
"0.026000000000000002`", "0.01`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.004`", "0.001`", "0.001`", "0.006`", "0.044`", "0.003`",
"0.001`", "0.006`", "0.02`", "0.011`", "0.008`", "0.001`", "1.`",
"0.037`", "0.037`", "0.014`", "0.007`", "0.018000000000000002`",
"0.001`", "0.017`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "0.018000000000000002`", "0.003`", "0.004`", "0.005`",
"0.091`", "0.004`", "0.003`", "0.022`", "0.019`", "0.016`", "0.027`",
"0.002`", "0.177`", "1.`", "0.031`", "0.013000000000000001`", "0.042`",
"0.009000000000000001`", "0.003`", "0.026000000000000002`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "0.009000000000000001`", "0.`", "0.`", "0.004`", "0.07`",
"0.`", "0.001`", "0.002`", "0.033`", "0.004`", "0.003`", "0.004`",
"0.131`", "0.018000000000000002`", "1.`", "0.001`", "0.001`", "0.001`",
"0.001`", "0.005`", "0.045`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.001`", "0.005`", "0.001`", "0.011`", "0.006`", "0.004`",
"0.019`", "0.004`", "0.003`", "0.`", "0.003`", "0.`", "0.008`",
"0.001`", "0.`", "1.`", "0.158`", "0.055`", "0.023`", "0.221`",
"0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "0.002`", "0.021`", "0.001`", "0.008`", "0.001`", "0.007`",
"0.003`", "0.`", "0.`", "0.`", "0.011`", "0.`", "0.003`", "0.002`",
"0.`", "0.133`", "1.`", "0.079`", "0.068`", "0.343`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.006`", "0.004`", "0.005`", "0.012`", "0.002`", "0.003`",
"0.002`", "0.`", "0.001`", "0.`", "0.003`", "0.001`", "0.008`",
"0.001`", "0.`", "0.04`", "0.083`", "1.`", "0.014`", "0.274`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.019`", "0.049`", "0.009000000000000001`", "0.014`",
"0.003`", "0.006`", "0.006`", "0.`", "0.`", "0.`", "0.005`", "0.001`",
"0.001`", "0.`", "0.`", "0.037`", "0.126`", "0.025`", "1.`", "0.294`",
"0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "0.035`", "0.023`", "0.007`", "0.052000000000000005`",
"0.018000000000000002`", "0.012`", "0.007`", "0.001`", "0.`", "0.`",
"0.01`", "0.005`", "0.003`", "0.`", "0.`", "0.046`", "0.08`", "0.073`",
"0.04`", "1.`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.`", "0.`", "0.`", "0.006`", "0.082`", "0.001`", "0.001`",
"0.001`", "0.001`", "0.`", "0.014`", "0.003`", "0.002`", "0.`",
"0.004`", "0.001`", "0.`", "0.`", "0.`", "0.005`", "1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->{
3.4321791623627253`*^9, {3.43217919976202*^9, 3.4321792097803802`*^9},
3.432179459742648*^9, {3.432180630691087*^9, 3.4321806540289183`*^9}, {
3.4321807200504007`*^9, 3.432180743263298*^9}, 3.432180901886559*^9,
3.43218094076569*^9, 3.432249619051506*^9, 3.4322546750669413`*^9,
3.432255597586302*^9, 3.432333027973783*^9, 3.432335479743074*^9,
3.432339282102734*^9, 3.432357776821718*^9, 3.432361153094985*^9,
3.43236200643545*^9, 3.432444064775218*^9, 3.43380729897751*^9,
3.434234727289185*^9, 3.4352147559369583`*^9, 3.435266381148508*^9,
3.435266736498351*^9, 3.43527772620485*^9, 3.435365129252277*^9,
3.435376697140058*^9, 3.479011977581662*^9, 3.47901821193832*^9,
3.4898118969298983`*^9, 3.5189074998160973`*^9, 3.5217612627297*^9,
3.522544596874007*^9, 3.5225482085856524`*^9, 3.5225579196035023`*^9,
3.522558328690886*^9, 3.5225589727908487`*^9, 3.5315311834505053`*^9,
3.531534142363379*^9, 3.531614505397624*^9, 3.531622862273712*^9,
3.531627032873704*^9, 3.531629520066163*^9, 3.5316301095176353`*^9,
3.5317132453416643`*^9, 3.531776061767741*^9, 3.531790194310677*^9,
3.531790874123362*^9, 3.532036621752008*^9, 3.5320398379957113`*^9,
3.532054637972418*^9, 3.532124846615076*^9, 3.5356086637977867`*^9,
3.5370974339639797`*^9, 3.537408788439767*^9, 3.537436913719392*^9,
3.53752050594521*^9, 3.5375249861662283`*^9, 3.5375285157267323`*^9,
3.537848712086545*^9, 3.537939045193609*^9, 3.540983981277244*^9,
3.5410510143642406`*^9, 3.546671094433276*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{
RowBox[{"citingcited21Data", "/", "selfCiting21"}], "//", "N"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}], "]"}],
";"}]], "Input",
CellChangeTimes->{{3.4321791395878077`*^9, 3.432179208117066*^9}, {
3.432179449483206*^9, 3.432179458314206*^9}, {3.4321795115935583`*^9,
3.4321795221109*^9}, 3.432181073825671*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{
RowBox[{
RowBox[{"citingcited21Data", "/", "selfCiting21"}], "//", "N"}], ",",
"0.001"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.4321791395878077`*^9, 3.432179208117066*^9}, {
3.432179449483206*^9, 3.432179458314206*^9}, {3.4321795115935583`*^9,
3.4321795221109*^9}, {3.4321809827536287`*^9, 3.432180995152041*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "1.`", "0.038`", "0.045`", "0.004`", "0.002`", "0.003`",
"0.002`", "0.`", "0.`", "0.001`", "0.043000000000000003`", "0.008`",
"0.002`", "0.002`", "0.001`", "0.001`", "0.003`", "0.01`", "0.014`",
"0.319`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.107`", "1.`", "0.021`", "0.059000000000000004`",
"0.002`", "0.052000000000000005`", "0.024`", "0.001`", "0.001`",
"0.014`", "0.058`", "0.003`", "0.001`", "0.001`", "0.`", "0.016`",
"0.105`", "0.016`", "0.082`", "0.464`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.224`", "0.053`", "1.`", "0.006`", "0.003`", "0.005`",
"0.002`", "0.`", "0.006`", "0.001`", "0.145`", "0.018000000000000002`",
"0.001`", "0.002`", "0.`", "0.004`", "0.008`", "0.039`", "0.028`",
"0.278`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.002`", "0.011`", "0.001`", "1.`", "0.089`", "0.025`",
"0.035`", "0.021`", "0.001`", "0.01`", "0.008`", "0.002`", "0.001`",
"0.`", "0.`", "0.004`", "0.006`", "0.007`", "0.003`", "0.155`",
"0.003`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "0.001`", "0.`", "0.`", "0.098`", "1.`",
"0.009000000000000001`", "0.011`", "0.045`", "0.008`", "0.005`",
"0.008`", "0.003`", "0.01`", "0.005`", "0.005`", "0.003`", "0.001`",
"0.002`", "0.001`", "0.074`", "0.049`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.012`", "0.073`", "0.005`", "0.182`", "0.057`", "1.`",
"0.032`", "0.012`", "0.002`", "0.014`", "0.073`", "0.01`", "0.003`",
"0.001`", "0.`", "0.01`", "0.035`", "0.014`", "0.009000000000000001`",
"0.23800000000000002`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.005`", "0.03`", "0.001`", "0.314`", "0.091`", "0.029`",
"1.`", "0.039`", "0.013000000000000001`", "0.032`", "0.011`", "0.002`",
"0.001`", "0.001`", "0.`", "0.06`", "0.016`", "0.008`", "0.01`",
"0.153`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.`", "0.001`", "0.`", "0.176`", "0.356`", "0.014`",
"0.058`", "1.`", "0.046`", "0.022`", "0.006`", "0.004`", "0.008`",
"0.007`", "0.001`", "0.013000000000000001`", "0.`", "0.`", "0.`",
"0.024`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "0.002`", "0.001`", "0.007`", "0.015`", "0.099`", "0.006`",
"0.031`", "0.074`", "1.`", "0.046`", "0.045`", "0.002`",
"0.052000000000000005`", "0.012`", "0.028`", "0.018000000000000002`",
"0.003`", "0.015`", "0.`", "0.017`", "0.009000000000000001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.005`", "0.054`", "0.001`", "0.252`", "0.079`", "0.042`",
"0.093`", "0.052000000000000005`", "0.062`", "1.`", "0.115`", "0.006`",
"0.031`", "0.011`", "0.004`", "0.002`", "0.003`", "0.001`", "0.`",
"0.024`", "0.002`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.058`", "0.035`", "0.046`", "0.027`",
"0.026000000000000002`", "0.021`", "0.004`", "0.002`", "0.012`",
"0.018000000000000002`", "1.`", "0.065`", "0.005`", "0.004`", "0.001`",
"0.005`", "0.033`", "0.008`", "0.005`", "0.124`", "0.025`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.036000000000000004`", "0.011`", "0.019`", "0.027`",
"0.077`", "0.011`", "0.003`", "0.006`", "0.005`", "0.005`", "0.179`",
"1.`", "0.002`", "0.001`", "0.002`", "0.002`", "0.001`", "0.003`",
"0.002`", "0.145`", "0.014`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.004`", "0.001`", "0.`", "0.005`", "0.053`", "0.003`",
"0.001`", "0.004`", "0.022`", "0.006`", "0.006`", "0.`", "1.`", "0.04`",
"0.042`", "0.02`", "0.012`", "0.032`", "0.001`", "0.058`", "0.004`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "0.006`", "0.002`", "0.`", "0.003`", "0.09`", "0.003`",
"0.001`", "0.014`", "0.01`", "0.007`", "0.013000000000000001`", "0.`",
"0.165`", "1.`", "0.026000000000000002`", "0.01`", "0.039`",
"0.009000000000000001`", "0.002`", "0.037`", "0.003`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "0.008`", "0.`", "0.`", "0.003`", "0.083`", "0.`", "0.001`",
"0.001`", "0.034`", "0.004`", "0.007`", "0.003`", "0.114`", "0.021`",
"1.`", "0.001`", "0.`", "0.002`", "0.001`", "0.014`", "0.035`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.001`", "0.004`", "0.`", "0.004`", "0.005`", "0.002`",
"0.009000000000000001`", "0.001`", "0.002`", "0.`", "0.002`", "0.`",
"0.005`", "0.001`", "0.`", "1.`", "0.231`", "0.058`", "0.022`",
"0.328`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "0.001`", "0.011`", "0.`", "0.001`", "0.`", "0.003`",
"0.001`", "0.`", "0.`", "0.`", "0.005`", "0.`", "0.001`", "0.002`",
"0.`", "0.091`", "1.`", "0.069`", "0.043000000000000003`", "0.326`",
"0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.005`", "0.003`", "0.003`", "0.003`", "0.002`", "0.003`",
"0.001`", "0.`", "0.001`", "0.`", "0.001`", "0.`", "0.005`", "0.001`",
"0.`", "0.039`", "0.096`", "1.`", "0.01`", "0.361`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.02`", "0.046`", "0.008`", "0.006`", "0.002`", "0.003`",
"0.003`", "0.`", "0.`", "0.`", "0.004`", "0.`", "0.`", "0.`", "0.`",
"0.039`", "0.199`", "0.034`", "1.`", "0.47800000000000004`", "0.`"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "0.015`", "0.012`", "0.002`", "0.019`", "0.003`", "0.005`",
"0.003`", "0.`", "0.`", "0.`", "0.004`", "0.001`", "0.001`", "0.`",
"0.`", "0.031`", "0.084`", "0.055`", "0.024`", "1.`", "0.001`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.`", "0.`", "0.`", "0.003`", "0.105`", "0.001`", "0.`",
"0.`", "0.001`", "0.`", "0.01`", "0.003`", "0.001`", "0.`", "0.005`",
"0.001`", "0.`", "0.`", "0.`", "0.017`", "1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBGKRtrYFsZNeOhrxpSjVA+kND2fOagTSbSuPvAPR30S2
8jaB+IJtd5YDaZZP//hWAumMKtdXq4C0hLTip81A+vAq/RlbgfSWOVeZtgHp
HAMTkXtAOiIyY0f51JeOtW2fczymvXS8sX3FF7UZLx0/qC7XdADSR62lw0C0
73rFLa5A+sQ+g8QCIN13Vpu9DEirbTcP3PD6pWO9SGPMZiD9Qlt9uyfDK0eN
KzW9J8xfOa75euOvpe0rx6KLc6t22L1yNEkWt9sFpA8s+PJ7H5DOdBXX3w+k
bRbMqgfRt7Z/KL3j/8pxhdTZ53eBdL6nniprwCvHTemnLDmBtHi9ojM3kN4R
xVLFA6S3vN50GESrRq+NNgXSMUy72EOA9DPZwHdRQFr7jatzNJBme7TT8TKQ
1uc6ePkKkPa4c4D3DpCe63U19B+Q9jL9k7U4/JXjpW7H6KqoV45MnhOThKJf
OVZssZRTANJ9zxzeewBpDSt3eW8gbfSp8oYPkK7JYTV8CaQ9dq7wEY155RjQ
uFr0SeIrR+N75y6wJL1yfN57/t+enFeOAP2c5ic=
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Standerdized [citedciting21Data / fieldPower]", "Section",
CellChangeTimes->{{3.522558690665537*^9, 3.5225587379485607`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"citedciting21DataReducedFieldPower", "=",
RowBox[{"(",
RowBox[{"citedciting21Data", "/", "fieldPower21"}], ")"}]}], ")"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5225587427791758`*^9, 3.522558787485379*^9}, {
3.522558818652904*^9, 3.5225588257447557`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"8.119945902529787`*^-6", "0.06524960502692098`", "0.10492223372572157`",
"0.004068416919495305`", "0.0023195967142744228`",
"0.009081537178745783`", "0.0033011922738658485`",
"0.00016236023287736744`", "0.0007210306671009588`",
"0.0015194848692815835`", "0.05419938361327713`", "0.02278076309247229`",
"0.002231469729487357`", "0.0012245956199205014`",
"0.002006985478148998`", "0.0007464516762599296`",
"0.0013775864213602066`", "0.010022188883601077`",
"0.019109991693279135`", "0.08275715432494311`",
"0.00013097061044720098`"},
{"0.052376785910461354`", "5.550811348879443`*^-6",
"0.027728751053377874`", "0.031257522621936186`",
"0.0006727119393509498`", "0.06231313037360078`",
"0.021859157592848233`", "0.0006383178054640213`",
"0.0002501784880182589`", "0.016837879734888577`",
"0.03679436050196063`", "0.00752039554764482`", "0.0005835008319725139`",
"0.0004992801066240148`", "0.0001336076112359101`",
"0.005607420088237472`", "0.02321497834628102`", "0.006486134652404512`",
"0.048460466802337746`", "0.07300020758180514`",
"0.00012040737170979108`"},
{"0.08988458892461694`", "0.021109092150124076`",
"0.000013197389792376376`", "0.0023739762806764112`",
"0.0006110412852464789`", "0.006079313406690066`",
"0.0009269077294899049`", "0.00013781169314403978`",
"0.0035190706361133417`", "0.0003184791921979894`",
"0.06911992635146709`", "0.019236606609861148`",
"0.00028344781089088085`", "0.00017323987202938666`",
"0.000044932644958562336`", "0.0009866839418146073`",
"0.0004971845019516638`", "0.01061297876137152`",
"0.012188303582278674`", "0.02268748706203138`",
"0.00018800490597051283`"},
{"0.0030142874821100117`", "0.023953726887936785`",
"0.0018991810245411291`", "4.787954980634329`*^-6",
"0.10836998527582699`", "0.0928489512986738`", "0.13596486125583768`",
"0.05557818854916024`", "0.0032824705249801345`", "0.04695143169687008`",
"0.01668644449237429`", "0.011626639293546502`",
"0.0021328147647709304`", "0.00037500891285056415`",
"0.0005872591988236651`", "0.0033031528560136534`",
"0.001318361593667051`", "0.004050234636538669`",
"0.0038375429782476606`", "0.07205243629492002`",
"0.003808629480043331`"},
{"0.0013909325493069048`", "0.000875447044360825`",
"0.0008662013823823712`", "0.1389488878653619`",
"2.726564415060934`*^-6", "0.02731076514409605`",
"0.037132485141659025`", "0.10687180018892345`", "0.020551109654479673`",
"0.013933426871810711`", "0.01532255452398211`", "0.03100796593964102`",
"0.019943474455117533`", "0.012228921239520976`",
"0.013876512624208671`", "0.0037401780378317206`",
"0.0002930588763901363`", "0.002698649371195302`",
"0.0011400288405759005`", "0.010602008181403284`", "0.1233647190964147`"},
{"0.0053716708535014625`", "0.04335044457757904`",
"0.0032004077790027032`", "0.08424806811396122`", "0.02031482054205695`",
"0.000012918243949488317`", "0.025958264504008007`",
"0.009082761589518653`", "0.002523389629997646`", "0.01629896182914066`",
"0.02731961398448654`", "0.00933488795422273`",
"0.0025893834481084976`", "0.0008754807567393563`",
"0.0001135352547592223`", "0.002969039532253887`",
"0.008819727640420211`", "0.0067256926327533715`",
"0.0042797024875336764`", "0.03781611971188377`",
"0.0013090224908187244`"},
{"0.0025806274628189883`", "0.018538660825427985`",
"0.0009541697215337257`", "0.11197531956591038`", "0.02330605474582321`",
"0.031227987373242717`", "8.908818872554193`*^-6",
"0.035069796967558464`", "0.012876844081601606`", "0.0331580409196737`",
"0.005156851744515184`", "0.0021767848528111786`",
"0.0005824016014527531`", "0.0003130326074935114`",
"0.0002824007589957329`", "0.013860144789993471`",
"0.002553918561269212`", "0.0026333716463450554`",
"0.003983299650512518`", "0.020488006167499913`",
"0.0005415698783604601`"},
{"0.00009176882727851203`", "0.0004649475373132995`",
"0.00011484307762003315`", "0.055714214160429175`",
"0.08086274360131719`", "0.009518037704032326`", "0.02729254845044105`",
"3.898140914903938`*^-6", "0.02613604427910014`",
"0.015549065963116693`", "0.0022450146158120333`",
"0.004357144042659409`", "0.0027348284498461576`",
"0.0032909468693676693`", "0.00021809942976342228`",
"0.0015126993113830209`", "0.0000556913865851724`",
"0.00006145853230580313`", "0.00002899340418156951`",
"0.0007171348652293043`", "0.00036502425194607667`"},
{"0.0008769291897173822`", "0.00045684767377247274`",
"0.004073879069734814`", "0.0020005589590115615`",
"0.019894701077455994`", "0.0026969561124842566`",
"0.012864390654056536`", "0.03247332679398431`",
"7.065161252773101`*^-6", "0.026020681299338908`",
"0.017088363400686837`", "0.004998330473664665`",
"0.019432037322525658`", "0.0030388578840996067`",
"0.013437346755520276`", "0.0037521696555813913`",
"0.00041230399681206685`", "0.0037495110805769957`",
"0.00016007716658927144`", "0.0010393464182219335`",
"0.0035154231309944277`"},
{"0.002004228508561598`", "0.012154909474876303`",
"0.0006976210876717863`", "0.03710897457730193`",
"0.010670164302001631`", "0.014817238026491507`",
"0.030024528608543915`", "0.014766091692540126`",
"0.021476068165056074`", "5.2814217567126195`*^-6",
"0.02349667578175271`", "0.004380950756814275`", "0.005279072054419146`",
"0.0021805116538496064`", "0.0013876970351174166`",
"0.00039067546144782553`", "0.00016714458078595488`",
"0.00013797107620031822`", "0.00011486227410945623`",
"0.0004924488490869095`", "0.0007559186837213666`"},
{"0.05526542402294945`", "0.03611647054388971`", "0.06977852498273404`",
"0.020815465281594257`", "0.013168815920250774`",
"0.057690149327646705`", "0.007519690169259599`",
"0.0027826556564919374`", "0.015182970767981144`",
"0.03324458210852312`", "6.644885464198836`*^-6", "0.11777934344170839`",
"0.0038277944930115706`", "0.0029591534689728228`",
"0.001989829636731785`", "0.0020487043694513737`",
"0.010776564033967612`", "0.002496524691259427`",
"0.0039489244519992275`", "0.026012217010987593`",
"0.01950603060322214`"},
{"0.016163493813230338`", "0.003075974990502068`",
"0.013906831200523473`", "0.008786654246021814`",
"0.008346196999612627`", "0.012382104563483334`",
"0.002357028184572614`", "0.0034343172883159957`",
"0.0012576444417607866`", "0.003008047174573182`",
"0.10046246395757816`", "0.00001895967893960613`",
"0.00028831110492211757`", "0.`", "0.0010968859889396816`",
"0.0008492110884874204`", "0.00010892323337039725`",
"0.00022666818635938183`", "0.0004232724076214449`",
"0.008298373095580664`", "0.007712968561530032`"},
{"0.0021376541853047053`", "0.0006059431716637644`",
"0.0005777974606621802`", "0.0022619413371683357`",
"0.01652182059789301`", "0.00204763301038367`", "0.0009335555082110307`",
"0.0037522712240633297`", "0.017539629792397583`",
"0.009014444338412477`", "0.004641631880714932`",
"0.0014637333019122893`", "4.1643745196987`*^-6", "0.03619308148881481`",
"0.03089567363637236`", "0.006517534917965555`",
"0.0028500007610648705`", "0.009468815214350012`",
"0.0004128434567402941`", "0.00514997008672935`",
"0.0015120467139099801`"},
{"0.003950651956439183`", "0.0006300439440731615`",
"0.0014378909378439091`", "0.0006721857871849735`",
"0.012262443501690716`", "0.0012402644053807546`",
"0.0006941157818334384`", "0.005160021223747216`",
"0.006188507461890345`", "0.004785011684836636`",
"0.005962146248597094`", "0.0008458188407558981`",
"0.03875108875193405`", "6.030409641696715`*^-6",
"0.009241944500773702`", "0.0021892718764991294`", "0.0064764084369107`",
"0.001696587669115427`", "0.000677912965066218`",
"0.0028559315617151847`", "0.0002878325538007851`"},
{"0.0024396841821535988`", "0.0001336076112359101`",
"0.00017973057983424934`", "0.0006729011653187829`",
"0.011656502459182807`", "0.00005046011322632103`",
"0.00022356726753828854`", "0.00043619885952684456`",
"0.012985786223002792`", "0.0015055203682877633`",
"0.0007201288209124556`", "0.001797674259651145`",
"0.03544109257221392`", "0.007910984855840273`",
"4.812905627913074`*^-6", "0.0003057514432024504`",
"0.00014526264026470628`", "0.0002564886016872607`",
"0.0001607030231663425`", "0.0007341865108257393`",
"0.013989541307171404`"},
{"0.0010989427456048965`", "0.007540215041252246`",
"0.001408343746008884`", "0.008731483305520971`",
"0.0045332524385237865`", "0.0063500510570214715`",
"0.030675177044775223`", "0.004817193748057369`",
"0.004746070857983854`", "0.0004791302829077106`",
"0.003686600831486717`", "0.0009435678760971338`",
"0.009537855977510569`", "0.001717736395407009`",
"0.00021111409173502524`", "4.030433154523635`*^-6",
"0.14081060462096143`", "0.05990163203747387`", "0.02898174150895658`",
"0.13971461324840273`", "0.0012122982983111233`"},
{"0.0029855541896373077`", "0.04576337241718838`",
"0.0027995311956047534`", "0.01079994319740994`",
"0.0007962912903934007`", "0.019185645663383048`",
"0.007613681922654334`", "0.00009113135986664575`",
"0.0006848439269081789`", "0.0006217778405237522`",
"0.021853149159136838`", "0.0006535394002223835`",
"0.0050992425084145495`", "0.006025809265002998`",
"0.00005942562556283439`", "0.20586045674117165`",
"4.7174782260411494`*^-6", "0.134766202280271`", "0.13557578319427488`",
"0.34007455206628334`", "0.00008840736148454404`"},
{"0.010946787174685004`", "0.008633312823190681`", "0.01599839230607448`",
"0.016132676164639977`", "0.0027489570825091954`",
"0.009322122811909323`", "0.004573750754178254`",
"0.00006760438553638346`", "0.004207596144719886`",
"0.0002840580980594787`", "0.006432222439833111`",
"0.0016338998433405442`", "0.016481455933788528`",
"0.001650232814768011`", "0.0005129772033745214`",
"0.06260945839342084`", "0.1170336995229848`", "8.47053292685002`*^-6",
"0.02777232056720056`", "0.2728246632012888`", "0.000389030166465988`"},
{"0.01840994268443763`", "0.051353516844034136`", "0.013535258964686828`",
"0.00881114180320267`", "0.0015892595361188205`",
"0.007277338928155325`", "0.006813765276902623`",
"0.0000652351594085314`", "0.00011005305203012412`",
"0.00009571856175788018`", "0.004710997591858728`",
"0.0013923434461231739`", "0.0006261459093894461`",
"0.0005357699240039464`", "0.00020796861821526676`",
"0.02754463035975212`", "0.08591342227416288`", "0.02079847345283705`",
"6.725020468064082`*^-6", "0.1417429650999461`", "0.`"},
{"0.2008508443476409`", "0.1432942255760986`", "0.06594972958289637`",
"0.1960804224440997`", "0.06297051962361659`", "0.09263763012914769`",
"0.05061993048530203`", "0.005722736224529849`",
"0.0028755250904140156`", "0.003466082283957864`",
"0.058392115076838814`", "0.04698554275299889`", "0.017488794650109316`",
"0.00400263135543416`", "0.0018798915754901096`", "0.2069415083043414`",
"0.32348135561860475`", "0.3586281183461069`", "0.23012033295751574`",
"4.873574859510555`*^-6", "0.016103259145846642`"},
{"0.00008474568911289475`", "0.00006020368585489554`",
"0.000025067320796068375`", "0.007345945300890027`",
"0.09591045455484637`", "0.0022485628269708732`",
"0.0012603808078207072`", "0.0010701847386600882`",
"0.0033322088961543275`", "0.000744963340479028`",
"0.027165715791316686`", "0.010504935693720243`",
"0.0028823390483908996`", "0.000876012120263259`",
"0.010841083054745357`", "0.0013706890307537828`",
"0.00007183098120619203`", "0.00008048899995848027`",
"0.000023731958163624642`", "0.004300724617566333`",
"0.00001982398096559957`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{
3.522558757223702*^9, {3.522558812427552*^9, 3.522558826313696*^9},
3.522558972859651*^9, 3.531531183579751*^9, 3.531534142449366*^9,
3.531614505485354*^9, 3.531622862364807*^9, 3.531627033121894*^9,
3.531629520199204*^9, 3.531630109653696*^9, 3.531713245487423*^9,
3.5317760618514233`*^9, 3.5317901945974617`*^9, 3.531790874230117*^9,
3.5320366218513536`*^9, 3.53203983805999*^9, 3.532054638074041*^9,
3.532124846704536*^9, 3.5356086639313726`*^9, 3.537097434101907*^9,
3.537408788613875*^9, 3.537436913852352*^9, 3.537520506080235*^9,
3.537524986267029*^9, 3.5375285158626223`*^9, 3.537848712220421*^9,
3.537939045324535*^9, 3.540983981411722*^9, 3.541051014534634*^9,
3.546671094522833*^9}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Raw Symmetric linkage", "Section",
CellChangeTimes->{{3.4302871361486883`*^9, 3.430287150970443*^9}, {
3.4302873773344307`*^9, 3.430287377863262*^9}, {3.43526640786073*^9,
3.435266409036005*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"(",
RowBox[{"symmetricData21", "=",
RowBox[{"citedciting21Data", "+", "citingcited21Data"}]}], ")"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.4302874631120787`*^9, 3.430287517578121*^9}, {
3.4302875505097647`*^9, 3.4302875909540462`*^9}, {3.431735391515483*^9,
3.431735409705666*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "377892", "16073", "18266", "1626", "899", "1609", "702",
"36", "164", "378", "16224", "3590", "652", "486", "483", "356", "928",
"3674", "5574", "85171", "28"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "16073", "166330", "4102", "11354", "336", "10537", "4319",
"140", "65", "2786", "9680", "875", "159", "95", "26", "2272", "13142",
"2373", "13283", "58186", "21"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "18266", "4102", "87678", "603", "220", "635", "138", "22",
"479", "67", "12654", "1878", "79", "93", "15", "284", "431", "2866",
"2349", "16362", "17"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "1626", "11354", "603", "1143092", "90180", "29671",
"44535", "23727", "816", "13571", "8365", "2832", "987", "148", "206",
"3494", "3879", "5322", "2828", "121186", "2179"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "899", "336", "220", "90180", "807526", "8421", "11457",
"42240", "6593", "4192", "6707", "5762", "8643", "3653", "4405", "2535",
"368", "1516", "644", "35093", "45206"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "1609", "10537", "635", "29671", "8421", "170536", "4981",
"1923", "391", "2436", "9195", "1461", "505", "145", "13", "1312",
"4347", "2052", "1253", "28591", "337"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "702", "4319", "138", "44535", "11457", "4981", "155370",
"6912", "2067", "5303", "1470", "327", "177", "74", "43", "6722",
"1692", "988", "1255", "16708", "183"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "36", "140", "22", "23727", "42240", "1923", "6912",
"134926", "5586", "3020", "692", "667", "899", "737", "66", "1134",
"29", "21", "13", "1796", "173"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "164", "65", "479", "816", "6593", "391", "2067", "5586",
"67372", "3428", "3218", "388", "3712", "583", "1931", "1103", "157",
"938", "27", "791", "598"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "378", "2786", "67", "13571", "4192", "2436", "5303",
"3020", "3428", "60112", "5914", "479", "1500", "460", "221", "118",
"118", "52", "22", "836", "137"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "16224", "9680", "12654", "8365", "6707", "9195", "1470",
"692", "3218", "5914", "275592", "19547", "1228", "814", "286", "1075",
"6743", "1520", "1250", "24628", "5886"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "3590", "875", "1878", "2832", "5762", "1461", "327", "667",
"388", "479", "19547", "117674", "158", "48", "190", "209", "98",
"197", "163", "10033", "1429"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "652", "159", "79", "987", "8643", "505", "177", "899",
"3712", "1500", "1228", "158", "177504", "6885", "7049", "3030", "1654",
"4448", "151", "6651", "558"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "486", "95", "93", "148", "3653", "145", "74", "737", "583",
"460", "814", "48", "6885", "40310", "1147", "464", "1637", "361",
"111", "1268", "93"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "483", "26", "15", "206", "4405", "13", "43", "66", "1931",
"221", "286", "190", "7049", "1147", "57584", "71", "31", "96", "39",
"559", "2295"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "356", "2272", "284", "3494", "2535", "1312", "6722",
"1134", "1103", "118", "1075", "209", "3030", "464", "71", "479778",
"93247", "27146", "10620", "131656", "424"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "928", "13142", "431", "3879", "368", "4347", "1692", "29",
"157", "118", "6743", "98", "1654", "1637", "31", "93247", "829756",
"61514", "45879", "277848", "29"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "3674", "2373", "2866", "5322", "1516", "2052", "988", "21",
"938", "52", "1520", "197", "4448", "361", "96", "27146", "61514",
"686126", "8288", "217813", "70"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "5574", "13283", "2349", "2828", "644", "1253", "1255",
"13", "27", "22", "1250", "163", "151", "111", "39", "10620", "45879",
"8288", "281552", "108760", "3"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "85171", "58186", "16362", "121186", "35093", "28591",
"16708", "1796", "791", "836", "24628", "10033", "6651", "1268", "559",
"131656", "277848", "217813", "108760", "3407110", "5214"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "28", "21", "17", "2179", "45206", "337", "183", "173",
"598", "137", "5886", "1429", "558", "93", "2295", "424", "29", "70",
"3", "5214", "483656"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzk9MknEAxvG3Jmkzw5GWa1NLF8Uly03MlqxfSJG6cix1AWHS2sjKqCY1
l0FGwQFzsnLMuNlqaDnK/FOQLanmISPCrNhb00az99dG1OhQBPZwePY5PJfv
eu0pxdElDMNUY8o93uxn1ziysI2Xn/J42DI7D2MBZ5O4myPO/u35TfAW45w7
At0uvswMJ4mjxAKr2I59nT0cmfHrVprhom7NFRvkjzYahuCTLwrFGMwT+VxB
WPeO2tPsHOmTVLLL4J8ei7IMys4kdomhcN6Rr4b6gy1FRmi4Gui7BAt1nqxO
qOmysXegdRWP74LX/zXQAZgMC38Nw5C83DECL5xll45CcfHunM9w82n9+Lkb
HImK507KezkydexlTOjAz7hFO6G1b2NDyi6p9qEMtn0tb9bD4lel6QaoOyxU
uL9z5G6mWT0MIwHR2F6GkkfRnO6pckpet4YSFZWUiC/bTeMSSgQS2SEP1Az+
jk/AgZq8kqfwtsZpTDmViLWx+ykJ3/MvfILsiy0beHWUPC+arlgOoxKhNBNq
Lma0r4AT8VFfyvOR+6oy6Gn1ph+A1uz6iBL2huRSFTSNeEkQfpueDM7Av1Ff
Fgt/zr6vT8IHpsWW/kZKCm7KVO1KSj6qe7UCFXqiOwrWwdpNVT/kcK2gurAG
Gks7PtRC2+OMrRzUxwdrc9WUyP1DueFmSlbHgm/StJS4094mvSco+Q95bDOV
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalLinkage21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "symmetricData21"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.430616559182824*^9, 3.430616585589374*^9}, {
3.431735425409197*^9, 3.4317354310506763`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"534811", ",", "316154", ",", "149238", ",", "1510601", ",", "1086596", ",",
"280351", ",", "265423", ",", "224759", ",", "100407", ",", "105150", ",",
"412688", ",", "168005", ",", "226629", ",", "59612", ",", "76756", ",",
"767050", ",", "1343527", ",", "1027381", ",", "484064", ",", "4556260",
",", "548536"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzm1IU2EAhuEllrkUUyaKkH1ZrFGtQeYWNPYy5pyZjWGLdqZsq0WpfUFa
Lpq1dEWMZotsZVCZGFskqzU3KFcpWEFBeMImbWJY5HkFo6iGVKNnP26uv/dK
yxGddQGPx6tEfd9fvzC7OVIciE7thdX2TaoO6Cvzi8+nnb9d67jMkeMiWX4H
TMaknS5YsbmxdQBqg3W6MByTjvtYWHI65cn0cMSk0MQXwa4Zl6EcZowWKLfA
skTfMiN8frhpVTs8tm9xz1lI24ZzHVCjuRK/B1sm+Hk+6DxppX7YOLDhRxCK
PFJvCO7XT2cMwk9/9wgm4YWDbZETVzkSyJs9VNXNkXrTh59rvRyJfQmvU8DK
fqE+rTgRfayCVlZuPgq75VuzWmFJcqMuMMuRkM1pDEJ9/vqwhkdJl6PI/aqC
ktWdH//JtlEi8F47E5FTMphQ1z+BU6lff6JwJlksfgZtS2+1p53r/d0S30nJ
o+mxrwno75esWail5MDkW1k2zKkWKpdAn4Rvy4Gl/shIWlFRiCmHLDOUVQcb
7uvnDPDcvEbJwOsvhwgLFQ0j7Htod43mxuHD4diuFLwzwWu6u5uSWpOasRko
uSH2WgoY/GjlpSvgm4uqb1XQ6dyxfDu85LbHauApAV/CwZvND2oKjZRkCwOF
n82USNXj7zItlPQSNvW0mZL/phQeCA==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{
RowBox[{"linkageIndex21", "[", "1", "]"}], "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{
RowBox[{"symmetricData21", "[",
RowBox[{"[", "i", "]"}], "]"}], "[",
RowBox[{"[", "j", "]"}], "]"}], "/",
RowBox[{"Sqrt", "[",
RowBox[{
RowBox[{"totalLinkage21", "[",
RowBox[{"[", "i", "]"}], "]"}], "*",
RowBox[{"totalLinkage21", "[",
RowBox[{"[", "j", "]"}], "]"}]}], "]"}]}], "//", "N"}], ",",
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{"Length", "[", "symmetricData21", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"j", ",",
RowBox[{"Length", "[", "symmetricData21", "]"}]}], "}"}]}], "]"}]}],
",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"NosANDClNames21", ",", "NosANDClNames21"}], "}"}]}]}],
"]"}]], "Input",
CellChangeTimes->{{3.430616719310483*^9, 3.4306168979792356`*^9}, {
3.430616928499261*^9, 3.430617000658845*^9}, {3.431735452479678*^9,
3.431735481263851*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm],
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm]},
{
TagBox[
RowBox[{"{",
RowBox[{"1", ",", "\<\"B-1\"\>"}], "}"}],
HoldForm], "0.7065898046225676`", "0.03908835902508172`",
"0.06465521758139084`", "0.0018090288447968274`",
"0.0011793031949399455`", "0.004155323343012806`",
"0.0018632351548506724`", "0.00010383500533658425`",
"0.000707720355179012`", "0.0015939951501837623`",
"0.03453399737237242`", "0.011976589918826561`",
"0.0018727926181753031`", "0.0027218817722292916`",
"0.0023839151741860947`", "0.000555824895758763`",
"0.0010947743442837883`", "0.004956478440603466`",
"0.010955076286263035`", "0.054561629390907744`",
"0.000051695804475495035`"},
{
TagBox[
RowBox[{"{",
RowBox[{"2", ",", "\<\"B-2\"\>"}], "}"}],
HoldForm], "0.03908835902508172`", "0.5261043668591888`",
"0.01888454847693533`", "0.016429512059646992`",
"0.0005732656054717859`", "0.03539293551528839`",
"0.01490955175201704`", "0.0005251944761422312`",
"0.0003648228406178935`", "0.015280132954971081`",
"0.026798784504673087`", "0.003796624177689218`",
"0.0005940049206600112`", "0.0006920021096333224`",
"0.00016690442096562998`", "0.004613676605096142`",
"0.020164568040104705`", "0.004163730702302696`",
"0.033954351450534236`", "0.04848025692525273`",
"0.00005042749403115577`"},
{
TagBox[
RowBox[{"{",
RowBox[{"3", ",", "\<\"B-3\"\>"}], "}"}],
HoldForm], "0.06465521758139084`", "0.01888454847693533`",
"0.5875045229767217`", "0.001269997067329154`",
"0.0005463222894761811`", "0.0031044377826813263`",
"0.0006933780663577444`", "0.00012012251740383423`",
"0.003913035677707626`", "0.0005348480959542294`",
"0.050989082767616885`", "0.011860275419093985`",
"0.0004295657429689496`", "0.0009859988128314348`",
"0.00014015073569198164`", "0.0008393958018213525`",
"0.0009625301913081438`", "0.0073193195981743255`",
"0.00873960720514038`", "0.019842319063112613`",
"0.0000594164422707303`"},
{
TagBox[
RowBox[{"{",
RowBox[{"4", ",", "\<\"C-1\"\>"}], "}"}],
HoldForm], "0.0018090288447968274`", "0.016429512059646992`",
"0.001269997067329154`", "0.7567133875854709`", "0.07038843285234278`",
"0.045593847770046166`", "0.07033270098543272`", "0.04072015296453821`",
"0.0020952376004770455`", "0.03405119267245052`",
"0.01059449208792257`", "0.00562156532355583`", "0.001686881314150544`",
"0.0004931964990218285`", "0.0006049732463742725`",
"0.0032459078003749635`", "0.0027228373314954007`",
"0.004272029287466225`", "0.0033071441764145532`",
"0.04619269677779972`", "0.0023937554422211404`"},
{
TagBox[
RowBox[{"{",
RowBox[{"5", ",", "\<\"C-2\"\>"}], "}"}],
HoldForm], "0.0011793031949399455`", "0.0005732656054717859`",
"0.0005463222894761811`", "0.07038843285234278`", "0.7431704147631687`",
"0.015257330770474416`", "0.0213337688547379`", "0.08547346555642282`",
"0.019960298380417827`", "0.01240173892263081`",
"0.010015746753931179`", "0.013485843002942307`",
"0.017416974692073713`", "0.014353201269384455`",
"0.015253014905957762`", "0.0027767199178619505`",
"0.0003045724160426801`", "0.0014348264877797393`",
"0.0008879743557763969`", "0.015771833947386602`",
"0.05855439014547652`"},
{
TagBox[
RowBox[{"{",
RowBox[{"6", ",", "\<\"Ca\"\>"}], "}"}],
HoldForm], "0.004155323343012806`", "0.03539293551528839`",
"0.0031044377826813263`", "0.045593847770046166`",
"0.015257330770474416`", "0.6082946021237663`", "0.01825980814769568`",
"0.00766072167146915`", "0.0023304710213838727`",
"0.01418801342295347`", "0.027032720766462293`",
"0.006731906225394221`", "0.002003468793333155`",
"0.0011216312508050838`", "0.00008862089473436834`",
"0.0028292475151504306`", "0.007082969735417242`",
"0.0038234950896077224`", "0.003401328856597023`",
"0.025297292442708924`", "0.0008593622625749647`"},
{
TagBox[
RowBox[{"{",
RowBox[{"7", ",", "\<\"Cp\"\>"}], "}"}],
HoldForm], "0.0018632351548506724`", "0.01490955175201704`",
"0.0006933780663577444`", "0.07033270098543272`", "0.0213337688547379`",
"0.01825980814769568`", "0.5853675077141016`", "0.028299313943295414`",
"0.012661617926058397`", "0.03174298119480601`",
"0.004441576407292625`", "0.0015485219735885565`",
"0.0007216826230974243`", "0.0005882955950494216`",
"0.00030126106822595395`", "0.014897637215659523`",
"0.0028333999546717005`", "0.0018920033581820894`",
"0.003501249472679596`", "0.015193258966762335`",
"0.0004796000782819629`"},
{
TagBox[
RowBox[{"{",
RowBox[{"8", ",", "\<\"E-1\"\>"}], "}"}],
HoldForm], "0.00010383500533658425`", "0.0005251944761422312`",
"0.00012012251740383423`", "0.04072015296453821`",
"0.08547346555642282`", "0.00766072167146915`", "0.028299313943295414`",
"0.6003141142290186`", "0.03718436677669249`", "0.019644625722354075`",
"0.002272148063054524`", "0.0034324655320417097`",
"0.0039833035645166605`", "0.006367106231665962`",
"0.0005024920821194596`", "0.0027311318807949642`",
"0.00005277354313480123`", "0.00004370136319001622`",
"0.00003941244830504897`", "0.0017747759596921805`",
"0.0004927027541289142`"},
{
TagBox[
RowBox[{"{",
RowBox[{"9", ",", "\<\"E-2\"\>"}], "}"}],
HoldForm], "0.000707720355179012`", "0.0003648228406178935`",
"0.003913035677707626`", "0.0020952376004770455`",
"0.019960298380417827`", "0.0023304710213838727`",
"0.012661617926058397`", "0.03718436677669249`", "0.6709890744669197`",
"0.03336216140374708`", "0.015808589551591645`",
"0.002987367324969191`", "0.024607541754094898`",
"0.007535632538992671`", "0.021996020261796673`",
"0.003974492480673216`", "0.0004274589921802425`",
"0.002920485658182664`", "0.00012247018557795116`",
"0.001169473104713373`", "0.002548100896976897`"},
{
TagBox[
RowBox[{"{",
RowBox[{"10", ",", "\<\"E-3\"\>"}], "}"}],
HoldForm], "0.0015939951501837623`", "0.015280132954971081`",
"0.0005348480959542294`", "0.03405119267245052`",
"0.01240173892263081`", "0.01418801342295347`", "0.03174298119480601`",
"0.019644625722354075`", "0.03336216140374708`", "0.5716785544460294`",
"0.028390024105701198`", "0.003603875434065813`",
"0.009716925641401992`", "0.0058101366499118`", "0.002459979387365991`",
"0.0004154947414372524`", "0.0003139454328473003`",
"0.00015820963924034447`", "0.00009751392775549594`",
"0.0012078065750971655`", "0.0005704444524804522`"},
{
TagBox[
RowBox[{"{",
RowBox[{"11", ",", "\<\"G-1\"\>"}], "}"}],
HoldForm], "0.03453399737237242`", "0.026798784504673087`",
"0.050989082767616885`", "0.01059449208792257`",
"0.010015746753931179`", "0.027032720766462293`",
"0.004441576407292625`", "0.002272148063054524`",
"0.015808589551591645`", "0.028390024105701198`", "0.6677974644283333`",
"0.07423489337532264`", "0.004015408233570731`",
"0.005189752396296118`", "0.001606937351761252`",
"0.001910670096997143`", "0.009055637723810054`",
"0.0023343550002109716`", "0.002796711704642078`",
"0.017960316065084518`", "0.012371055912056879`"},
{
TagBox[
RowBox[{"{",
RowBox[{"12", ",", "\<\"G-2\"\>"}], "}"}],
HoldForm], "0.011976589918826561`", "0.003796624177689218`",
"0.011860275419093985`", "0.00562156532355583`",
"0.013485843002942307`", "0.006731906225394221`",
"0.0015485219735885565`", "0.0034324655320417097`",
"0.002987367324969191`", "0.003603875434065813`",
"0.07423489337532264`", "0.7004196303681438`", "0.0008097262940361985`",
"0.0004796376732254548`", "0.0016731555963513623`",
"0.0005822015341324755`", "0.00020627270931271994`",
"0.0004741757696473886`", "0.0005715774786095778`",
"0.011467413142420751`", "0.004707264020796264`"},
{
TagBox[
RowBox[{"{",
RowBox[{"13", ",", "\<\"I-1\"\>"}], "}"}],
HoldForm], "0.0018727926181753031`", "0.0005940049206600112`",
"0.0004295657429689496`", "0.001686881314150544`",
"0.017416974692073713`", "0.002003468793333155`",
"0.0007216826230974243`", "0.0039833035645166605`",
"0.024607541754094898`", "0.009716925641401992`",
"0.004015408233570731`", "0.0008097262940361985`",
"0.7832360377533325`", "0.059235131507855504`", "0.053445802471097134`",
"0.0072672993565121545`", "0.0029974680640404605`",
"0.00921809697139706`", "0.00045589813276346373`",
"0.006545230676308596`", "0.0015826099435438826`"},
{
TagBox[
RowBox[{"{",
RowBox[{"14", ",", "\<\"I-2\"\>"}], "}"}],
HoldForm], "0.0027218817722292916`", "0.0006920021096333224`",
"0.0009859988128314348`", "0.0004931964990218285`",
"0.014353201269384455`", "0.0011216312508050838`",
"0.0005882955950494216`", "0.006367106231665962`",
"0.007535632538992671`", "0.0058101366499118`", "0.005189752396296118`",
"0.0004796376732254548`", "0.059235131507855504`",
"0.6762061329933571`", "0.016956663602017114`", "0.00216989788759553`",
"0.005784404212557141`", "0.0014587289115607892`",
"0.0006534385310849047`", "0.0024330338867717778`",
"0.0005142964594462605`"},
{
TagBox[
RowBox[{"{",
RowBox[{"15", ",", "\<\"M\"\>"}], "}"}],
HoldForm], "0.0023839151741860947`", "0.00016690442096562998`",
"0.00014015073569198164`", "0.0006049732463742725`",
"0.015253014905957762`", "0.00008862089473436834`",
"0.00030126106822595395`", "0.0005024920821194596`",
"0.021996020261796673`", "0.002459979387365991`",
"0.001606937351761252`", "0.0016731555963513623`",
"0.053445802471097134`", "0.016956663602017114`", "0.7502214810568555`",
"0.0002926107952777008`", "0.00009653445019785047`",
"0.0003418607972112807`", "0.00020232849324945448`",
"0.0009452602413112846`", "0.011184690094172655`"},
{
TagBox[
RowBox[{"{",
RowBox[{"16", ",", "\<\"Me-1\"\>"}], "}"}],
HoldForm], "0.000555824895758763`", "0.004613676605096142`",
"0.0008393958018213525`", "0.0032459078003749635`",
"0.0027767199178619505`", "0.0028292475151504306`",
"0.014897637215659523`", "0.0027311318807949642`",
"0.003974492480673216`", "0.0004154947414372524`",
"0.001910670096997143`", "0.0005822015341324755`",
"0.0072672993565121545`", "0.00216989788759553`",
"0.0002926107952777008`", "0.6254846489798579`", "0.09185437191534733`",
"0.03057934950678965`", "0.017428551216367365`",
"0.07042462929056617`", "0.0006536593109883602`"},
{
TagBox[
RowBox[{"{",
RowBox[{"17", ",", "\<\"Me-2\"\>"}], "}"}],
HoldForm], "0.0010947743442837883`", "0.020164568040104705`",
"0.0009625301913081438`", "0.0027228373314954007`",
"0.0003045724160426801`", "0.007082969735417242`",
"0.0028333999546717005`", "0.00005277354313480123`",
"0.0004274589921802425`", "0.0003139454328473003`",
"0.009055637723810054`", "0.00020627270931271994`",
"0.0029974680640404605`", "0.005784404212557141`",
"0.00009653445019785047`", "0.09185437191534733`",
"0.6175953293086034`", "0.05235823573469438`", "0.05689044768372871`",
"0.1123000181061763`", "0.00003378097894937271`"},
{
TagBox[
RowBox[{"{",
RowBox[{"18", ",", "\<\"Me-3\"\>"}], "}"}],
HoldForm], "0.004956478440603466`", "0.004163730702302696`",
"0.0073193195981743255`", "0.004272029287466225`",
"0.0014348264877797393`", "0.0038234950896077224`",
"0.0018920033581820894`", "0.00004370136319001622`",
"0.002920485658182664`", "0.00015820963924034447`",
"0.0023343550002109716`", "0.0004741757696473886`",
"0.00921809697139706`", "0.0014587289115607892`",
"0.0003418607972112807`", "0.03057934950678965`",
"0.05235823573469438`", "0.6678398763457764`", "0.011752562918401169`",
"0.10067317892543842`", "0.00009324589193047806`"},
{
TagBox[
RowBox[{"{",
RowBox[{"19", ",", "\<\"Me-4\"\>"}], "}"}],
HoldForm], "0.010955076286263035`", "0.033954351450534236`",
"0.00873960720514038`", "0.0033071441764145532`",
"0.0008879743557763969`", "0.003401328856597023`",
"0.003501249472679596`", "0.00003941244830504897`",
"0.00012247018557795116`", "0.00009751392775549594`",
"0.002796711704642078`", "0.0005715774786095778`",
"0.00045589813276346373`", "0.0006534385310849047`",
"0.00020232849324945448`", "0.017428551216367365`",
"0.05689044768372871`", "0.011752562918401169`", "0.5816420969128049`",
"0.0732341351008757`", "5.821934223899692`*^-6"},
{
TagBox[
RowBox[{"{",
RowBox[{"20", ",", "\<\"Mo\"\>"}], "}"}],
HoldForm], "0.054561629390907744`", "0.04848025692525273`",
"0.019842319063112613`", "0.04619269677779972`",
"0.015771833947386602`", "0.025297292442708924`",
"0.015193258966762335`", "0.0017747759596921805`",
"0.001169473104713373`", "0.0012078065750971655`",
"0.017960316065084518`", "0.011467413142420751`",
"0.006545230676308596`", "0.0024330338867717778`",
"0.0009452602413112846`", "0.07042462929056617`", "0.1123000181061763`",
"0.10067317892543842`", "0.0732341351008757`", "0.7477865617853239`",
"0.0032981029636214693`"},
{
TagBox[
RowBox[{"{",
RowBox[{"21", ",", "\<\"Q\"\>"}], "}"}],
HoldForm], "0.000051695804475495035`", "0.00005042749403115577`",
"0.0000594164422707303`", "0.0023937554422211404`",
"0.05855439014547652`", "0.0008593622625749647`",
"0.0004796000782819629`", "0.0004927027541289142`",
"0.002548100896976897`", "0.0005704444524804522`",
"0.012371055912056879`", "0.004707264020796264`",
"0.0015826099435438826`", "0.0005142964594462605`",
"0.011184690094172655`", "0.0006536593109883602`",
"0.00003378097894937271`", "0.00009324589193047806`",
"5.821934223899692`*^-6", "0.0032981029636214693`",
"0.8817215278486735`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}, {{1, "B-1"}, {2, "B-2"}, {3, "B-3"}, {4, "C-1"}, {
5, "C-2"}, {6, "Ca"}, {7, "Cp"}, {8, "E-1"}, {9, "E-2"}, {10, "E-3"}, {
11, "G-1"}, {12, "G-2"}, {13, "I-1"}, {14, "I-2"}, {15, "M"}, {
16, "Me-1"}, {17, "Me-2"}, {18, "Me-3"}, {19, "Me-4"}, {20, "Mo"}, {
21, "Q"}}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVyl1Ik2EAhuFZUxNbo2go0eYmlCTZSHG6yPJ1LZzKnCst9lNsLSGcZaYr
Rm1uGEINZRPFMMJo0PQgJsMcVisywlDD2BCNNZKE+t7CSsqDXNbzHdxcJ7fE
fEl7PoXD4VQho9X5xdTDELHf8I3VLOn9weo4VPqbVXTRn2mGt5P04zn4Nlul
7ISxxWlpF2wte6V2exnyOqDJ6oRUWn3TA5d1DtsjOOKwaMdhXpAOR+GubH4v
18cQC7c+ngbvD/l0xdD1J1chgwVbRoUG6G67nOuE72aODrrgAe8Uzw0PW+/E
H8KcNQF/GOapW+gI7FgsWg3BtO3lA2OwbZRuegz7Gpp2JmBjgyt8tY8h/NhG
c2U/QzLm1n7tHWDIsxMv9pXD+buFDawJunlMCV2M0tQCAx5lug0GvTJt8CtD
Zm0eQwimZhWNqziUfEoKe6ZKKMmXLP2Vl1EyLb7XET5CSWuz2vgElrrX1yNw
4YZI+hyeueJ3suZLku3xWkpEXQufP8DjdSV7UjWU9Kuj8gxIQwWKTGhf4tu3
stZGJlkjExP6Yng6+TL9JKy5ZlzRwbMyjUIPwxcmSRQGUt5EY7Di2CwvDn3t
ifoNuM3HbXpwCp+wWm/XUVL1c9C8Q09JYXeFSAxvWVTfK+F1eV1ONdzf6F6o
gd0zvIMM3F06WiMwUBL7FxIsmyix8d/Pcc2UrK7Mbzy1UvIf+tcq4g==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ListContourPlot", "[",
RowBox[{"linkageIndex21", "[", "1", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.431840754289774*^9, 3.431840767063534*^9}}],
Cell[BoxData[
GraphicsBox[GraphicsComplexBox[CompressedData["
1:eJy9nXVcVN328BFQursUhmHoYQoRaxbYioWK2IKBjYEtKtgdGFjYiggCYmFh
iy22ItidpDQv92XW2Zd1H56f97kq/6zP98zMib3XXrX3PtgFh/oPUVZSUlqo
rqT0L6n4g2rxXV4t1QnrEzYmbE7YmrAtYR5hPmEBYSfCLoTdCAsJiwiLCUsI
SwnLCHsSRontiO2HrE/YmLA5YWvCtoR5hPmEBYSdCLsQdiMsJCwiLCYsISwl
LCPsSZjqHW1HfcLGhM0JWxO2JcwjzCcsIOxE2IWwG2EhYRFhMWEJYSlhGWFP
wnScUr2j7WhM2JywNWFbwjzCfMICwk6EXQi7ERYSFhEWE5YQlhKWEfYkTO0a
HadU72g7mhO2JswjzCcsIOxE2IWwG2EhYRFhMWEJYSlhGWFPwtTuUztGxyXV
M9pu1oRtCfMI8wkLCDsRdiHsRlhIWERYTFhCWEpYRtiTMPWT1O5TO0bHJdUz
2o62hHmE+YQFhJ0IuxB2IywkLCIsJiwhLCUsI+xJmMYV1E9Su0/tGNUz2m48
wnzCAsJOhF0IuxEWEhYRFhOWEJYSlhH2JEzjLhpHUL9I7Ty1Y3RcUj2j7cgn
LCDsRNiFsBthIWERYTFhCWEpYRlhT8I0TqVxF40jqF+kdp/aMTouqd7xCAsI
OxF2IexGWEhYRFhMWEJYSlhG2JMwjetpnErjLhpHUD9J7T61Y3Sc8gjTdnQi
7ELYjbCQsIiwmLCEsJSwjLAnYZoH0biexqk07qJxBfWT1O5Tu8YjTPWOtqML
YTfCQsIiwmLCEsJSwjLCnoRp3kjzIBrX0ziVxmE0rqB+kvoBHmE6Tqne0XZ0
IywkLCIsJiwhLCUsI+xJmObZNG+keRCN62ncSuMwGldQv8kjTO0aHadU72g7
CgmLCIsJSwhLCcsIexKmdQmaZ9O8keZBNM6ncSuNw2icwSNM/QC1a3ScUr2j
7SgiLCYsISwlLCPsSZjWcWhdgubZNG+keRGN82ncSuMyHmHqN6kfoHaNjlOq
d7QdJYSlhGWEPQnTOhet29A6BM2rad5I8yAa19O4lUeYxhXUT1K7T+0YHZdU
zySEpYQ9CdO6H61j0boMrTPQPJrmhTTPoXE8jzCNs2jcQP0gtevUTtFxR/WK
tpuUsCdhWheldT5at6J1GFpnoHkzzQNpnsMjTONQGlfROIH6PWrHqV2i447q
FW03GWFPwrSOTOuitM5H61a0LkPrDDRvpnkhjzCN22kcSuMqGidQv0ftOLVT
tJ08CdO6Oq0T07onrePROhWtu9A6As2TeYRpHkPjchpn0riJxgHUr1G7Te0U
HYdUr1g7Ng/KmnaibuV/zEPM1lpQoNIzR44Sj+P38HexRvHeaRpqUPNzJah5
XB287Jes2pepxEk8PtIx9N7QL7oc//VxfahYlhxldl+dk3g8o+hwt8c5Rhz/
9XFjOBx3LjpUV5+TeLwRzHplsduM42ppC2nTJ7bJnGUE/dasX7duTwPuc77I
/OIFV1vyfXoec3h3u9OM1aHGnMTj00NTbA3XWnGM1/vsOCkwpV1t37MG1cRH
SyDUnJN4/FqTq0sk2xtwjPeD943P8dfXsa3lPLbQfdAKv259rTmJx0tVtuV4
PLYjv6ftQr/HA1OL1eYzeLacxONG/G4N9j6x5/ivj/PhyIcrKU3deJzE4y/P
agdNv+XA8V8fF4Bq6OVwb2c+J/H4y3UXiniljhz/9XEnCOyz3mWzqoCTeHzc
w1fT7C85c/zXx10g5drXhJNSJ07i8W/tzdJCclw5/uvjbjDt0IUQWwMXTuLx
/aGiH7xb7hz/9XEhGLnZBH11deMkHo+OjaiIu+LB8V8fF0Gqfx0LNx8hJ/F4
tRTDcn03kcMpD7jlJYnQlYi5z/E4fq94gFvGojwxx9VSBrtHFpWc8xaBOF/3
qnAE85sjJn8amdNORr4vIteh55VA3LnyM+O0xJzE4wGnhBEj30g4znBZ993m
AvPLre8Hln2XyTj+699Jwdsg/+CG+hJO4nF8nr1fPszROyeB7Sc2ecWWScnn
Yu458bnxd399X1LuPHjemt+XQY62u9I8ZSkn8XibpK3N97+Rke/TdqXPTX/n
Cfuebi3pYirjJB5/f/Bp2ybz6iukIeQ32PXyX+P7vbztxeKWxtxx7nuK4/i9
yF5XWs7OFkHdlNWLlKr0BCUeT/I5tDe2o1ghReC8T+3JrFipQoq44/i99Bjt
QUHzpQophvc39cJKq56zWorh8DJvrzdVz1ktJdx58Lz4OzwP/g7Pg7/D81S3
gxK4Cn5kxKkx/+nsMXX8xT6MnRqVGj5PZCzwCU8pUcnh/G73iM/vQkqYHz64
I/6b5inG+hdG/UiYxTj0jVtlF99K+dvMN5vqtWN+uevK5Sb6I1Q4PtHSa4XF
knocV0t1UG6XftJ9cyXH8oBAv7Y2ZRzPGPQ+MzimiOPUsVNGhjco4PhHuHrp
+m058kTjHiqzSpn/T7vmEFn/LuNbkYVKp+MYP/O+PKtfJONv39dXlPViXLl3
WPhmMeN0xw+7jQowDvgun7f41F5pog7Hvl9W7es2XJvjys5D90+w1+L45MHG
CVFZGhxPNdFLTFn/n/PeU3b3iTlVWCSPD+3h2GirAXf9amEO5XfU1gysyOXm
LTeYZhZusSni2LP3gV6ZTcvl7moH2zY2MeF+P7tl88ldmphyfCfi6u6hQWbk
/NYwbWj3nI0lxfINiw7Vm1fHivt8h8p91406FhyHKrXMnN3PhvyeX2UXgi+e
vVssl+yfPDetvT33+fYwjfGxkayOvjZfeY1ZfQeOF4aVHZ6fyrhaCmD3GxP+
s4HFcu0xq19ey2DzFmc7fJK8aufIff/afb0mH4b+Z505q1NMalpWnvzyYd/t
nyY6cr9vszzXscd6VsfXjFg9zHkwrbOKYcOwm2fPTPnBsW5zn3p7n1bKS2b2
X7w/kNVxJq3wn9S+nHGniIDXW3ewuoW+rYHGDmXGu3q+XdPs4X/mpZsjRo2+
376QY/8Hk0POycvlDr0MeY4Slufv//ZYyXQhY8n87c9Usxk7Duy+3MKT5W1v
rYLDb4Yy3v0wdNScOMaDo8L7NHrzn3le133SSSFKZfIVz+9+XcL5QyXwj7k5
qE0Gy3u2Zy3a1mUH4xzrVlm9JjCGvkqWg1oyXrnpRMAoE8azN/Q2GXaN2bF3
PcO+LFnHuJPp8ouJQYwP39u75a4b419lR5C5dvuv7FrVdeeGz1BVZXlFw9G+
j9SdGLsHqMl0/Bjz5ddXGIxlbOW06pPJGsZGBgFtLI+xdTDjjdrqbBqsAosu
nZ0++4Ue9707Hnauq04zttow+8n2TYwHKz9fdHAK44SRcu/zPRgX3ot5f1fC
WN68Yv1rPcbV0hxSKnYs39a+HselZw5NDrytwnHLOZcG6gfUUXBVvH5Qeqz1
eWUF88FweLJh/yxkAdjUOT6jrl4djpWOtO28q58qx69HPLRrEa8GHs2zcrQH
snnK+MKrAQsuMnZOPHaijqsDx3tC9tjOWMnY3nbNvMICxtXSCZaVxwYscKwH
4pI+b8PXOnKfm1yWdN9lyLg4SuPc1RVsni9r4HOPHG3Gl5TO8Lp1o/NYYvC5
dV7Fqqkqx9GdX3dbZsDqTir3vpzbtkGN4/LKwq0ho1U5LnJVChf6YPvIQDTC
qEVqvhrHHY4e2rbOuS7HQ1UDKib0V4aTJfVT9WxYXcvnzbqm/WaxOg36mWpm
64d+l59Dva15PX34OCX+VJwZy6N7bVz4/JKEcfqJwSqvOjJulAWCymGM91ZY
t7Oay9jMtnik11bG833uL+92nK17ShhxYGZDEw2Oe29PsBjfWJNj9UfxhxIG
aHF8RDe+84e52hwParX/Iz9Oh2P9GXHzBt7S5fj0wX22m/Nx3JjDzeQEx/5+
Ghy7N0xM7y/U4njp8aThA/R1OP7c/KDmwFxdSMq/MVCtPfpnfRir0t1AI8GE
Y6Hhk7Oa+nQdlzV4uwjqHjTQ4PjArQGN0r00ObafuGFkdj8tjqMt78bkz9Hm
WPeM9h1N7vmsYc6Q1nXtbutyXKw5u5FXoR5kDRixKugIWxdVWOyt16m7Jcd6
azSWNc614rha2kKI1cKEAbkaHK9rE7r85kctji9OCAht9kqH4/ytzbrEZ+pB
UKRspmVafe58GQ5JmR2H2HDsc8XVO0KLrTNyM7g232u9Hce7i13zYw0Z13+5
NMhyOVtXE331y80lGnSdDR8G517R6+eryXHGebutw3Zrc9xs7VRhmLoe7Ho1
b+GemTzu94NP6JZn17fn2CFq/TizNHtyfgF0K80YwLfX5XiYucEpvpM2x+Ge
XSwd3DU5Xu2/YrJD1fjophq1K0XiwJ3vi9eNfqMD6boNJ6gYO2NzQrAmBExa
Y+7ZjK5LkMH5Bh0CfbRZ3bbz9K6tpppocZz5oKckub4uvDJOPZvnyOri5Xsd
++4exNisybrCgK2MJTdVV6lnMv7kt/TB4rusLhz/vtcnsw2MR891VNrdn7HQ
tsBYwqd1ZCXAuPjPjmNWD7tmX7T9wwAjjiM/jdnYT9eQY++UN6szTupDcps4
1e7FrJ73utPiw76fGJsFjBgqzmLcrl97M9tbjGcMdknXPcv4wEjNqeUHaX3Q
Gg61un3kVXsjjpcuuXHx3VRDjgdnXL33KdaA42Zm6a++PWT2wqTfxdy8evrw
OdjmWpMGVuT8tpA3O0C5xz02fpVvRAbwUw04NrBIjMvbgtfjgerKg2WmFw1g
R2LiqqRKO+58VSZuw6JkxjNH3N4WPIjx58sDY5uYMO7jkJNofJnV9a5ERhz9
MoXWO/mg8+D5m03RhhyHB+Y5x6Qx/Q+csmOTdWP83AX6uHu5u9ogu8GBZZLH
A08jCwF6bjW/vNIQdIcMilz9kM5bV/lX9wlP48cZcfzi6paR+naGHPcdll4y
4bY+LO696mDqZjpv5AkbrtsbJS3+t7r/R97muj4GHIeo8Rz6/GB8i293ICnB
kOOGvrZe9QYbwdLcr9l+FmxeJdBrRgv7Hoz5MzRii1cy/n5mnfbt63QeRgl+
Nk/82bwT+b+LE5kf+Vm/90/9KvLPjuOa92cOMZI1Y0TqzB7oTZh9LcyC8eyU
UU6pLoxz8gLnlTdhHCxr9dKnI+M7YWL5/P5sPD8fsjGw00kT2H52dWZJGavP
e8tbK237xPjOyWJ+qyeMRzROaPcxnbHKsYFjVhxlvMnTOEq2h3ELkTCg0qYB
x9WSBwEV6g0W+JpCWXZLgUsHe/K5AJxG7Cq8EWgKHTsPjt7/jq4DdALJh8Cb
EfqmsHGUwbqoBEfu87bC0KT+yXTdmwtseDwmJu0z9q8bFDQsjXvTBVkIZtu0
nx0NRpbBybBl2xdeMoGpQ5ybCTqyedhF0q3Z+ufovKwnvJv4aOKFfmYcq8o8
OreNN+XYLnee0/USE46bJz2t06Ud4z5jpJl31xvDus1DQb6NzVsO0/P/HO5F
5zGVoLa6CdZVqg/TvIjFLT8bV/2pOK/m/RlzfuJX+R1k1Pua17MG5U72Q/kq
bJ4JxjV8JjFhPHNNu0AfR8Ynj/bN6OzNuORJaPv+HRg3qog8P6ofm++a0/RY
vH4Y45thuabegy0h8tL95GdlbD5LutX/Y/hHxq8m3+JZP2K8potfn+MXGbd0
vhIVmELnw3jwNTwj1aPIEgKGa7qe0LMjn/PhY0F+gWo3C477DikJ777RCipD
K5zeX+Bx369Y+bBlkwx78nsBTIxIztVWteLYfKPRikvNLeDr9cRR59Y7cN/3
nxns5v2Urds94mHyOdGWruMVgc/t8suhAy3h5YhLA2XdPbjP9VdN8/wSQtcd
ycDfesuyTHNLmNd56YX2y9m6CAfxQZ8+vek8P60j6v90nP9P8wjkamkMjaVK
q/ssZvo9dmJOH2UXG453H33psO8K4yfFd791Hl6fY/2mF1ML1ZkdRbuat3qF
h9cLtDtV99OxlWVMP8br1UtV6z4x5Xj4+aRvIwMYN5k59MmdOyYca3tbX/Tu
zDg7LyNx2zUWp9WmxzWf1xYW7U8brKXC5lGFT9o0zDVmfFf9ttpjAeMpXoGP
0xoxthn6PG5Pe6bPXpl+OmMkNhx7ZAwOVLpXH1onnd81tpzNz9pdijHulc+4
LHPqXJ9PjB/mdM93fknnc/mg2vfxw08vGnAs//Z44vwoa3AfvjVgW4E99/2F
7zqePZrB4zg+xftRc2sHcj4RvM817tBwM96vDGL8Cw51Xsr065/mjRj3Yjug
H0WultbcuEc78H+1Y83f8+BRpHeb1sps3jq2s6pfb03GU61vdRljyLjdhw09
Ii1Ze/a7L9rWQofx05YPu0RG2oGXZXbk/hI2/90mfMOrnbmMez7v3nLzR8Yh
LfR3r3lJ58sFkLTXVsWPbwcND955enqeA/d5wdubTgbBbB/AhKIHswve0XXt
LhAcUbGs31q27jjo/tjCLcvs4HTvoDKDPWwdd4OKoocvVztz/H293xSzI64c
e/g81fFYTNctC2Ga9ulLzV6ydaVPRq16MuG2HfTgHVri05Ot061c82ZPt1R3
jnXz19W5zdm/qv56Ed/wcCO6LlUJcN4D50GwnWvWPVme/rN1g5+tQyD/fV7E
4raacZ51rX6mNr9U83y2tY7L2sYxcm16WfP8fNhX+Klhl3o8jlddSdC/q8d4
6ubQjz0sGAeFii884iELIK5Ub++qOB7skdmunV7B1mskPylU0StgfHL2jfE7
PjG+JNj1wvMl44zr07pcecT40RaTFc+nO3J8I9hpeOcEuk/DBS61vdmuZaE9
xwU7rQxGx+D9CSHqwQuPwY3tOY4Vnb/cWYafKwHOg+G8GD5Xtfwu/+/m2dR/
WV39Z+v4Ne9Xv9Y61j+ti9U8vzmXp2DeUvNz65+Oi2qLq2qej/odXq12EO0k
/h71sub5BCATdldrX4etE9pkI/vSQYOxso7x3Y4GjIeX5R3rbMH49qe7MV3t
2D6Xkh+7p/QTMjZ49fTsk0mMnW8aaQWmMYbU9t3vqzlwHLgrYot/F8ahK469
vRXNeMG0bx4dXzjAs8tTef3uoX0WQIflnmYTljA+2j1Ha5EvY3urBKWtxWwf
zsoXwwoOJTEu28v/eDWE8bAxz7Of16f7dmQwy8ezyxFtB2g8mG+2eSpdV+sJ
+leHO9luwPtVgtrmhXHeGJ+rWn6X//28s/o/nkfCeaia19Pn6rZYx+X6oUZd
i+2Hqi3vxry85vepH67djv0pvUG+oTVD2rqYrWe79tEtJT+H8ZUrWZKdHxmn
xy4/2PUV40sL5BKlp4wvDv2efOAe4/Ottov73WA8dpLBw3lZdN21JxSZum8M
iRFAnb6hl1dx+T7Th5rrBtg8YM06I61zsLiktrimtjgI+e/9CNuP9WfHoQvc
TbuzTKUe4zC/h2eWazM2eZyZZ2HE+MiQ54LdFox75r7uJbJlXDTzw9ITAsYb
tL6mtXZn+6KWfOqlX+jPuN34SkvLOMZqxbscmtdx5vjirPai4EDGc+p9bzw/
0RnKp85fMLGSrX9MWG3hMKiIrocUQmQnw5xA7npCmHJL5Uqzw4xHdynYxjN3
5nhQxtspatMZB/o/6vI5yxm2vj69MuWFB3f+4W2Srt0dz1gat71evgrjcu0o
H+O1bB/TpdC5M2QCuq9JBhPjrkbsjHYidW1aV2Nxbm1x869q15rXc4Nu53LD
d/zbPrbY4Cnfvqqz9n2Zvt7E774rxxFXxL6lbRnbXr02Ju4k+37a1SGbeolc
oOzI9M87ytn60yx7WWp2AePTKz/Ps/zKeGv5Lv+At4xnj+jXYHU246CHJp9v
PGDc+9LhzOff2b4xnCfA+6hZp2R5QW15RW15CPLfx4G/Tg//13av+bxCeDdM
S8lWma3rNZc0nWOlwbhd6ah6ZvqMp13YssjQjHHcspvauvUZZwZUrtBwcINP
j1f2GlDM1gc7Dzy0fEku42FvH54/+onxnlGlRa9eM36TW1+on83YfqrvoKYP
GQdXDokedpuuP/aEsEvZmx0vu0MP7fgVQS/pPhFjMk9kzdXJsG5WfZzWHdh+
vL/PK11+sZ2geiwCSUGIc54aY41zw/bb6zN+vny4e3dzxkf7jEica8t4udNI
8WEnxkMKRqa8ETFuem6Up6k32+c2YKPvPl8vxtMOJHrphTJee876UuYexkkP
FnWPzWZ87WPhyzBTto77bcWgcT6dGCsbZVTqzEeWwLS3HjsW7WT7yNa91xdk
+bHPD37M2Scq9IB076aw6xFb1+3TNTzr6QHGx4ednmYyj7FkdqVZpz6Mq6UU
jk6a4ORp7wHRuVFBOTfYvjX32Bf8Nlp0H5sMJkcuj031ZfuOBncqWzRiKeOu
liNGWj1g3OztQ7/rDTw4djnYShg+nLHpzBQ9YQpjlfZ2OdllHjArddm7kdps
X1j0yJaWx5syTrIp9VMfzfjKreRZAVsYv4gYdnDXDcYl0gZvcsvpPjNP4L+f
+yO6qr9vquv+OJTF9lE1TOybq5LKOKbH/i/+axjXKyt+vz2U8ZgdbV9/b8/4
Ydv1z+QCxvJvb54sr0P3aSlBbesya1vHifz367TYftGadW8JtOu91/3kGMZP
pzY93Oa1CCZ5S0sXlbF9Af1Lni9SLqL7DaTQOfRR5AF9pj96XjM/L+vK+FaF
fcDo1YxXXLqS5ndXBB2S8l1af2Dr6J9Z7dwy5Q7jsAVd9fefYKyeVxmZtYvx
lv4HCvSWMxZf7TvMdzLjS55amWED6X6H2te1/uw4+7/aDRllzP7BSe4qbN9E
Qq7b9AA11n5Hzi4I985gnP/Ee1RkNGNx/qfe1wYwDtWJaWfsKAbVlXGu6WXs
OpI2E9u8KGI8sEI+qCSf8bLDmrOMchifGHV/o9sXxu/ttx1p9YFxWN27Oelv
2b4GD9EVux43GH/sndb1RQrj3fMOR4zeyHhg0v7k4tmMrTO3v5gXwvhh3WgD
w050f4gS/Ow64drWGSNXy+9yXKf8361T/Dc7U4sdRDuJ3/+n4wD5n+pBzfuV
gtbu06GHVNg+mgM3Pg2XqDPuWmg+OEmbcX791v2FBozXtZkQGG/yb/tzxm7z
d7GUwNxF2+L0OHsohTnLhzawPM44MsptDX8944joXHWPMMaztxwL9+7KeNaO
mbkthIzD97YM6aRF96kqAa7bxnXc1YfZuuv/bZ24OrfO9GfXpda8vv4/Xlf2
s+vWal7PmFuX87PreGr+3rzWdQe4LqHm9625eVCcF8XPa847sf3LWLfCOlbN
z1mdAvO8mp+Lfpuf/1NxSs3nEYO/+diH/XTZfrVAkyNDV3HPI4G7Es/Zp80Y
n0leuX+hjHGC6PMD/66MNya2UbYZw3iBcKf7u8WMJyRUBCbvlcLWqCZaB8vZ
PrSmb36c8ylh/LjhoWkZhYwnLRwrCcpjbPTE7eP3b4yTXD9sn/2Zcafw3b30
PzCulkrwv+2D+C7/tfsy6Lrx/3Udp/E/Xrf2q9bNcb///3/mta7r+VXrhmpe
j62DqFmHZvvxsc6Idceanwu5PBTz0pqfi/5Y3I1xfs3rS/+wn/MEaZB1nfw6
jGfETTbIVmV8Me+OXboaY91mQslBTcY95y/y3azDeOut1/7z9f9tX6k5DBpr
JIPm8V+Nvy5Xg/DALOenNpXytqHv5/puUIFV2bc15kl+yOtcatx6wDA9UF46
cenp2xXy9svEt1LSdGCN5aCYkFml8qjuToHqZtog2NclSV9YJH9q1eBF3zGa
cMyr+bnUp/lywSuTEckX1cHvkuu94CU58jE/dhdUqpnA0az1Dyob5MtFnmWH
O0hNIe3e94fCG0Xy3PH+k9b3N4PL19o97jetXH4iborPPDdL+Br3sq7JwSL5
mVvnEqe3tgfVmaYzs6Ql8plHx60/G8eH3BPLTmgHFMgNSiyHvZ7oAAtvPwT7
xFJ59FFr7/3RjnD+5Jv0XhfL5Nc1zOLNcwUQ1OnYwIsrq/KmvgYN5ncQQOWz
xUWivrny8ZbKKe8DnWD5Xf3oVpdz5WfP93bymy4Cvabx884d+iEfFHu19HFV
3iWZH3dya1alfN2H87Pmu0lg8IbmZSHpuXJ+W+XLN+dKoH0kf+xnvyJ5yh7Q
NcuqipNHar4em1EuF/nkLj7UTAqVhvzEtpl58kGX9Ey+REjBeWhZl4z6RfK1
Hdy3OlySQvfUe7m9gsvkH1Yn81tX2b11QosOwcbl8j4jNfZ1rrJ7Bw6vW1nC
L5FfbxHk/i+7d6mp8YPVnj/kza1Tk4Or7F7W+VVWrq3z5Yn5+g3/Zffy2+sF
nQ/IkWM/Y79jP2O/T5J+LC1V11ZIVRg37vqDOTEG8PJldIJaMxWY2iVuUp8v
lpC7rfuXI0/qwuLmZxLgkgUYh8/uE7FUBTa5PXjtsNUcPHvFX+nQvA40Xujh
+7WbDYTpD5j7dK8yzLk3Liq+BR90/C93PKhbB2TaXRrp3uVDVcj7opGfCrxt
IcwKDXaADXqpYWmL6kL0dO3IjBwH6P9VrN76shrsn9qycd0PAoh/a/DBeJcK
PI7Y2CLqqhiu6N6z3ti9HliuvRrTpiqvuhHbvbCppRIUDd50wr7Kz6c5Zj61
+aAGR1dZfz3RRgrHl70e+6yZMgxopH1mXJVfKj4XpLS8Tz3YN1nTJKrKL7U5
1S02+pAq5B1RH3Goyi+tPdqqy04dFWhWWC/tfpVfepXsVZQwtA43LnCc4LjA
cYLjAscJjgscJzgucJxgu2M/WJgomQdE6IPYRUkUr6wBHfTPP59hYgBrbeef
LXbRhHCt+ft27jOAYlPtbm26aUFivXbjrzYzhP46q1+vma4NL+poN8nJMIRz
KuaTXu7UAaPymyrmQ41AULJFTXRdF1oVrbrevMQIlny33xCerwcw2X3lmwfG
EPG1t+21BA0QNtrbreFxE+g7ttPeUWFaYFVsa7Zgiyl45foIdZvogMbxjU8e
zjYDwzDPw4l19KD5uDl5asPNIfxlvXd6d9SBv7W5Ua86FtC+ebjgoLImaN4o
lsRtsADTjXlDuku1IKfkkH+p2BJeFQzfXThIGx46jR3vd9USErs+fx29RgdO
Bbiu3hJsBdMTAvhNLurCrrlvk7+WWEFbjRuDsgr0wGObpbHZV2sYAJ5Owqca
IPs+rNmnLzYw/HnGtAeZWuANR4emfakPE2aPuTEzUwear6y7MupLA5hhq2Xr
mKkHx1O/jR0WwoO3b0+f375FA9aP1L/b3sAe+hzw8XNtpQ1hNmJP9xP2cHvi
hXuHPuvCZ7WjhqdfOEBSg6fti+brQaMXIFl30xGezVW5EthYD9rFTtA80c8R
+NtvOn+epAO9Q/e8fPZZAMNObVg8K0ULRjZ8fFx1RpX+Ph78yfC7Bswo14py
1hJAToGH3x43dThlkD5yaz8nyG1tmxg+SQOmdpsStkVdChc2ndv5qaU6jHs7
cPMPPynMl6q9OhmiCcOntrvQdZUU2l7rwFu+WBuCtCWf99+vyvcGrQwakKAL
5SZZHUKq4o43ie/7N56jzY1jHNeoV6hnqFeoZ6hXqGeoV6hnqFeoZ6hXqGeo
V6hnk/a1K3u/10whjeB6rGO661dThTQEXmzdNWNkpgppCFP2vhqQPM1EIQ3g
5p6zrvlnjBVSHxz2bP3RUM1YIfXBcIT6aNlqS4U0hMRPGUetP5srZNU4MjvV
o26lHQQLp+3XrDCC+ne7mQ1Wt4Ome/YK0/UNQWvFx0fnDGzBtP795Hn2+tBo
gL1l0kJ7CD3dWjbQwAjM0rWNu7o6gMdKC6cdAYZQFqTczi+AD8XnVVdHx+tD
xYGYJJ3TTlDWr1mQ1QwDsH1+5Kx6F1eQnxk9x2CbIUg73JhzuZ07DF23UW1F
lCFYH5A3n7hICmOOVRTdczAEnWkGqx51koHn+1Ytg5sYcH4S/Sb6SfSb6CfR
b+K4xXGM4xbHMY5bHMc4bnEcY79gP2G/YD9hv2A/Yb9gP2G/YD9hv3D9NEp7
y80uDRTSDGaOWjv21SBrhTSGbX3UfC/etgOfo7pzF283g1uLWm0WRdlBjNGS
RkECM6g4OqdwUw87KA1V++K13xTc357tomZuB4HX52zXFZlCH2Ol/eOf2MJh
J6WAN4dMYLFv87rZm23BcN4MzZPeJnBs7IwB7QbYwtgXRadXnzYG82IV2RsN
BxDlqg27amQK20K054UpC0B+y1zzg6oxzBvAsw7d5ARaaS0bZTes0kO4FqP5
wQVyZq9rZnLHBAq3zyySb3aDzy3Kv89qZAJnQ4c8mP5ICJHPrsb/SDKBW6pj
9q0cIIVmRsd2+840gclvr40aly6FzA0eKRftzCAxJmyxySAZnJp2xzlgqQkX
52Dcg34W/S76WfS76GfR76LdRTuMdhftMNpdtMNod9EOo91FO4x2F+0w2l20
wzjOcNzhOMNx9/DOxqiZydYKaQ7Ll2y/MuubLViZtYiqzLYA/7Dd5RHzeLDr
fftSFS0LUMsb0HOt1B5036YdcAmxhBPjLJNjX9jD5Fey4K7nreCHZsPGdZ7y
4avJqDDlYxaQcLHeTWmAI/ReorM5JN4Sst0GCzosE8CJXul+6ywtQJaa9mx/
gAcMGz8rrWeCJaSb3h/ts0IK9ft0P1q3mSWcG3Eq8toWGajvL9AUTraE1oUq
S3Y1lIHlYz231U/MubgF4xj0M+h30M+g30E/g34H/Qz6HdR7HAeo9zgOsJ2w
3UaN2T5JKdgWHj31/aJ0wRpmNR/gc3qqA1TMOB05I68+NBgXZa5ynQ/NXgrE
9aJt4PTOy9/a1OdDeJsVz1Y0tYaMO1NSJ3YXQcsOr9486GoDBk93PwutytNa
j10/M224DWcH0S6iHUS7iHYQ7SKOSxynOC5xnOK4xHGK4xLHKY5LHKc4LnGc
4rjEcYp6gnqD7YDtcvuQVcT1GCeFtIWO8tyk9SudFdIOtpu6tVeZ7KaQtnDw
c3TfzafdFdKOyyMwr8A4AOMCjAMwLsA4AOMC9AvoJ1CPUa9Rj1GvUY9Rr59u
mpPTsLeDQtrDtf5HzRPyBArJg31b0qOfL3NVSHtQ33rzzqxwF4XkwXzTfl03
WXsopD0ob9pr1MdDqJA8Li/CPAnzIsyTMA7HuBzjcIzLMQ7HuBzjcIzLMQ7C
uAj9IvpJ9IvoJ9HOot3FcYzjGvUa9Rz1GvUc9Rr1HNsN27HXyAnFJQYCheTD
2q6+nfZFCBSSDxleBjt75ggUsioPqf/8R90gR4V0gHaqiX6HbjsqpAMU8A9f
+LhMCp/ajVh036rKT5w97bvtigwGRobPgygHLq/EPBPzSswzMa/EPBPzFsxj
MG7EOBLjRowjMW7EOBLjRowjMW7EOBL9FvoxtItoJ9Euop1EPUO9w3bDdsR2
w3bEdsN2xHbDdsR2w3bcnXa818c0Z4V0hOHeduAxzVkhHcE9ZYEgTOaskI6Q
4/ZVO/Wrk0IK4PCe7nnlsU4KKYCptice+w5yUkgBNNtod2aBjZNCVtl9zZ23
4u9JYZJJ66299jmCLGn/8vMbZDBsYE+bBVJHLq/HPB/jbIy7MW7DOA79PsYB
aGfQ7qCdQbuDz4nPjc+Jz43Pic+Nz4nPjc+Jz43Pic+Nz4nPPf9y6oJFXVwU
0gk65bTY5BrropBOYGp188CNSheFdIJnLQPPhfZ0VUhn2Dvm5X2DRFeFdIZv
e0eHqvV1U0gnaDF51/Xkk24K6QTrWmc697VxV0hn+GhiuKDeTHeFdIZmb9q+
Tsp2V0hnCH8c+0FJIIOSg13v1vFz4uJgjIsxjsK4Cu0c2j20c2j38DnxufE5
8bnxOfG58TnxufE58blHj1VSc8h0V0hXyPZtWKAZ7K6QrtDZZNSr7+/dFNIF
zrzbnvEg1E0hXcC47prNt5M9FNIVTkaURhR29FBIVxhcERxi/VGokC6gPf2q
n+98oUK6wKEfYskwnlAhXbi8APMEjCsxzkQ/hn4N/Rj6New37EfsN+xH7Dfs
R+w37EfsN+xHbBdsJ2wXbCdsF2wnbBdsp1KvLcqn7wsV0g1CMpKWBWbJ4OaO
IKvk4+5cnIxxM8ZpGLehX0M/h34N/Ry2O/YDtjv2A7Y79gO2O/YDtjv2A94n
3neT7afSXbuJYbLv9FU99wjBr26QteNeMURrnmvUqZMH9BuuOpZXKobjd9Sf
tyz0gNIJd6+mrJRAwbs9a0PsqvTiVt87R+2l4BSTuiu0jRDCdCRT3NpK4YPl
4O+BK4Vwr4Na/e2jpBC3Xrep72MhyBY/PW9Slc+PME5d4MrzgLXpycMXH5aC
66pBd41HekBBvQV6lY+r/JGOboOKFA8IaNX38IQKKcQvPjbiXZkHV6fEuiXW
KbFuiXEgxoXRGxorT7kpVkgR5M31rdizTKyQIoh1vWuwr49EIUWgs2GHqOCk
RCFFYFI0QHA2U6aQIlip3/Jx8FGZQopAy9lpqWqUTCFFMN9HW75njEwhRVCn
9/ecNu1lCimCGePv7frgIFNIEfxYfKznkjoyhRRxdT6s+2GdD+t+2E/Yb9hP
2G/YT9hv+NzYDvjc2A5BBZl5StclCimGgsq8HgVLJQophsWa2sc+dJQopBjq
m/Ats3UlCimGgdIXt4d8kCmkGDJWrnVde0emkGLw/dpu/oUTMoUUQ0qHiud5
u2QKKQaHfQeb2C+XKaQY1tULWec/WaaQYlAfbJUTMVCmkGKuDo11aaxDY10a
69BYl0Y9Rb3FfsZ+x37Gfsd2wHbBdsB2wXbAdsF2wHaR3+jZtSdPqpASGNR8
08WSDlKFlMD8xGzvmIlShZRAnC3vgM9WqUJK4MaqIbw3VflztZRAjvK+dQtz
pQopgR3Zj3esfStTSAkkNRk53fGGTCElcDq6rFtqikwhJXC9YJlbh40yhZTA
E/8GdbNmyxRSAu8Tk7LGhMgUUgKF2r5HlDrJFFLC1fGxro91fKzrYx0f6/pY
h8a6NNahsS6NdT6s+2GdD+t+WOfDuh/W+bDuh3UkrCth3QHrEFh3wDoE5sGY
F2Oci3EvxlEYV6EdQ7uGdgztGtoxtGtox9CuoR1Du4Z2DO0a2jG0a6gnqDeo
J6g3qCeoN6gnqDeoJ6g3qCeoNz4TXp6Z/E6mkFIYGLLg3dNzMoWUwqw+brq+
MTKFlEJM5wzZ3qkyhZTCyRaT+mj3kClkVft6WUWOE8kUUgrFrmdiH2jJFFLK
zePgvA7O4+C8Ds7j4LwOzuPgvA7O4+C8Ds5b4DwGzlvgPAbOW+A8Bs5b4DwG
1oWxTox1R6xDYl0K61RYJ8G6CdZJsG6CdQWsM2CehHkTxuEYl2NciHEixgUY
J6BfQT+DfgX9DPoV9DPoV9DPoF9BP4N+Bf0M+hX0M2in0W6jnUa7jXYa7Tba
abTbaKfRbqOdRruNdhrtNtoptFtop9BuoZ1Cu4V2Cu0W2im0W2in0G6hnUK7
hXqOeo96jnqPeo56j3qOeo96jnqPeo56j3qOev9P37uL/L+995e9L/93vUf3
974Xk72v/0+9F/PPvrdQ/xe/p8KYk7/rPWW/9z1J7D0Xf/Y9G+a/7b1Mv/c9
N9b/5Xvc2P9j+FXvwfm17x1h72/5ve+Zs/3H7zH5397TwePkP30vx//2ngT2
voVf9Z6EX7uPnf3fiz+1T/jP7mtl/3+jtn2pf7+Pku23/F37In/XPj9klH9q
39+f3Qcn+sP74P6vddRsH9v/tg9OXOu+p7/fx/P71nEjo/xd+35+174RZGzP
P7vv60/vY5L9sXX3f2rdMLJ5r0ge30oEooOqrdo2FEIDUePDFl4ikA8MGyEd
IwSBWm4bvW4i6KT7ekX9qnHvnr3viWqoCPqd7HZYo2rcex4OGl2yWASjRpx/
km/iAU2XWih93yOCaeZSpecdPaDloIzVb86JqvKfHQ7X5nlw18Hr4nXwungd
vC5eB6+L18Hr4nXwungdvO7ooHz/7/WkCikC29n+ks92UoUUwd2YJIP3Vfam
Wopg/indnFc9pQopAu+no24/Gy9VSBF8LrmamLlMqpAicG0E84SGUoWs0mPt
vSV7/KQKKeaui/eB18X7wOvifeB18T7wungfeF28D7wu3gdeF+/j/wHIsza6
"], {{{},
{RGBColor[
0.34414207419788695`, 0.14560334369279015`, 0.6007136337709944],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxNWHtwldURP9+93/1ueKgVkFdBCYLgSEJQEhIEDAGJCQlvibwipRSFSMLD
oiOdYk0iRBDBispDeWinra1WRGbq+ATU0dbqDCI4o9OB1mm1tQ/rY8TW2t+v
v9+dmz/223O+c86e3T27e3ZP4ZKWWc2pEMIbUQhp4BXAGwA/BLyN/guAFwHH
Ac+7f8L/XgJsTkI4DPwWFr/jf0cAH6U1v2ccwsfApwDvAlZhs8uA9wCPw5wW
tCtAY3MmhHuw54psCNVo34h2NdpPJ1o3GHRuw5pitH+D8d+mte9nwMeAnwD8
CnAU8Lj7L/vfk4B6rFkJmjWg+ZcgXk8C/mpM/u7GnPswpxlz/oD+7wBvUhbL
zDXjsd8q4LHg68/Wy9uW7Zj3bMfYIfKJua94/4OAV42f8p5HzO8pY67/0PS4
37ng5SzwV9QRaDUDl4N2V/z/HO0vACGSDNTxOPC/DP3J4D8G/gf+/RMwAbr7
E/C8WOtOA84AvgnSBdf/GnR/D1yCOf+1zBwrBQwCFAIqMWcpcB/wMh3tJrTL
0B4NWIH2UuDJwCNJB/C15SGtBPx8AvwvwBieJ+Birjdt9r8E/BHwAXlMtGYN
+OkViVfK2jMSf+z3iLQH++dEWk999Uc7E2n9F5aV59kvkl44Nhr9iywb+9QT
+XsPNjYDuBtk6Y3/ESAFuCDS/ux3AXwWpMu+9BvTPZwRzUmg0d1ykf6cSPZ8
g/kfDhgGOB9wCWAoYBCglHwBzkD2AcAdsfa6EDDQ+ArA5YAC/+O8HqZHWuSn
CDACMDHS3rMB51jH5KmPxy+LpNtLzRP1U+z11OFI9ycB5gKujaTnwYBCQ5n5
LqHdeS7Hx3hsaAFsl7wDvx5rn68T0ebcKsszBXA1oLvpUh/lgDrAVNMjrgVU
WqZZ1tc1jBXWTbVplXlujfmr8bwJgJmAGeQXfCzjGaW15nLTiGP5/j0YHwhf
WoJ/XXG2C4FXAVrM63WABsvdYB1x//mAeeaP/vg98zTPawg3AZo8tzlSbJpt
G1lmWozFy6134hu9T5PHemckx5CsaK/sRPf2SHGcMi/wPtTHokhyjMaadbQB
0CiMFad2Qd5JGfFwNcbLM+K9MiuZ2wCt1kG7+zyTRtPlnbEdsI17Y+0W4Fsy
0v1C87HA+mv2mtWmV2U5aa/Lsd9W4DszkuFe0y32PNp1a1A85P3RAbgZ8H3G
SfheF+BDWAsyYQDg24Bl6G/Cun28B7LSz7SMaG+wvrZbBvaHpXQfFgH3DWpD
Tf+XucU8t1qOFq9bHuXvzxWdzqHJ53K/15DGs9j7fNCrS8kv6Z/nBp3jFNvR
HMua0w1xzhcndbK7ybbHRp9HnW2p0uvbzS91PRR7fCto74u953lB9lFte2Gc
YdzhPVMYFMvIH8+wppMd1Xq/67w/+V4HuTYDfzcr3fMMCnwGifv0b/o5Y0mJ
xziX/peLc/T/bp432HN5HzK2Msa2Aa9xbGGMocyMFxXmi/4/xvIwRuRiQKnH
cvGCY4x/jIMXRPlYQ1pVOPRbsNdVYLyPfYE+UWr+KAdjLuN4D+ubcZXx84NE
/K6D0VyE9jTe8+C5NqtzGJCRb9BHbsjqnIps43tj3QlPx+K10Dqo8jhj5zDv
yfukLSN/od8M979e5oWxvq/XMb73t+2QRoltYpFth3ZM/8zFuYUemw/+bwP/
M6CPCO2xaN8LWSagvxrtK/GvyufCO/A42tVo/zujPGwnYwvzGv9PpZWjPeix
nwPuA+wAPIaxR4FPAP8gUfuXaeVNewAPBeVTu93/BeB+wANBud4uj63H2gOk
jbX9EuUlr2P/tcCNgOsZO5yLvgY+24PyOsrT5rjC/kbAmqB1m4wZa8aD5neA
u4L+0ZTon00pBi0OGuMeU+njXnO9x7h/rceGgM5s4NMp3UWzgvpcXx9kN4tN
g/25ifaodP67D7A/KKekbh4Oit+zo3zeMSfK3yHXRvm7Za7jxwL7Cf2Dd88s
r38zUb5WGyuGNdjXec8wTjFmDMvKds7G8o+ZXr8a/P2I8iSKxYzJV6YUL+d7
z5tMj7QOpGUDz6QVA5jfMAbVBOVqpdYZcZlthfTv4Jlhj23A27H2K+w1Cu0N
KemuIsheqT/mneW2j40+z3r/q7AdkV6rbYvjHdbxFsDd1jXxVtsvbaXd9tfq
/lTzyP3o0xMdG4rsi/TDQZaFsjGH7eE4wljDmFMNWd5L9G8jdFucKMdmrh0c
q3J5cS/7fL3tJmcvi21zzI97Ol5stPz0E+bKjFGMrdQdddjhc6N+eR6LY9U5
ryWS7wHribUQ64NcnfCN95noWFGXli4e9Jpbrbct1ulD1vGSRPvw/O8w7R3W
6U6vb2B9CLw+rRyf/PJeoHz0BfoW8/EutptHcPYj0P8woxy9q22pV1b3xAjc
F8Wx6p29oL0I/T34fyfGS9Oqa0rw/61E9NZi7qhYddOjieoE1hasG3i5sT57
Dv+PJ2pnC1R7sSZgbcD6Kvisykyf+7A24R1H/hgTGFvW+Mxudp91HWsOrmeN
wj1zNUz/KF/T9IvytUhfx33WisyRxmKvndDFbvzbkM3XvTy3JvPDem6Tz4T2
cQTzhwMvgi5PoT0O7R87FyoK0i/56m1b7LD9NCbKKZhbMK95JtHZTIX+jsa6
t/7DMwet8Txr4NOgfxX3TckP6bc5v6wPed+t6+RbxLl4QJyLE8TXBNV81C/P
/6DfDT7NaE/G2JlB9xPvI95LmUR1H+u/lfh/F88EuvpZVrztzyqW0TfWpmUL
n9vumFMxxlSE/D1BP2Mdz/qX/jMmVl1bGutsOzzvuMdZn/POoc/kclti+sQp
2wHPjO8CH5nuKvtJm//R/xhLDoPPvwNXx9IT7anRZ1JuXTLnYu7FWp13Ofnf
klK+V2a9Micb5XmDvY5jjK38vx74/SB/oG1SPsYU+ijfUPiWsjUjf6Bf0Fem
A3byfsiqJmS+9iX4fSwlu/oY829P9HbEN6QS+yn99YRzA+YFjF+875lfxGmd
+4WsK3mWPHN80mnZwsBEOQbfrp73GZDXn+J/N/Axnb4VK99i3tVUoHesd6zv
Z2PleWcxf0os3VLHe/1mMjJWPsM3nCNBMYL2cUWsXIc2NoDx2/kMc5wusd6W
tiVac9L7LfVbyrREuQ354FvboVg56aeJchrmNj8BftVnwXsvdz/tC4qzxHsB
uxOd0yWxYip1Rn753vSu7WsuZN4F+rdmlccwn2HexHvugOm+aH3Qroti0RwS
612J9nssUf9978k8jXUl38S6W17KzXyLeRffArOJ/It+lnsj45pP0npD41sa
49GTPm/WT6yjdkSix/civu2wVmfNnnXtzn+MAYxnB71+j/O9Mxm9GzJ/4vvl
S1npnHfsUt8FvBManVfchbl/S2QbzM3fsP6ZYzZkVVeyvtzvWMF49nginfDt
jXfdU+Yj99530vK8HPLvl8c8/oJ1zNjwP0Y8XzU=
"]],
PolygonBox[CompressedData["
1:eJwtl3vQVWMUh/c+e599QoMITYqSS6YrMipFKNUn9ZVRmGEIoVIqysSQu64+
VLq4K0kxk9xCyD2E4Y+Ioc+1GV1lJMOM55m1//jNWWuv9a797vWu9XvXaTty
/LBxlSRJvgQ52FkkSas0SVqD5Ty4GGN7nvcCG6tJMphnfyH/CF7DtwF8hrzB
9dheRt+JvAMMQB8EfkL+G9QjtyLGBGJfAo6rJckM4nfH1k5/5FdY/wfyLjAQ
/yLDF3mie8C2Hp++yF3BHmJ1Rm+B3BGsR78Sn0XIC8FTrP0RfV/etR+YQbwG
fOYj3wmu4/2zWN8T32PAEOT7sN+FbYFAngUeQJ4GrsV/Cj6dknjniSaO+AP4
6W8O0bejH4LvoeBp3rcX/Vi/FbyDfgf6OnzfBtvYX19ijsJ2FTiLd60C1Qib
nEy8DQgVbCmYwPpG0BG5D/gFeQDrx7o3cG419tSiPMvn0a9C2IL8HxiLvIZn
ByAfCM7G9wviNy3zc73nxZ6mYpsDLsTWrxZ7uxr0Z+3N2GdjuxGcg9yPNVuR
vwYv4v8p+vH49gabkJfyrBHbZnACen/WTEGeCUZg60P8K9PIQS/if479JWxP
+I4ivsFvMSdd2O8b2JcjrwXTsPevxd6uAXU4DaxFLsaBIejL8Pk5iRrsRqC3
yvXzwCRsHfCZjO+9YARr/y3irNqD9fjfhv4Wvm+C31n7PliB/BC4Adsb4B/k
vWAY/mOaUEtpnPnr6DkxO6RxZp7df0XENkfmqi6Pev8evIptojWfxrPP0Cej
75/GO75EP5p49ehDQTP2XleJ2u0BvkLvyf7GId8OzsP/BZ6xpWQfffAdxbNH
kR8BS7KIYSzP4DDkljwblUQNnFFEj9gr9oS98RP7OS2Nb/LbPCPP6knwKWt/
w94XW1fwLPI3edSC37ssDw6QC6w5a++oPGrnPXvWXiXGZciDwZHoB+dx1vJT
S+RL5AzWTrcf2E9z/IclsWf3PgmfJmlwWCPrp+chu58d6CvRT0I+AszKoyfs
jWbo32J/nRx1SYJj3kF+Hvsp2I4CDXn0iL0iB8qF9+Sx1jPfxvqx7K/BXIGZ
7G90LeQ5cg763egPIy8GC9FvrYW8CAznoOYQrw1yN7BLvuObHk+iJz5Bvok9
nYDcCvREnsD6hSVf3U+8ESV/ybF1nk8tYuszhPh78+DeQaA5tiox65LgWLn2
cp7NTCPH18ofcmQazyZXo4fsJTm/qVzUJGL1ABORO7GnrORHuXklyhLkBjCB
73mGNV3wbWnP5XEmno3PtMn5cv93oJN8AbYnwYFyoRwoF8o5cs9B7G9Y2Q97
7B30fmnUoLXoM23WrLW7qazHIXJeLThMLrsC9CH+btA9jTP37MfjMw95Lphd
jR631+WUU6ylPLjtT7CmCE6Wm92Te/uQ+M8lwfly/99F5Mp3rM7jDvAukFPk
li55cIH97114Th6xrenPi+AguUgOk8vk8APL+0sumMKzu8w1OB//O3l2pNwH
piOvIN6JaeTIXNkD9oJ3pHflsXnk3jvcu3xdyXdyoFw4OYu7+B75OYs7yrvq
cNC9Ej1qr/4KnsMwFZ/pciUYXkRNW9v2oL1oDVvLcpRcZY/Za3Lez/hOAY8l
0QP2Qj0+d6RxJp7NIuzvY/sAtMuDY+Qa72DvYjmoa8kHzjbmxNz4DX6LOTE3
3uF+SD/0poht5GPetRj9dLlUcxEcK9c6szi7/FAJ/ukN5iJfAJonMTOtqwYH
y8W3eSa8b2s15ofOYBW+u6shyzlyz2D8RyOPEfg/WInZq947sIiesXe8IzYX
MdPIR3KG3LGhGrGMObUSM5yznGfu2W+sBLc686RFzFDOUnLKB9gmZbHXuWAk
9s2V+HZzUCsiB+p+s9/uHepdOh+sZW1b9KGlXW72jvSuXADeRW9VxKxkvrMs
Zj5nP2cSZ5MjsA9MgpPkptblfOWzPIsZzVpvZr7w/7jMnzl1NnMGdBbsAMZX
ghMXlPeX3OhM42zjDOMs824RtfobuJT8zMiCq+Ss0UXUgLVgD51ZiW+cX/ar
vdFYjXf5zqewr8kid/ans8rHYHUSNWwt9wDjk7ije2SRE3MjR8gVg6sxazrT
OdvZU4eX9eHZekd6V1rzbfOYcZx17Al7Y18wMo2Zphvra3nM5o1JzGI78+A+
fVpj/6iIb3dGdFY8teyP66zpLGYqZ6tbvDOQ68v50Pu2L75bynyb/2fZ67Qs
8qvPRUX8R/C/gneG/wWMYSzvSO9KZxBnETlCruhZxLvNUS/0NuU8Ys0dje2w
LLjaGrPW+mTBLc4MvdGXZjGLuAf30rWIXrKn3q4FZ8ld/kfwv4L/EfyvIGfK
nTdlMZs6Izkr+Z9DrjAnp2H7H7hJhv0=
"]]}]},
{RGBColor[0.4457124898494643, 0.3222068658963661, 0.7434831402481609],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlWto12UUx5/+v9uwC0PCW7P413Q5cCIquK2tKE23nJfBXJqKGt5otmax
ZXPowtu6YLCkqSDB0lmrF+rITaSXxSZTUEJWyBJfSKIWhCDRiz5fznlxON/f
ec5znuc553zPL7+5uf7dXAjhDBIheT4moXeg65CJ4J+SEF5D2h8LYVEWQgmy
C1yE7RwyHZ8KfE9gLwUfRf+cGN6E/QcCnwL3o1tSw9+Dr+EzD3xA5xSEUEzM
P1lvQwawj+CzEdwBHiXmEHgcPC8OYQZ7N+Ffhv0q9n+wv4H9DPIM9r+wrUrs
np3EPh9b/EfYR5H7+C/BdgF8EzwH/A7n7QUv1/nE3Q5+Ebw4Nv8W9KXIcjWE
Xsi9p4EXoFv5PghuwL8XPYhcQMpYm4yejf6U+3RwhyZi14E7wUvBw5G9V+/+
I7X7H+asFfh8DK7BZ9DfWIv9CjjDvgu8FPkd+4/YLnscxXvIeQ3gO+iunOV5
P/pDv6fue4e9c4mTEn81+z/B/lFkb5BPW2S1VB1VT+VCOSnGXohsBmeR1UY1
+gX9OnotsgZ5Bf/dqgs+Fz2fyqtqrFoc5fyNxP0AvCqzN+gtM7FvYM8OcB22
CPwWuEh1QwrxP4RPjH0d9unYEvB68LPgzth8jqHfI+5X4C84pycxfAR9y3P4
fmy5Vs7VOzvx7wZ/hk9fYlwQJ/pYK8U+hp6PXMXeR4xWfHZj38a+z71ezZlx
Rtypz1kNVIunVN/M+mMbeBLSCP43Z/2qO3QRe3ZsPVkT2x7tvYtPdWZnletM
eroSfF334fttcGVmfBAvqlh/wu+p++pb9iAuF1jOSzPLu3BNgXFrBLmsnDp3
piWWL+VNuSzy+aDcTPWzYvC92O6je93wGqkOKz0n6uXynM0KzYxSPzefGH/E
o7OJ3UN23fG51HpsArUd8fg6R5wRd5Yn1rvq4X7seWQM/2Ps+857Wz2+zHlX
i57ic0bzpsbzrBlQ6z5LMut79X8vehD74+DF3HGL80IcqvZ+ewlbs3N8GN8v
VSfwOLopWH3fFK/8jaOJxVUcxUtT8z+RszX5aK4M+3v/Y/3VnN1Bd9nqPG2P
jKvC30QmwloPPhtVn5Aa9zUDypxT4lZ5ZDwtZ/0Ia5XgX9m3L7X5pjknnouz
jZG9bbLPs4s+A29rhvts0TkdzjvVX3lRftLIelc9XBLZLNBM2INOUju3m/Uq
53Kl9jrfK8Dfeh3/Tm2P9q5JTYSXYWvyud2DvqlZAx5DL/J/Vjt6ltf6ZGq1
Uc6V+9hzpf9Ji895/R9OO98fgF8A/4b9eGqzW32inhLP1dvqcfWceu/52P43
4o44NOD/Gv1Drvi/8uWcxVV8zRW9TW9Uz/b7e/XuvM9GzcgK5067ZoXP+UOp
5Vd51vz7GukGn49sFmgmPM3eJ30OTED/D9C35Nk=
"]],
PolygonBox[CompressedData["
1:eJwtl2dsVmUUxy/vve99K/BFhiBLMVQTZSN7CMqSPdQC2iJDQaZtGSXGMASM
ZQjyRQGVHUBGZCgUUGiRvQSMQDFSKEYUiAzDiBp//5zz4Zec+zzn2Wfd2kPH
9xuXCILgBESwLhUEa2E5rIBvkkGwHV5CqSOcRT4D+chz4BDyY4yrAuP5bsEk
zaEpNIOXaesKO9ErgOZxEAxAdyA0D4NgDd+roRG6jeEZ2l6l7x2ojzyNPUyF
19KCIAO+Yq71cJ25bkAX5M7QDbpr/djmHgQtGb+ZOTfBAlgISeaKoAT5MvRh
TG/YxVy7IZ2+OvAocgW1qQ8KoQim0TYVJkMe5LKnHEiHp2ExbZ8lbc/a+wjk
t2EZLIctzPE13EG+C43Yb0PYi+4+WEJfO/b+LFyi/3O+l0IJ8mVohe7r9L0B
bTnfKvpWwu/0XYOPOdN8uIXebWgdm24mtEO/LjrPQQZrDYBxyGMhC3kw1HR9
rRGiXyu2sWqL+K7h6+t+E3x3YEx7aMMcbWFd0mxBNlGDfS1G/wLyeajNvqr5
+8gGAsY/7vaQAQ/Qbxnb3FqjDf1z+T6KfAT+4Xsca00vEwQzYJ7fie5Gd6C7
uMUaf0FN9GrBQXifsSOhALlX0sYvgrF8l+O7LDyP3BQqQyWoy1vWg0L69kEm
c2fBb8x9FSqgUxH+Y3//wjHajsveU7Y3rdEzaTYr282jfQr0Qe4N2cg5MJ+x
37K3HbpPxn/CmIUaBwOgmLYLUA7d8vAQ/QdQSFsR3Id7cAVK4Shjjsg+2Wue
fIMxnaALbV2hCW2NYRPyZvl2bG+jN+rM+Cz2lgmzGfMhHOLOD8IH6M2E4bQN
S5nNyHaahvZ2Y6AZ8jpYGdiZ3kN/CHO+CYeQD8PZ0M4qnfXIlaESVIPqcB4K
6FsNG5Gz2eu77gPyhT3MsRv6MWd/6Ak95MfQF3pDLyhAZxcMhizIZ645vobW
6kDbi7I1dAfqLpH3wxTI03uic1z6slnYSNsm6I58h739Cjv5nq4YBYPkF7AT
eS19i2AFchf0b7j9664/4rs6tpGCEh+jsX3Q7Qu76d8V2RvrrfWGk/3N9HYP
1ReZjcpWvwhtramKv8itoRX0Z+wrUIa3DNLsznR3acgpb1OffES+Ih+QL5S6
LSlGKlYqRpa4zcv2OzFHR3iSNWqH5iN1PQYqFnbVmWUT8mvYzphtMJq+MWn2
Zv08RyhXqE19OrPOPiRhsU8xsNhjvGK9YuYWzzn5nlOUWxRDFUsVoxWrr7Dm
Zb03c82BT0O7G93RstByhHKFcphy2TJ0vvQ9aq+6M91dNro5odmsbHcEfSPh
DPLp2O5Qd6mYoNjwM3Odg3nIcz2nKLdkhBZ7FIMy/c50d3WYIx1K0LkEKb0N
XIVSmMRakyOL6YrtynnKfQ0jsz3Z4A70urk9yp5O8P1UZLYmm9sW25619zEw
NrKcptxWBarCJHQmQhF72g8/Ip+CCehO9D1oLzqzzi4fki+NQh4tPciVbdH2
HdxFvhNbzlXuzY1sb9rjSZ1R35Hl/DXuo/LVHu7LVZmjiu5JZ9FeFMO8XlDu
0J4muI/L13N8fvnUpdjOqLMWI1+EF5DbuY/L19cw92r3WfmuYvYxj7HFXiOo
Vij1t9jq/iWfLggthiuWK4YrliuGK5YrZit234d7cIB9H4SbjLkBP8ABKMvc
JwOLcb/w3SK02KkcqNroNt+3YBby7NhqCtUWteCJNKuhVEup5lHtc8Dn1hvq
LWcoJsGftF0PLWYrdmsPNz3GKNbIh+XL25hrK7RmrjbwB33XoKJiTGQ1gmoF
1TCqZS6iUwzl0CkPTdwelaNXMV/9yHK12mSr5+QbUIa+BMxPWu5VflQuHw2j
YCbts5JWg6gWyUbOgULW2BfamWa4z8h35DPyHZ1RZ/0e9oZmM7KdSp5b6oVW
S6qm/DthOVW5tRtrdE9ZDaN6QzZ2JmE1gGoB1UiqlRTzFftlQ7KlMLKzKr8p
dw/UnAmrEVQrnGK+k6HlEOUS1XSq7eojN4htj9prrvvOT6HlOtlDcWg5SLlI
OVO5cyHyAohUu0aWs5W7GygWwCORjZVNlUfuwBztoa32HJtP7vE71F2qJlRt
uEE5zWNkvteMqh3nwdzIYqhiqWJCkdcAqgVU86j2uee1xxH2cDhhNi/bn6Cz
wVDGDoutZlHtoppMtdnp0O5Od6jarq/nbsUcxR7VHKo9VEOrlpYNVvQcrFys
GKlYqX8U/auk01YHltC2NLYzbfAz6Cxv4TPDvaZRbfM/mwymdQ==
"]],
PolygonBox[CompressedData["
1:eJw11Fto12Ucx/Gf/+MqAonYllQSaKtgTivXbKn/HfKQWuZF2kUHpiFzls2i
WmvohXOUhakZhGHnczehHaiuFCo3K0lFYQZCVwXRRQa5THp9e35evPl+nu/h
eb6/5/k9zzU9G1Y8UsiybDnKeLiYZevZFZUse4x+HMcF2vl2SnweL2CV+EoM
ij8nNsD28tfT38l/lO7HYSzgm+DbRG/Gt/imkHwRO0J3mqsDS80zwLeY7ebv
whbcxPeT/JM4gV2F1NN2thVT6KfZUbExbFC/ia+Pvcu8y/E9fRiD9OcxHz21
Lsuuxt980yZlWWNd6jF6HcRV8n6INeV+QR9jn5E7hGN5D2V6nD6Fr+V+haX0
ZWLL2HHjefRL9G68jFvMcy9fm9pb6XbsLqUe9rF/8p/Bm9UsewOnzXGD/D10
q/hsvCf+I9+l9EPq1+DOSvru9fQ5Nf/gaH4GcRY14wFrtLE1c3VgrZq3xD9Q
8w7exQjffr4x+gz+wl6+n/mao09MR6GU9mW7WJWuwzm5o3zboj/6CF6l9+Ba
8XGxJrbPeB0+LKb1T+ulYDypkv612NvY40V6XRiID+l9CV1WXyqldWP9OJ/r
5DahGQ3xPfKmYKOaJrVn5U/gFUzm+13ta/TrQWi0lNI3Xs82qm0op72KPZtX
TWtHD9vYdcZ92KpuGKPFtGd/sBlWMVfwH4r/EsNqtqBXzaA5FtO/yHtf3mZ5
v9K/oYoevql8J9SdLKT9j3OIPY29PU8PX7gXhXTOcd41+hK+TvZT488wLvdL
vot804vqd1TS2tFDF3u7fhZgNX9P/HPyd8nfW0z3Ju5Pa/4uxPuwzLiXvjn/
5+Lfm5/3PF9sIb0IXegsJl/EJtOn4q5gJD+DIXaJte/AlflZ3R33Rc5cXHxh
XvZGubPwNv9YbDE9Jz+bJ9jV5lhTTXsTezSjlM40zrYFMyqp5+i9OfrK7/cc
dp/6/djJvwPPYkjsQTUb6f5iehNjD9roj+Ku0P2VlB91l0cPeqlnp+ljOo7q
oZ3vEPuv3PO4L5871rjf+AHM1EMLPimntyzetINqDsR9qqQ5RumnxJ/E2mr6
7v/vc/4G3yOvRndgLv9t6M7/te5yelPjba3Ja6AbMWGdlXyz6Zn8s+JNz/+N
+E+30iPl9N7Fu/dx/t3H2YNqD+BsPke9+H85yMLD
"]]}]},
{RGBColor[0.5472829055010416, 0.49881038809994205`, 0.8862526467253272],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1kztoVFEURa9z37svjTZaK4KWIlgYQTAERDMMQRTRaYIf0MYfBA0IQUES
m2BEx9pSxA82VkZEQpApLFTExs4JFhKiCH4gjWtztsXl7Lfveefs87lbT186
crGVUupyMmdDldJL7L2S0neIPvgm+DX4EXgFuwuft+AH8Hf5vgN+jP0KP7Iu
pS/Yw5w/8OPYORJsA3+sU9rHP1Pg0Rx+8q+blH7hcwx+B/xyDg3SMpbDfwR7
o4SGRfAM+Am4D87WI10HiDVNzDa5bvO9BTxXhVb5DIHf5Ph3Fbu9ihrvc3+C
Mw2egB+rI47ifW6ixk/Ys9xdA/ew3Rz+M9i9nAvg4Rw1qJadxDvo2l8Q75vr
GuTQJG0DfJ5zt1k1tqJf6tsC/FXX3gWfLKFB/X4IfgdeQ8+keWmcck9U32X3
SnP73YR/D27SOo+W0CRtbfK+8nz131/PZWMTR1izXTav+67nqPm8L6FZMx/+
34cSM5OPZq584tWn9VXo2Y39WaIPmtUt9+Qpdo/jSO8P78YmfA+5P1ewZzyL
8RLf4qXlvHndtz3H2Tr2TPpVxznvSaeOvVQfOq3QrbzKv+C6lHNgndI45H1r
VaFVvOpYdA/Vy1HXrhl2vAPahTXPQjNZsb/2umOd2ru+93MpRw7lmsfneon9
0fuY8O4dV3zvrfax59pPwX3wXu0n77Mmeqhetq1H73Le70JvaNV59bZmrUd9
WjKv/foHZOeK3g==
"]], PolygonBox[CompressedData["
1:eJwtl3mw1mMUx9/e9773vZQtlZZb3Eu3RCUqsrSozJRlujFDMdVNKFoohixN
txlqhiyZolUbqahGYUbdDEWpbkqhtIwYS5EZpgwRPh/P+eMz88yz/Z7nPOec
7/mVDR3Tf3Q2k8kchCLYlctkPoNnijOZqXB2SSZTHw7TPgLn0T4XGkMTmMai
F+A7xr6HVbRXRp9jhwqZzNdwD2PDYTMf2wQ7YCdMo+8FyDO3GLbStwX+yGcy
f8JJ+Bu20VcL38AhKGHNKdCKM1TEmTzbXsb2QJaxHKym/RYcY4/jMIFvPAFf
MrYnzuzZH6bvEXiUPcbDLtq7YRbMhPmwANpzl3ZwDXO6wr/Y6h+Yzx4LYCTc
V5zu7N29s3d/jTlLcsmG2nI6e82IO3v3LxnbA3nOWAQtoQKWwVIo5Q7NoRff
7Alt2PsieIg1D8Kd7DkMRjE2EtaxZw28ztolUMbacviCuZ/DPtgPdZlzKhyg
fRDOYY9GcIK5f4lt2MCcjTAaRsF++g7EN/32PNa+Aqfw7RKoA1k4g7HT9R32
+gl60r4W+jC3L9xL3wh4AMbCq7AYDnPmI/A57d2wHw7AG7AcjjL2C7Rmj1bQ
DtprC745LnxC31jg28BqWJNLb+7bV3OHSb437fFQy9j2XPIBfWEXfbs9Kzbu
4Xvzra4wkzkvx57uXY++utCJOZ2hCX2NoZy15xcnm2rbvfBVLvmIvnIh32gD
N7Dmeqhkj/75ZFNtq4/qqw2hATSDUhgKVfAJc7bA7bQH+ja0P4KVsAK60dcd
RsDweDPfrhFnaAjNoBSmMHcyHKf9u3EPT+eSD+vLJ2n/DTtgJ0zwbMXJh/Sl
Jpy5sbbhDt2gv3eBPti+b0nycX39mN+ActaUQUvaFTCJOdXQnD1a5NMdvEtV
3NWYMXaqYVIuxaCx+Da8o12Y2xQyjNXJpZxl7vLMnn0evjLXvMHe3+aTz+v7
5hxzj3c+HjFsLDfi7A2hLWdqB/v5xj6oR99phWRzbT88bDuX9hzzEO3WsJ52
DdxM+5ai9Oa+/ZuwAi5krDVcoA0c40x74DnO+Dz8y9g/+iNrt8MXxgBMZexZ
44D2PphB+yXYypwt8DMchW2MbYVHGBsP1TARttP3aT75tL5tjBqrZ3GGM6EA
JfoFc5rCCfb6C+6nbwz0Y00lXI0NroIGzGkIj8NjMBmmQLm5BoZAFWzk2xuy
KaeYW4whY6kX9IYBcFs+xYCxMA7GwjT6XoTx3gW6Q498ysnmZm2krcbQNxoG
s2YI3GFMeFbO3D+XcoS5Qg1QC9pHrhgEg3Mpp20IG2rLu7HJXTAIBpekb/7/
7ULKBbfRd6saQfvRQjrjtLiDdxngHPWO9nCoZG6/knQn71ZN38S4k3czBoyF
Q6FtO0Mb9Wl9eztramETbI47etexrB0HPzL3h2zKsebatxlbU0g+pq+Zk8xN
FzO3beQYc40xZ+zdxdiwQrKhtpxDezZMhxmF5EP60mXQMZtsom0mMzalkHy0
NmLEWBnInAHwIXttyKc93Otj2pvyKabaRo42V6vxar01gbWBGq1Wr6NdA7Np
z9Jm2q6QaoBt4dP69vuMrfdetG/OJh/VV0fxtqOhxr3gRsZuCg1Si9QMteNo
xI6ar/b7Zr7dAliYTznF3GJNsjU0tCw0S+0aDIOyKYaNZTVX7VUz1U41TC1b
Htq1jDsshYWwKO7k3fQpfety5nTOphg2ltcy9l68qW87lLGqbMoB5oJFsZdv
5tuZ48x1i0NLzRnmjn7aJnKMucacYm45lzUtCknD1DI1fF7EvLFvzjZ3W9Ot
ipxr7rXGsNZQ49Q6NaVR5BBziTWYtVhV5ILK0IYmUTtaU1pb+kajooaxlikN
rVsRWjYpcr8xbWx3YM9LwkaXh0/qmyv5xqrwcX3dGDQWD0TtUI89TjP/0m6d
TTWVtZU+ti5ylLlKn9a39Tl9rxdrekaONFeeTV/90Dy1r4K5LQupz7HKsLU+
p+/VgYxzmdO0kGoQa5H3YG0uaXS30HC1fGdorTWJtYk1SW3U5LuiRrRWVIPV
YnOcua437evgN/b4tSi9qW9rDBqLg8JX1SS16QroUpRqNGs1NUvtMkaNVX1M
X7NGqo4a2FrYGDKWjLn3QwPUAm1QETWptWlZaIGa3jw0RW25ErrkU84x96gx
ao2aq/b2YO/u8A5z3g2N6BUao9ZYA1sLW9Na25ZGLWNNaW2pD+gL+oi+os21
vTW1tbU1SZ+ooa2ltZm2syYpj5q0T9Rw1nLW+Nb6mXjLzZGLjcm1URNYG2hz
bW/NbO3cgT0vLU4aoVaoAWqB/yz+u5gDzAWd2LNjPmmq2mrNb+3vP4b/Gv7D
+C9jDWwt7J7u/QFjH8JT9D2ZTf9I/itZg1mLdQlbj43a2hrIWug/meq/YA==
"]], PolygonBox[CompressedData["
1:eJwt0L8rhVEcx/GT56LI9liVcgcWmyg/FpssBndzMZhEmW8sXIpFDBRmJSyi
sDBZXDL4BwxkITLczevpOcO7+7mfz+f5nvM9nbOLEwsNIYQUjegphNCNo6YQ
HvyvJyF8J7ku8g/4h9jFLe9TlvLbcUaf4gTbsiWdHTzTbfIWtGLYgR28CwcO
0kN4bc6/mdZ/pGuoxN6L3hpdRdHsLpRQkY3pX8kvMRr72fwb+TXekvyeK3oD
zu5HXyG/0zGvLJ/COL3Mm6NX4+wyb5Pewi9+UI3vkr1JPb7Ll991/gZm4px5
3h72cW+XO/TKJmXndBr1n7u+4wNPdqhhJO6R7f8P1c43dA==
"]]}]},
{RGBColor[0.6263393945261686, 0.6280153135461446, 0.9109239711790788],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtkrFLm1EUxZ95X15aO0mJ8GEXKYhrQREKbREpiEMh/gOi2DVKoUMdrP9A
BNMphSIuuqlDVaS4KQYiQhAklFK3UjqUYieJgr/DvcPLPbnvfuede+4dnFuY
rhZCCJOcyHnPzwqxSnzBRS/4JfEZJwfvFkO44bwGt8i94QyBj8gtpxAOwR2+
XQLvg9vg+WSc4v4CPgX/A/dE4xkgtwfeAl8RP3Pq4B3iNmcT/J34lLq34Bw8
FQ1PkFt1DZdF4xX/f+JQibd7QiiTr4GBoY/ax0XL677q/Vbg+Qn+Bn6UhfDB
+z2j9oT/z6n/nZkX8uSAfD/fz5DvZuaL6kcKxiXOxWi+SFuF/GU0f+RTx3HK
rE7168Trkmn4S8xdp/S2XMNxZjqEH1Jzm5mG0QchPHFP+oljrl9zaxfM5ybx
h78rLev+ruazBlcZXKZmODMPNas/JfP/F3HD59KQTz6vr9F61lvyTL7In/GC
eae8tEz47KSx4vPS3Gq+JxfRfFfvn5L5Ip31ZHeqOY+2K+pFPdV939TTndeI
b9jnIm8+JtMpve+S9aKdaron2uWWY+1jw3ucTfaeOLXLx+55N5m/6kX7mDvW
PnZ9FgNwvvLd0wzbziON97DTbh0=
"]], PolygonBox[CompressedData["
1:eJwtlllsVVUUho/33nNvJVKcB5SpRIaiQDRiRAVBionggy0mTIYCsVCUYgAT
KaKhdYBEE6UIRlADVUTUUCPDAwJGqEGN1AeKUguJiFPROoUSBcXvc++HL2fn
7L32sPZa/9r9Zi0or8kkSbINcvBKIUnWwxpYC6V0DoYtaZK8Da35JDkE5xcl
STfoz78SmAmzYD59D8E32B6HY9gehe7ZJCmGJ1jkcfiKMUfgOf49mw022m6j
/Sb7WAUbaPdgbDGspu/FfJjTuefSroaVtFfAOtZeD1uzwdY5ttO+HNvL4Bro
BRPY890wDspgGnubCvuw3Q8fwl6o4N8kqKBdDnWMrYf7WXM6lDN3BSxhzkdz
wSf6ZhM2b0AHNiehmL11hz8Y8ycc5V87rGXMS7CUOWvhEH2tueATfVNHux5e
Y8yr8C02J2A4aw6DGVAJnYz5JRfmcK7B/BsUxzj2Z2xPZsI/+zYydgPsgJ3Q
Ageh3b3BMOYYCovhEXgX23egk7V/hVL2NhiuZa4B2TDGsQNhEDTRtxXuYK4x
sA3b9+EUtl3QH5sSbRkzMB/O7NnP0U7w01TGTIGJtO+B8bTL4DFYBn9j+xes
8O5hD3Pvhv3QnAkxaCyWY1sBPzDm+3y4I+9KH+pL78i7ck3XPhh94Z15d57Z
s3sGzzINpsNIuAU2Y/MWvEe7CVZBAzzF3p6MMW1stzD/QTgAn9hmzs9hOdRl
go227tG9GsPG8nLG1oltWAK1aTiTZzOGjeWZtCthEX2L0+AzfWfMGrtnaZ+B
LjgNm80vqIP6bPCpvl0BK81xxmyBRngdquABWEDfw8Yte10Dp9hrFyylrxbu
ZS/lsIC+GmOJvmNwmjW64Fw2CMwHjN0F22EHDGXO671z7z6u2Rg1SC2qZM4Z
RSHHzfVKfDYDjmDTFmPK2DIGjAU1SW3KQBbaWHcTS++CY9ngU307mb4pUI3t
XNgIjX7Z8wYoZa9DYLG+hQb6Vqdhj+5VG237MUdfuAp6FoUcMVeMeWN/Dv+q
4hk8y5fYHo4xYWx8wdgW74Cxy+BSxlwCHezhJMw2pjNBM9SO4dgMg1GMGe1Z
OVMRHGFMG0yhPTnGoLGoZqqdaqBa+BNjfoQe/LsQMsx5HvRkzqsLQVPVVmPE
WKmNsTcGxqbBZ/rOO/fu72POSTEnzI3mmItXMMeV+RDzB+Kde/e/0/eb53RP
8CDtebAQFmVCjplrzfR9DDWsNR92829PLmiu2juevrvywWf67ml4xjrDHi+A
Eax1cyH4SF95Rs96Hf+GFELNsnYNhAFp8Km+ncicE/LBh/pSjVKrjqvB8B3/
TmRDTbI2qYFqoTbaqvFqfR/m6lsIe3Svap7aZ46YK8aUsXUra49MQ46Za+3w
dYwRY8WcM/fMcXPdHDKXjFFjdUfMJTVZbTZmjV01Uq3UB/rCHDPX7qQ91vih
PToNmq/2W6OsVYOilhvTxnY3a30+aILakI25tYd/e2Ef/z6CrdAEOf5l1XV8
dTgT7tC7nMUas+Es/87ADfy7MR/uzLv7h738m4Z/9jmnc39G+1NrPbbzcqFm
W7u9Q+9yDmesggZYnQ0xtDDWTGunGqQW+ebw7eEdepeeybNdjM1FMYfMpZ4x
l81Bc1GNUWuex+aFTKg51h41TW3zTJ7NPbrXXvGtYQ1sij7SV+aIuaJPWuOb
yLeRbwrfFr1Zo08acthc1oe5WGOsNWq4Wm5OmVv6UF+uY86XY023tqvJarM1
ydqkhqglarbabc6Ze2qAWtAU786cNDe9A+/CGmWtUvMaYk22NqsZaodvCt8W
O+Nbwhw1V30j+lbsRV9vGEH7JriNNW4vhDeWby01XC03BkfFGm+tr4xvG+90
TqxR1irfXL69fBPVxTN7djVL7Uqxzaehplpb1VS11ZipjjXJ2lTGXOPinXv3
2qRRA9QCc9bcVUPUkv7MVRI1Sq3qLIRaYk3pKARN/F8bCyG3/gOwgHHn
"]],
PolygonBox[CompressedData["
1:eJwtkD0LwVEUh493NgZKQiiZKGXxkm9gsBjlJSPlC/gK/ojyAfAd5GWRwW6h
LNgYDAwWz+0anv5Pv3vO/5x7I/VOuW0WETfYwOUQyZpEDlaRBzwhzUGTrKjO
8By0aPJSv8freANCEIQFGeXixysQx0t8N+Rb+PCfNwztIkvOXvjFIjLHe2RX
/AZ38hlZl+yEn2ECY4eeq+YbeBgPQQCqDE6QjegfQo3eAXVT3GPWe6n9ongM
CtTmwfu/o7qrQd6Ho03vru6w5h1W8LXr99nhGaee56M/iafgB+MBJ3E=
"]]}]},
{RGBColor[0.701017152600412, 0.7480016914642534, 0.9126263940525331],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxTTMoPymNiYGCQAWJmIF4BJPqBdCYbA8MtVgYGdSA7AahgPxA7A9nfgHQa
OwNDBSMDgzVQPpwJomYikHYC8quA4lVA+jI7xJxaoHn2UHFnoJgblA0SM2KF
mGMLFG+G2guy/wDUXpDZLEB3+APZt4Dse0wQ9jUgvQ/mHqDatUC2I5D9mhUi
B1ID0mcNNR9kz1GoerA+dogbQO6VYIOIg+RfQs0RBYr5AHE6kK3GDLEbZCYn
kF0ANRMUBupQNcrMEP+D3AwKs1g2iF9AfgIAru8oDw==
"]],
PolygonBox[CompressedData["
1:eJw1lm1ollUYx2+fzWdLaW7WlLSsqZCblkpZUR+yQAuyPjgL3AzcJs2mqZAK
5UvhrHTgoNpy+ZY4K0qhLZr2wTJIjV7I9UF7wc1IndpsK42MmtXvx3314fdw
OPd1znOf676u//+UVC+dvSSTJMkOyIUF/NTAl9kk+Qp+4eEFKM1JkjI4zrNj
BuYlySCYkp8kk2EFrISDPPsYDsMRWMhcLcyHKqhkTQU8OThJ6mAqe06B+VAF
bfAedMA++JA99sMS1i6FC7xTL2xmrgWOMz4GQ3g2FKrZuwqWs/cKuIvxnXAr
48lwnjXn4CrmhkAjbIIizjgcKvjPufACvAj3E3sfzIPHYRtshV3QCt+x9ls4
Cp1Qw39UQznjOdBEzKtwlnc8Bw3MbYRtxGyHH5j7HuqJWQ+LoA6WwjL4gtjP
4QB8BON5x3GwCBbDY8Q8CnfDPVBCzE1wNXsXwI3EjIHrYFQmPZNn2wSNsJaY
NbARGmAC3AxT2GMqPMuez+SmOTbXlTyrgId59ggMgwK4RMzvnpNxD5yALrjM
mj+gnWfv+y2Z2wdlzE2EoX472MPcXphEzET4i3f7GzoZH4Uu6IZZfOOHYAbM
hD/9D7joO8An7HUwm+bE3Cxkj1pogmaYRw4q4RBnOAwjiRkBN8AYqGePdTCX
vSvgesajIUtsHmxg7UvwD+N/4RDPPoU2aDf35tw8Mi6FfuiDn6HXOmHt17AO
6jNpzVq7OZCbn9aYtXaEM3yWTXNgLjZaO3CGvU/DW6x9275kzQQogbHmg9jL
OWkzD4J+6INVPFsNreyxK5vm2FzPJHYGDIdrYDl7Pg1vwE5oJ7Ytm/aAvfA8
PJeb1qy1+yNrTsIZ6IGtsCV62F6ezn/eCxneOQcmsmcZ7GG8FwrZaxg0s9dr
0EKONsPL8Io9xB7l8ADPHoQrrB2A2xjfDquJWQWz+Y9y+JU9++EDYjpgAdRA
F3Pdg9McmktzZK6+Ya7THiBmbSbtIXvpHWLezaYa1BFn9Kwr1Bb7mjXNMMde
h3r+ez2cZE13Ns2RubIGrIUBxldy0zN7dnvS3vQMnsUaspasOWvPM3m2qtBG
a9hazo1ascat9Z7IvTksjB5rD81Rexqj158idkk2rXFr3W/qt7WGrWVr0to0
h+bSM3pWz+TZrGlrW81Ve+1pe3tlaL81aC2qCWpDeeTGb+q3tcdGRk1am9ag
tTiemHGhmWqnGlwUGqfW2QP2gp6kN82M3p/Ef9wSGnMiNFgtbo5e3xK1WBXe
o+Y2hIYeCA3aHzVmrRXzXyNgB+PtUYPWYmtovR6kF6nZarcaoVZYA02hiWqj
Hlkanqa36aF6ad3/2j449b5W2B2akg3NnRCarXbrWXpXEWsLs6kH68V6oF6o
x+q1l0L7+kJr7HF7XY/Wq615a7+Fta9nUg1VSwtCuxeHl9jz9v6bzO2OHJgL
e2JNaN6G0Cy1y56xd46E1+up58PD6sMjt0XNW/vTeKc78lONVCt/Y4+LmfQb
+i2tAWtBD9gT7+C7jGbNKLgWivNTz9a7+0Lbxob2GWPssvBOe9Be1JP0Jj1R
b9SD9WI9TW8rjr29U3i38I7gXcE7ineV07zjqUzqUUNDE9SGAZ5dyUt7yt76
ifGpuAMcDc/Wu3eGlqrZard3Ju9Oepre5h3Bu4Kepre550B4mt6mZqqdepBe
VMteT4SmqW294S167tnwbL1bzZ0eOZ8WdzTvav8BN85MlA==
"]],
PolygonBox[CompressedData["
1:eJwtkD9LQmEUh0/3chWXSjNwCZSgCzkKOjmIoA1KkBoUCOpiLtoYgg32AfwW
OtWU0KZDfQL3hnSRBtPBKcHn8N7h4fw4f37vOW+s0blpWyISBgeKtkiTWPCJ
3KHv4Qqdh3Ovpj0fDGXQr8QVg3/w4BfpHojk0D14hg31NZz6TL/OfZH/hBra
JXdLfPP8lsRjeoMwx+8HWugBtRn6zNvB1Tq9C4iir8l9ow+pH0EC/yd2eSTW
mWtAzzY+VfpL6DKcQAgCtvFQrxQzSUj7jYd6xclfwoX3vu7xQr4PXcfcrfeP
2GEIv465R+8awztsyWXJTVRbRkfw/EfvLPMP+h9T+sroCuwBvpkvjQ==
"]]}]},
{RGBColor[0.7743632784474025, 0.850910402244579, 0.9087749497692412],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtkL1KQ1EQhDe5v1gYIYVtxEq4lSlE7O20ELQSkaggBFQQERSikEIJ2FnY
+wa+g4ggiI2trdhYGogYv2G3OOzsnjlnZnamc7h2UDezipNwisJspWb2lZp1
wKfgdmZWo3/mfgjpIzf7BR8xu+XMwnmg7nFGzM9TvxOnSx3w/gZOj7pfOO6D
ewjPw3kDjxL/v4LfAO+AW+jc5z6X/knmfuTrJ3fdu9S9yvMf9aI0W5Xn0vWk
Jc3v1OcT4OvQlb60hfvg15iPmc3BO4bfAn+GlrI+0jfhbMIdhDd5r2I/8tuN
7C/g3djJE/gy5tqfsiljM/Hd6X9lGsYe9Pc4vMnvO30Dzhncrcy9XZX+Xv8s
J55BfOVY4m4bziJ1qvS3k6X3mk+Tb6PuWZSpHbtdoK7HXPf/9RJDPA==
"]],
PolygonBox[CompressedData["
1:eJwtlWlszWkUh/9u7//eG0TpxBLrtGYSbQkVy8j4YEkwyZRkpiXRmlAVNYNK
KInoRDIXCQkJaSnVIRSZqRmVoD7QSiwJPrQhtkQRS4mtdmKJ55dzPjzJm3c5
57znPb/zpheV/rI4EgRBEqLQHg+C5/AYnsCpWBA0wXQWZ0BRShDMgRJY4Ghc
AZWQD3kwhTM/wR9hEPwOe6EWJmJjAsyC3+AyPi5BOWf+hKmQCzOhAP7Fxj/w
mT1foJq5HXAI6uEwa/UxsynbA6B/1Oa0to8ztVADf8M6zqyFjbAJrjN3DZqh
BXpxtqfbkK0vJOczjMDWSFjDXBKqYSe8Y+2t79He+3APOrG3MxzDx1G4DXc8
5kM+p7U2eABdsdUNtnKmMmYxKJa+iSDoA92hR8JyXOE5qHabt92GbMmGbMmG
bI1l/GPUcqhcJrnjXzATWwUwEDLch3zlwDBYDitgODZz/M319sex1QClrC2B
JsaNcBbOQQs0QyvcgmLefC7k4TMfRnNmlPuQr9fMvfKaa/eaU+21wUO4io0r
0IFxBI6S2yPQCE3QlblUeM2eN3CcuQZox+eL0Gqq3GtStfmMtaeQxTgbLnD2
PJyAk1DG2jLYBbsj5lO+m/1u5cS8KmExKbZScroY7rLnHnSEqR2oYXjkOVAu
FKNizePsr1DGeDlkQDp0IdbU0O6gu6T72gp/i0zIgkXEtNBjLPMcNHoNqhYz
sTEIcjg7PG4alBZzXVu7/W732fMgNE1JW+/hAxxgbT/8B//DXmLZ42+utz/M
nnp4ydor2MbcQO6aCk/wU8haQdw0L+0Pg6GhzRV6DagWfuYuuQm7s+7+A3Nj
oAGOQTa2BsM05VNn2JMfms+X/sZ664PM1cEAxt/CAmyWwBwoStib3PUeo14j
n/I9CSYn7I66azd8pcUsBsUy1GNv8d6gGlGt9CeH/VJM49K6NC6t17F2MG4+
5Xs94w1eUyf8TrpbFWyDzbAFBmMjO2J30F0qoUL5gsLQ7qS79YY+EbMp2ztZ
q3E0lqaT3uNq3EeVx1TnPVC9cB42iqGVM7dcI9KKNCVtqSeoN6xST4Yb3O0j
/8InWB21mBV7D/b2jFgNqZZUM6od9Uj1ytPsOeM2ZEs1r9rXG+otk4zXwCbW
NkIaZ79RH8XHbGppKWTGrUerV0tj0lqCs3GvcdV6Z2x0giiECdOUtFXhufwe
m9+5ZqSdAv9b9AfoL1CMp72mVduqAdWCeoR6hf686d5Dx3rPr3ZNSBvSmLQ2
Dt/jYWXUtCBNPIxZj1SvVI9Ur7wYs1wqp8VRi1mx64/VX6uelOU9V71Xb6S3
qiKW7bpLaLlRjobgt2/ceo16TorXjGpHmpF2WuGm/3HXvae2+Vyra/6992D1
4hJ8zPcaUa1kee/J8L9CmpQ2pQFpQW+W5jlWrr8CL+MWMQ==
"]],
PolygonBox[{{1118, 1117, 1735, 251, 1125}, {1815, 352, 1277, 2102,
2103}, {2181, 2180, 1312, 371, 1374}, {2062, 271, 1750, 2059,
2060}, {2070, 2069, 1772, 271, 2064}, {2099, 334, 1263, 2172,
2173}, {1278, 333, 1820, 1287, 1288}, {2183, 371, 1316, 1379,
1380}, {1223, 1222, 1257, 333, 1799}, {2119, 2118, 1837, 352,
2107}, {2113, 2112, 1283, 334, 2175}, {1147, 251, 1754, 1156,
1157}}]}]},
{RGBColor[0.8414289736572247, 0.8732750245683226, 0.8787295784149984],
EdgeForm[None],
GraphicsGroupBox[{
PolygonBox[{{539, 2, 544}, {544, 2, 1453}, {666, 41, 1503}, {1503, 41,
613}, {613, 41, 616}, {1453, 2, 556}}], PolygonBox[CompressedData["
1:eJwtlV1olmUYxx/e9fq8gctNwy3IrMwgZ6BbZU47KIMsUCNyBntVmClMK+2g
KVTTgzZHBQ6KraSpRTND+5rQnAfpAkuok0bRx0GW+LEsK3N9eTD7/bqvgx/c
3Pf9XM99X9f/+t83tGx86IlClmXPwxXQVZFl22EHdMNXeZZ9Ce2Mt8LaYpY9
CsuZa4LLfDQOJeauhJPs+RHOwihsZk8b9LDWCysZl2ED48eKKaaxl0MT9EIP
vAZ9cE8py+6GrbANmvw3dDDuhNWMV8F2xl3wIrFfgF3M7YZqxlXwJ2f8C9YQ
swVaYT0cnJBlA7CItXthgLkPYBAOwW3EbIBnoR1G2PMFnIAf4BqohelwPVzg
X7/DL3Ae6vlmLmyGLXCYPUOwifGT8A3jr6HA3gq4i/FC2M+ZDsDHMAwrmHsE
PmfPZ/ARHIHJzFVDL3tecS/jo/ApHIdd0AdvQj+sJCdlWMa3D8IUvpkMvyKC
3+Bt2AfvwfuF9M8VcSbPtoYzt5RSjs11FbEmwXzGjVDD2lSogmooQ7P5U0Pw
BjFfhzN8czZqZK2eY60jT3f27uNqC16Gl4zLN7UwiVhXwUSohAlQLKUcmSvF
/Dg8BW2FVBNrY42ttZpVu0v4Zik0wnyoYa4WLsG/MKZm8qQZtXMj4xl5qrm1
V1Nq63jkOmdcMjaxHi4lzav91aytgrWwDg4yNwAXOdsYXA1TYCbcDLPIxS1Q
z54GuIlYM+BamAZ3wrzQlNpaDPfBAlhYSjW1tvaIvWIMY9lD9tJc5uYUUw/a
i/ZkT2hCbahBtajGR6InFsUdvMt3rH3rOozAM8w9DR3QCT/DufAEvcEetVft
UXu1P7RoD9gLak7t1dFrsyuSh5QiB+ZiPd+2hubUnhpTa97Bu9hD9pKaV/sj
cTZ7xF45Ad/HmT17HXtnRU7NrTWzdufi7GpuPDRwKTShNuZF7hs4Y314iF7S
FlpT02p7XdTanJgbNaN27BF7ZVrU0h6piZotCA02hiaXRE0Xh6fpbXqu3rst
vFBP0pveJfY7sBfegjvQ+O1wjPEnedLUzOgJe+NIeMchGMqTR+vVeohe0hfe
qwfqhe3hfXqUXnU+vG0UfsqTRw6G5+v9m/j3RjjF2ml4gPH9sJS1ZRWpp8bC
I/XKyujlYvSyZz4WPWKv6BF6xb7wpqZ4K4xpbGMauxnKcCtzs+E6xtPhH775
G8bhciHlyFzthj15mnPNnJk7z3wq3jzfvjOsnYaJrFXCTuZeDU/Smw6zNgQX
OOMfxZST0dCc2uuOt9ScmJtB9n4IR2G4kDyyKjxNbzOGsdwzGB6sF+vRenU5
7uob3RVvWGu8mb6d3fxzR548RW/RU/XW5vDizujVvngbhuMs5shceUfvqqbU
1pZ4u+wZe8c327e7H/YWk4ddjBz8n4vQljWwFtbAWphDc2mP10UP2Ut7ohbm
dGe8Eb4Veqhe6pvm21Ybb+1/1NQb0g==
"]]}]},
{RGBColor[0.908494668867047, 0.8956396468920663, 0.8486842070607559],
EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtkCFPQ0EQhPe9e+9OIQgKBSRYBB4SgsSUNKRBFMMPAEUQCBwYPDh0oYKk
okkdeAqtqsRAPZCQovpt5sRkdvdudnZ37fi0eVKa2ToI4KcwOwMzsBfNLqi1
ePgnvwZ/oB1Ub8Dv5J/EQ/ijMtuCx3AXPqD+AK+Sj4iX4WfMdon78ErQnw18
jpJ8N2ticEV8C3/X+j/g/xPYIe6U6uU979De15rtJknj2vMkD9d6j69SXu45
znOGpN18l8ug3OuTSh7uNUXbyj33k+Cxz9jIWr/TQlR/9zmsdJMXaou5p99m
Kaqn7zHIs/3Cvahd/E7dKO028Wuh+hvcKaR9LPTmf9xnDlk5Oq8=
"]],
PolygonBox[CompressedData["
1:eJwtlElsTVEch8+9fa/vFjVFohsLIRZYISKNlVhYWQg7iUTDohHDRiyksdF0
2YVEIlFV2tqYWkNrqhqq6EapmVJjUTShEdPzfTkWv+Q75/7POf/xzly/ZdXm
NISwGuXQ5HwIn5MQxrM5qxBCK2phfQQdg4dKQrgBX0cdcD97HfBF9BjelYUw
jrMjrJfBTXAr3Iy2w2Xc/wn+gIo82MmZk3A76oIrOTMMf0RL4Ur2JqTRJ31b
wN4r+D1aAu/jexN8GDXCRWxP6Cv6AfexdyaJPuqrPuprFxqEh9EV+Boagd+g
bjjH2a2l0Qd9+YJWZDEn5uYd6zH8r2NvIutvrNfhXw3rjPVb1ovgXmyG4Jeo
G97GXp7vg6zPsd6IBuC7noer+P4XDthUw2vQb9aTWNcUYs7N/VXUBu9Fl+BO
VA2vxf6PucJ+N/Z70IEk5shc+YZv3UHLczFn5s4aW+tm9p7BT1BDLtbE2phD
c2kOzMUoWgnvQKVprIm1mY8PbfBRc8Z+BWpMog/6soEcjSUxZ+auCvuzrE+h
hXA7Nsfh06gHnoZdA7wf1RdizMZ+2T14MTVK/9fc2nvGs+75zRpba2tsrWuJ
6RH8AO2E67njgrVAdXA5Pt2D75vzLPqkb8ZkbPasvfvaHoVLselP4hnPzkBP
4edoNjwFPXQ20PQs1shaGbOx2wP2gjk398ZkbNbU2tpT9lY58dRm0Wd9t2fs
HYf3EHwQzYGnsncbvumMlETJzqyzO5f7viZxBp1Fz3jWHJtrYzZ2fdb3eehF
EmtsrZ1hZ9k3fdset9edeWffmI3dM579Ts574VvoJzyAzidxxpy1UdSTRBtt
tdG2z3oWYs/b+/a0vV3BuiyN/wj/FS3EUIR/oU35OMPOsnd6tzk399bE2mTs
FdI4k86mM+6s2wP2gj1v79sj9or/GP81vunbzrCz7Aw7y/aAveCd3v0PLobM
YA==
"]], PolygonBox[CompressedData["
1:eJwtkTtLA1EQheduknULAz4aW1vBQtJJCgnWFqKptDHYBa0khRCrxBT+ADvB
xndEUqmVtkZNhIB/QFIFX0mMD9RvmC0OM+fsmbnn3h1dWp1d8URkBMTARkRk
nRpBvHQijT6RJh+m0A7ge2CXb+O+yBzaMfwMnON7jIok6Z9AgCcfiDxTT+BH
znYMM1fGuw8/dLYjjraFtgn/Ar8gw2yWc7/pP8EaWMQzzRl1+ntQZ7bC7Aze
V/iHsx1pfCm0Fv1bOJtA+wNV+jvNqNmZzaEV4R3wA+YD8+rMO3gBY+SYiJmm
+/q50ySeHrUMd9QU+66oXfI1wzfQtxjEt+1b1lv4DRiKWkbN2gNdsMz+Em9/
4ezt9R8swAv4BjzzqX8H37Vv+WvwB+CTuQjint1D75PG1w5zab5TtAq7/gFI
MkfZ
"]]}]}}, {{},
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{1936, 532, 550, 622, 630, 674, 1511, 681, 688, 1555, 751,
812, 819, 867, 874, 919, 925, 946, 952, 994, 1000, 1042, 1688, 1049,
1056, 1715, 1092, 1119, 1126, 1148, 1158, 1182, 1189, 1210, 2161,
1217, 1224, 1800, 1259, 1279, 1289, 1322, 1843, 2114, 2176, 2100,
2174, 1240, 1795, 1234, 1248, 1809, 1270, 1827, 1296, 1850, 1329,
1885, 1388, 1446}],
LineBox[{2154, 2147, 1932, 1439, 1925, 2140, 1918, 2133, 1911, 1431,
1373, 1872, 1366, 2182, 1375, 2184, 1381, 1878, 2126, 2120, 2108,
2106, 1816, 2104, 2098, 2168, 2091, 2084, 2077, 2071, 2065, 2063,
2061, 2054, 1730, 1112, 1085, 1708, 2047, 2042, 2037, 2033, 2029,
2025, 2015, 2010, 2002, 1996, 1983, 1977, 1581, 799, 742, 1549, 1966,
1959, 1952, 1946, 1940, 536}],
LineBox[{1522, 698, 756, 1971, 1990, 1590, 767, 760, 705, 695, 1522}],
LineBox[{1610, 854, 895, 2005, 2021, 1648, 912, 904, 860, 847,
1610}]},
"0.07`"],
Annotation[#, 0.07, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{556, 1453, 544, 539}],
LineBox[{616, 613, 1503, 666}],
LineBox[{535, 1939, 1945, 1951, 1958, 1965, 1548, 741, 798, 1580,
1976, 1982, 1995, 2001, 2009, 2014, 2024, 2028, 2032, 2036, 2041,
2046, 1707, 1084, 1111, 1729, 2053, 2060, 2062, 2064, 2070, 2076,
2083, 2090, 2167, 2097, 2103, 1815, 2105, 2107, 2119, 2125, 1877,
1380, 2183, 1374, 2181, 1365, 1871, 1372, 1430, 1910, 2132, 1917,
2139, 1924, 1438, 1931, 2146, 2153}],
LineBox[{1445, 1387, 1884, 1328, 1849, 1295, 1826, 1269, 1808, 1247,
1233, 1794, 1239, 2173, 2099, 2175, 2113, 1842, 1321, 1288, 1278,
1258, 1799, 1223, 1216, 2160, 1209, 1188, 1181, 1157, 1147, 1125,
1118, 1091, 1714, 1055, 1048, 1687, 1041, 999, 993, 951, 945, 924,
918, 873, 866, 818, 811, 750, 1554, 687, 680, 1510, 673, 629, 621,
549, 531, 1935}],
LineBox[{1521, 697, 755, 1970, 1989, 1589, 766, 759, 704, 694, 1521}],
LineBox[{1609, 853, 894, 2004, 2020, 1647, 911, 903, 859, 846,
1609}]},
"0.06`"],
Annotation[#, 0.06, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{604, 1477, 598, 597}],
LineBox[{838, 787, 1568, 783}], LineBox[{1335, 1331, 1890, 1397}],
LineBox[{1411, 1896, 1406, 1418}],
LineBox[{534, 1938, 1944, 1950, 1957, 1964, 1547, 740, 797, 1579,
1975, 1981, 1994, 2000, 2008, 2013, 2023, 2027, 2031, 2035, 2040,
2045, 1706, 1083, 1110, 1728, 2052, 2059, 1750, 1146, 1768, 1172,
1202, 1783, 1176, 1772, 2069, 2075, 2082, 2089, 2166, 2096, 2102,
1277, 1833, 1312, 2180, 1364, 1870, 1371, 1429, 1909, 2131, 1916,
2138, 1923, 1437, 1930, 2145, 2152}], LineBox[{538, 543, 1452, 555}],
LineBox[{615, 612, 1502, 665}],
LineBox[{1444, 1386, 1883, 1327, 1848, 1294, 1825, 1268, 1807, 1246,
1232, 1793, 1238, 2172, 1263, 1802, 1257, 1222, 1215, 2159, 1208,
1187, 1180, 1156, 1754, 1152, 1759, 1136, 1131, 1740, 1124, 1735,
1117, 1090, 1713, 1054, 1047, 1686, 1040, 998, 992, 950, 944, 923,
917, 872, 865, 817, 810, 749, 1553, 686, 679, 1509, 672, 628, 620,
548, 530, 1934}], LineBox[{1489, 643, 719, 1535, 648, 638, 1489}],
LineBox[{1520, 696, 754, 1969, 1988, 1588, 765, 758, 703, 693, 1520}],
LineBox[{1608, 852, 893, 2003, 2019, 1646, 910, 902, 858, 845,
1608}], LineBox[{1674, 1019, 1068, 1699, 1025, 1016, 1674}],
LineBox[{1287, 1820, 1283, 2112, 1841, 1320, 1287}],
LineBox[{1316, 1837, 2118, 2124, 1876, 1379, 1316}]},
"0.05`"],
Annotation[#, 0.05, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{533, 1937, 1943, 1949, 1956, 1963, 1546, 739, 1575, 803,
1607, 851, 1629, 899, 936, 1641, 2018, 1645, 909, 901, 857, 1612,
806, 1578, 1974, 1980, 1993, 1999, 2007, 2012, 2022, 2026, 2030,
2034, 2039, 2044, 1705, 1082, 1109, 1727, 2051, 2058, 1749, 1145,
1767, 1171, 1201, 1782, 1175, 1771, 2068, 2074, 2081, 2088, 2165,
2095, 2101, 1276, 1832, 1311, 2179, 1363, 1869, 1370, 1428, 1908,
2130, 1915, 2137, 1922, 1436, 1929, 2144, 2151}],
LineBox[{537, 542, 1451, 554}],
LineBox[{596, 1472, 599, 657, 1498, 608, 1476, 603}],
LineBox[{614, 611, 1501, 664}],
LineBox[{782, 734, 726, 1540, 730, 777, 786, 837}],
LineBox[{1334, 1853, 1330, 1339, 1894, 1392, 1889, 1396}],
LineBox[{1410, 1402, 1346, 1859, 1343, 1350, 1405, 1417}],
LineBox[{1443, 1385, 1882, 1326, 1847, 1293, 1824, 1267, 1806, 1245,
1231, 1792, 1237, 2171, 1262, 1801, 1256, 1221, 1214, 2158, 1207,
1186, 1179, 1155, 1753, 1151, 1758, 1135, 1130, 1739, 1123, 1734,
1116, 1089, 1712, 1053, 1046, 1685, 1039, 997, 991, 949, 943, 922,
916, 871, 864, 816, 809, 748, 1552, 745, 1557, 753, 1968, 1987, 1587,
764, 1560, 709, 702, 1526, 692, 1519, 685, 1515, 678, 1508, 671,
627, 619, 547, 529, 1933}],
LineBox[{1488, 642, 718, 1534, 647, 637, 1488}],
LineBox[{1673, 1018, 1067, 1698, 1024, 1015, 1673}],
LineBox[{1286, 1819, 1282, 2111, 1840, 1319, 1286}],
LineBox[{1315, 1836, 2117, 2123, 1875, 1378, 1315}]},
"0.04`"],
Annotation[#, 0.04, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4], LineBox[{577, 1463, 574, 573}],
LineBox[{1011, 1008, 1693, 1064}], LineBox[CompressedData["
1:eJwNzy1LA1AUgOHjx9QwXZlYJuKShiEYzP4Cg00M4oKo4AaLCxP8C65oECYM
ZAgLikUsMouCacEw0xZkogzBtKBPeHnOPbfcu5gvbhZGImJDy6MRjUTEPK+Y
5aFKulDXrs4+r/nNG/7ygS3NTUQMucrHyYimBs5p5w+m+MmlsYgV7WhPp9p1
d8aabnWvY7seZ8YjquZZZtQ0r3NbT+Y8n3nAgt7NFb7xhOeq6U5HU97LobsW
X/Slsn2bf/av7Gja+3+4wKR/rjHHLe7zUv/5GC6F
"]],
LineBox[{595, 1471, 590, 1469, 593, 654, 1494, 656, 1497, 607, 1475,
602}], LineBox[CompressedData["
1:eJwVzyFLQ3EUhvHj1OkwCsIQRAUnFrtfwKIIuyxsMBgsiEEUNoPYHAaDaYMZ
tBkmBrGYBKumJTHoEDQY1mdZ8bfw8LznPYc/9y5VD5ODsYjYwWUqojcZUeUX
bk9FXOMGd8ikI37scrw8HrHJCZe5wR3syd9u9/nCfIYitswrvMaP9k94RRfv
+ETN7t7NB74wMxHR0v3ZDXErb+gKeJZT074Jb/Kx7peb/ICB3OY+z7rJYhGr
OMI65kbvupn3rwto6BLe1pe4hbqc159wkU/5Sn/OFfMu/gGI1SpO
"]],
LineBox[{781, 733, 725, 1539, 729, 776, 785, 836}],
LineBox[{1333, 1852, 1301, 1830, 1299, 1305, 1855, 1338, 1893, 1391,
1888, 1395}],
LineBox[{1409, 1401, 1345, 1858, 1342, 1349, 1404, 1416}],
LineBox[{1456, 564, 633, 1484, 567, 561, 1456}],
LineBox[{1487, 641, 717, 1533, 646, 636, 1487}],
LineBox[{1529, 715, 769, 1563, 721, 712, 1529}],
LineBox[{1571, 793, 842, 1603, 796, 790, 1571}],
LineBox[{1617, 880, 927, 1636, 885, 878, 1617}],
LineBox[{1658, 977, 1021, 1677, 979, 974, 1658}],
LineBox[{1662, 984, 1030, 1682, 988, 982, 1662}],
LineBox[{1672, 1017, 1066, 1697, 1023, 1014, 1672}],
LineBox[{1285, 1818, 1281, 2110, 1839, 1318, 1285}],
LineBox[{1314, 1835, 2116, 2122, 1874, 1377, 1314}]},
"0.03`"],
Annotation[#, 0.03, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{594, 1470, 589, 1468, 592, 653, 1493, 655, 1496, 606, 1474,
601}], LineBox[{1063, 1692, 1061, 1694, 1065, 1696, 1022, 1013, 1671,
1007, 1670, 1010}], LineBox[CompressedData["
1:eJwNzz9LQmEYh+Gn7B8UTdJSCE41ZOHQ7BewpSkagoSwwIrGBoe+RQ2CghAR
NBgt0RK6GDg5NNSkgyQ1BLY4RNdwc73nd87wnnThbOd0IiLyWpuMuJ2OWOEN
0zzWuSrq2er85B2/2eCIz2xqaSZizCxfZiM2mUlE/NoGWvQ85KptQ/vath2y
pCtV9aAn9TVUcipiWfe+zXFPLecDtnnEE304l/nGS16rqkeV5tyTY++afNWX
Luxd/tk7fNeCu/8wxXn/t8V17rLImv4BW3YtWA==
"]],
LineBox[{572, 1460, 575, 1486, 640, 716, 1532, 645, 1490, 580, 1462,
576}], LineBox[CompressedData["
1:eJwNz79LglEUgOFj9kOClkCQIETQaGmV/oGmGjIHA6lUiAbBoIZo06nBKcGG
2hqCkHBxClptanKKCHJoaG9q6hke3nPPvfBprnG610pExA43MxEfcxF1HWt/
IeKOex5JzUdM3RU0l4zY0pJWtaMPnJi/vG1q1/lID7RCnnXnkftnXnmjZtdz
N+CJdz5ZnI1YosgmZV68TaT8FibmC7tvvdYhv+a+/uiyNxmyrHHOBmnf/PNm
xX9cpWNX0m37fe1xZt61v9SKtvXW/koPnY/5B1raJms=
"]],
LineBox[{780, 732, 724, 1538, 728, 775, 784, 835}],
LineBox[{1332, 1851, 1300, 1829, 1298, 1304, 1854, 1337, 1892, 1390,
1887, 1394}],
LineBox[{1408, 1400, 1344, 1857, 1341, 1348, 1403, 1415}],
LineBox[{1455, 563, 632, 1483, 566, 560, 1455}],
LineBox[{1466, 585, 651, 1492, 587, 583, 1466}],
LineBox[{1528, 714, 768, 1562, 720, 711, 1528}],
LineBox[{1570, 792, 841, 1602, 795, 789, 1570}],
LineBox[{1591, 824, 882, 1620, 827, 823, 1591}],
LineBox[{1598, 833, 889, 1624, 840, 831, 1598}],
LineBox[{1616, 879, 926, 1635, 884, 877, 1616}],
LineBox[{1652, 960, 1004, 1666, 962, 958, 1652}],
LineBox[{1654, 966, 1006, 1668, 968, 964, 1654}],
LineBox[{1657, 976, 1020, 1676, 978, 973, 1657}],
LineBox[{1661, 983, 1029, 1681, 987, 981, 1661}],
LineBox[{1678, 1027, 1074, 1702, 1032, 1026, 1678}],
LineBox[{1723, 1103, 1141, 1745, 1105, 1101, 1723}],
LineBox[{1763, 1165, 1197, 1778, 1167, 1163, 1763}],
LineBox[{1797, 1252, 1272, 1811, 1254, 1250, 1797}],
LineBox[{1817, 1284, 1317, 1838, 2109, 1280, 1817}],
LineBox[{1834, 1313, 1376, 1873, 2121, 2115, 1834}],
LineBox[{1862, 1353, 1413, 1899, 1355, 1352, 1862}]},
"0.02`"],
Annotation[#, 0.02, "Tooltip"]& ],
TagBox[
TooltipBox[
{GrayLevel[0], Opacity[0.4],
LineBox[{571, 1459, 569, 1458, 570, 635, 639, 1530, 710, 1527, 713,
1561, 761, 706, 699, 1523, 689, 1516, 682, 1512, 675, 1505, 668, 624,
1480, 623, 1481, 558, 557, 551}],
LineBox[{581, 1464, 578, 1461, 579, 644, 649, 1536, 722, 1531, 723,
770, 1564, 771, 1565, 772, 1566, 773, 774, 1596, 830, 1595, 829,
1594, 828, 1593, 825, 1592, 826, 1619, 881, 1618, 883, 1634, 930,
953, 956, 1664, 1001, 1043, 1050, 1709, 1086, 1113, 1731, 1120, 1736,
1127, 1132, 1755, 1159, 1773, 1183, 1204, 2155, 1211, 1785, 1218,
1788, 1225, 1789, 1228, 1242, 1803, 1264, 1821, 1290, 1844, 1323,
1879, 1382, 1440}],
LineBox[{588, 1467, 591, 652, 658, 1537, 727, 1567, 778, 1597, 832,
1622, 890, 932, 1638, 891, 1623, 839, 1599, 834}],
LineBox[{661, 660, 735, 1542, 667, 1504, 1953, 1960, 1543, 736, 1572,
800, 1604, 848, 1626, 896, 933, 937, 1659, 972, 1656, 975, 1675,
1012, 971, 969, 1655, 970, 1669, 1009}],
LineBox[{779, 731, 1541, 659, 1495, 605, 1473, 600}],
LineBox[{1059, 1690, 1057, 1689, 1058, 1716, 1093, 1137, 1741, 1095,
1717, 1094}],
LineBox[{1096, 1718, 1062, 1691, 1060, 1069, 1097, 1719, 1071, 1695,
1070, 1072, 1720, 1098, 1742, 1138, 1760, 1160, 1192, 1775, 1161,
1761, 1139, 1743, 1099, 1721, 1075, 1700, 1073, 1701, 1031, 1679,
1028, 1680, 1033, 1036, 1076, 1703, 1077, 1079, 1106, 1724, 2048,
2055, 1746, 1142, 1764, 1168, 1198, 1779, 1203, 1784, 2078, 2085,
2162, 2092, 1812, 1273, 1831, 1308, 1866, 1367, 1425, 1905, 2127,
1912, 2134, 1919, 1433, 1926, 2141, 2148}],
LineBox[{1190, 1774, 1191, 1241}],
LineBox[{1302, 1828, 1297, 1303, 1336, 1856, 1340, 1860, 1347, 1861,
1351, 1863, 1354, 1356, 1900, 1419, 1898, 1412, 1897, 1414}],
LineBox[{1393, 1886, 1389, 1891, 1398, 1895, 1399, 1407}],
LineBox[{1420, 1901, 1358, 1864, 1357, 1865, 1359, 1360, 1903, 1421,
1902, 1422}], LineBox[{1424, 1904, 1423, 1432}],
LineBox[{562, 1454, 559, 1457, 565, 568, 1485, 634, 1482, 631, 562}],
LineBox[{584, 1465, 582, 586, 1491, 650, 584}],
LineBox[{791, 1569, 788, 794, 1601, 844, 1625, 892, 843, 1600, 791}],
LineBox[{1582, 820, 868, 1614, 875, 1615, 822, 821, 1584, 1984,
1582}], LineBox[{1621, 887, 931, 1637, 888, 886, 1621}],
LineBox[{1630, 906, 1642, 938, 980, 1660, 940, 1649, 913, 905, 1630}],
LineBox[{959, 1651, 957, 961, 1665, 1003, 959}],
LineBox[{965, 1653, 963, 967, 1667, 1005, 965}],
LineBox[{1102, 1722, 1100, 1104, 1744, 1140, 1102}],
LineBox[{1164, 1762, 1162, 1166, 1777, 1196, 1164}],
LineBox[{1776, 1194, 1255, 1798, 1195, 1193, 1776}],
LineBox[{1251, 1796, 1249, 1253, 1810, 1271, 1251}]},
"0.01`"],
Annotation[#, 0.01, "Tooltip"]& ], {}, {}, {}}}],
AspectRatio->1,
Frame->True,
PlotRange->{{1., 21.}, {1., 21.}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02],
Scaled[0.02]}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwA+IrMuwN2ye+dGy7yrzqMpDOc9SezDLppSPfmYQ7bEDa
bve8KFMgXTPd1dkMSGfE7ZeNAdKpKyqU6oE01+Ty2Y1AWj71PG8TkGYJXXBn
OZAuL5flXwmkecqbXq0C0i4XrD5tBtImJ9xnbAXSzK+/MG0D0jv2tIvcA6nj
7NpRPvWlY1yzdJ7HtJeO896xfVWb8dKxV/OkpgOIzrcNA9FP5nttdQXSZ7p8
EwuA9MIFPuxlQDrE0ilow+uXjuG/psRsBtJqspbbPRleOZpoq/SfMH/lGKP0
4q+l7SvHZ8VLGnbYvXL0agyJ3Q2k3zQz/9kHpH/vVdPfD6RFk1fVg2h7fqay
O/6vHI0i7z2/C6Q199uqsga8cuTsvmXJCaRTAkyduYF0DI94FQ+QvqJ35DCI
1lQ+FG0KpP38TrKHAGmO9OR3UUDaWyHcORpIqxw96XgZSG/nPn/5CpA2mXKF
9w6Qvpb0JPQfkJa6wpm9OPyVo511cHRV1CvHB5YLk4SiXzkuzwqUUwDSLKv8
3nsA6eeFYfLeQHr9tPYbPkD6GYew4Usg3ZS0zUc05pXjCo+dok8SXznOm3z/
AksSkG9y59+enFeOAP3Z8J4=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ArrayPlot", "[",
RowBox[{
RowBox[{"linkageIndex21", "[", "1", "]"}], ",",
RowBox[{"PlotRange", "\[Rule]",
RowBox[{"{",
RowBox[{"0", ",", "0.1"}], "}"}]}], ",",
RowBox[{"ClippingStyle", "\[Rule]", "Red"}], ",",
RowBox[{"FrameTicks", "\[Rule]", "Automatic"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431840580435316*^9, 3.43184066666511*^9}, {
3.431840722243815*^9, 3.431840739209882*^9}}],
Cell[BoxData[
GraphicsBox[RasterBox[CompressedData["
1:eJytm3tUznkex8N2Ucm925KYJLeQNimtzLSsGJcklzwaEY1a14kpykRyWRSn
xi1ql0WF0oRMR24hDSqtoRSi63P5fVU0SbHPmePznLPP54/3c85u53Rep14H
PXo/3/P5fj6f38DA1T5BXfT09Pp+/vyD+tNw3lcVtz6IidrU+/3jzcROjevD
nqu/1ib52L0rmgaqv9Ym+Yk758yscxeM5Od6u75YF1vOSD654EPl4SuCkXzT
vgyzS08FI3nZJ7fJJ54IRvL3CsLXfzlKMJJ3DEhr8CoRjOTDjL4eEm+sZCTv
ezonZkmUxEg+3TT+q4VRgpF83rL6kOePBSP5uE1TTa+HKBk1Pnva7fWFgpG8
c/frce4dgpH8P96rIhe1CkbytTt+rtv+STCST1m8O7+kUWIk/9/U/lB/Pzcg
KLlPJedn7xcU7bNl80tG8uP6ZgTHnGpgJG9stVNUj6tiJF+weGJ6a7Ockfzs
jgVz/lVXx0h+a6G+1+IvFIzk82NtPJNWCUbyj/N6BzilCEbyq11Lw8yOCUby
y17Ne5HpKWck3+NahPxHXyUjeZch38QX16kYyT9dXpCQ4SoYyXveyPkuPksw
kvfSb3ibonrEqHM+gG8a3nZ19sASRl3/PMpviZXR8rgoJSP5mY7ZJ8IG1TCS
73rBYkg3ZxUj+eG2tQ591P+eNsm7+bSVTrosGMlbLLzWsqhBYiRvN8MgYmSV
xKj5+bYZbrjdLhjJB6Q4HfvtnWAk39vZvL2z+rzQpub/b6ssu9paMJI3sblr
P1J93mqT/MZVuwacLheM5L2nHV7+vfq80yb5wK9HVIYKwUj+VPWgQs9QOSP5
ETX+53oefMZI/mTR5Go3DyXj/yu/6Pz1G/6x32/fSozkXy3q5FGfJjGS//sn
m7zlZ1SM5Dt5r+jW9Z8SI/kNZs3RYbsFI/mxhcZb7t6RGMnrV8wq7hQkGDWv
765FTIg6j9okb2zZpe16D8FIfsqujdbGzYKR/Pal+oa3PQUjeccE1+IhZYKR
/MyInKhyUxUj+b7v7k34Yadg1Ly+DyVnPr4WjORzfELi3rjUMpJPTTsamhL5
nFHX/P2v+UX1wwC/j/JZpwQj+codqf42exoYyd93CZxif0EwkjcqC2xptBWM
5I+Uep82rROM5NfWFfjfylUxkt+W/GjaawvBSL7jiNOX59T1sDbJD0rpvOtD
hWAk3z/Z2/yvtYJR8/och20baq1iJP+Tfulga/V5pk3yVrbPd60zFozkH6Uv
8LSzlxjJb6o/Fmuh/n1qk/wdO+/js8uzGXXND8ovOn/R34/q3xcDi6M3PhKM
5BMD5o42jZUYydtFWh+akCsYyZ/aMnqJZYvESD7P+LuWHf0EoyafJj2WuFkK
RvImeS51ie4KRvJLLWVdvNTvB22Sn3q1tSz4Z4mR/OgTB9e2VApG8hGBBvMj
lgpG8o1LZy2YUSwYyX+fm5aRelbFSD7jZUijxwzBSH7F+BvRhvWCUdd8oPyi
8xfVD6j+Rfc3jzcVZy9OEIya/MReujmnSTCSr03YWBrzVjCSLww6VrjmoWAk
X+yTbxFuo2Ak/6ecMZuvqs8DbZI/lPTW0kd93mqT/AizkW2PfxWM5BOzVuqb
t9Qzavw3blERLoJR8/rvFfRZtFkwkk9e6R0oNghG8l0Nsvav+aWSkfzN4+Ed
9QfkjLrmD+UXnb+ofkD1L7q/of7DjR+i9QwGCkbyJjEtqTPvCkbyqiDHP7pl
CEbyvUaFKQ49EYzkS1LW7h0VrGAkP6BP78z+JwUj+aNPeu15WCQYya+5lm0d
3KJiJH+locL3/I8qRvKrey45YmQnMZK3zmvTe+YnMZK321DmdfGpYCTvc37L
Vrl5OaOu+UP5Recvqh9Q/Yvub6j/gPpnBlWjLyQsF4zkO4fLiv3Uv29tkj+9
NGJhkbpe0yb56TF1O4vCBCN581zb/WP/JmckbzSjxOWlv2Ak3xKqGFeVLxjJ
X59V2jPzisRIfl/70HX2tvWMmlw8zJze8VrJ+dlX2TvdM7ssMZJ3iuxelHZV
MOqaP5RfdP6i+gHVv+j+hvoPqH+G+r/bpfDsl8OUjOS9FPb6HwokRvJZVmM+
rXBWMpKXxbW5bRorMZLvUXUuwCNDwUi+m/XpC9ufqhjJTxn37ovB0YKR/O7w
j21FtRKj5v3ldF822UQwkp/cbj7p9lOJkfyBB6U1CyOLGXXNH8ovOn9R/YDq
X3R/Q/0H1D9D/V80vzCQ+Se+b6pmJL8/bvyNk6F1jORnrzpV0SR7wUg+LCM7
yCpJyUg+r8Ns/9ZflIzkm+M33YhYUMdIfpnDhGWDEyRG8hcftB6u/ItgJH/3
qFXZuzdyRvIfz6YZe8trGXXNH8ovOn9R/YDqX3R/Q/0H1D9D/V80v0Dzt+Ax
P20JiRSM5K/uKwv07KdgJL9qkn3oqH8LRvLyiQtzY61rGMn3CrbLMDVSMpJP
NmgsvBymYCS/2US2+tiTGkbyu7Ov+F261MBIXjItutXqU8Ooa/5QftH5i+oH
VP+i+xvqP6D+Ger/ovkFmr+h+fHKuZMNDe4IRvJvS6f26/9KMJI/ciD9wtpr
EiN5kyH3zvv7CkbymT1MncuTGhjJ13q8jzCfJBjJL3ogS7nZpGAkH6VsmfHM
qppR1/yh/KLzF9UPqP5F9zfUf0D9M9T/RfMLNH9D82O0/6CY0z006jfBSN52
esqL9+rzUJvkhzkNLnNoEYzk58z7dotz6ytG8vad7xuaHbrJSD7aN0t/9R4V
I3n3BLuAnMZaRl3zh/KLzl9UP6D6F93fUP8B9c9Q/xfNL9D8Dc2P0f4D2t9Z
uX6VrWyFYCTvn7qza5KbgpH8/I9lD53uCkbym7sfuJjZ/oiRfHpD4hq/EQ2M
5KuLNvZ0cJAz6po/lF90/qL6AdW/6P6G+g+of4b6v2h+geZvaH6M9h/Q/g7a
P5vanr73ULrESH5//qz5SWerGcnbTIt3zegkGMn7uqdebA6uYiQfOn1woo2N
glHX/KH8ovMX1Q+o/kX3N9R/QP0z1P9F8ws0f0PzY7T/gPZ30P4Z2p8sS3J0
XZYsGDXvr/GXr3VV16vaJB9xc3fhn0sFI/l+950HxzU/YtQ1fyi/6PxF9QOq
f9H9DfUfUP8M9X/R/ALN39D8GO0/oP0dtH+G9ifR/m9g9jz5gxDBSH5KWr6D
ZZ6ckfyZXUPdWw4KRl3zh/KLzl9UP6D6F93fUP8B9c9Q/xfNL9D8Dc2P0f4D
2t9B+2dofxLt/6L9ddNRq5JfH/+VkbzrUtmstrcNjLrmD+UXnb+ofkD1L7q/
of4D6p+h/i+aX6D5G5ofo/0HtL+D9s/Q/iTa/0X76+j5i+w9K7OqIl8z6po/
lF90/qL6AdW/6P6G+g+of4b6v2h+geZvaH6M9h/Q/g7aP0P7k2j/F+2vo+cv
0PNDKH8ov+j8RfUDqn/R/Q31H1D/DPV/0fwCzd/Q/BjtP6D9HbR/hvYn0f4v
2l9Hz1+g54fQ82//AcH9gi8=
"], {{0, 0}, {21, 21}}, {0, 1}],
Frame->Automatic,
FrameLabel->{None, None},
FrameTicks->{{{{16.5,
FormBox["5", TraditionalForm]}, {11.5,
FormBox["10", TraditionalForm]}, {6.5,
FormBox["15", TraditionalForm]}, {1.5,
FormBox["20", TraditionalForm]}}, {{16.5,
FormBox["5", TraditionalForm]}, {11.5,
FormBox["10", TraditionalForm]}, {6.5,
FormBox["15", TraditionalForm]}, {1.5,
FormBox["20", TraditionalForm]}}}, {{{4.5,
FormBox["5", TraditionalForm]}, {9.5,
FormBox["10", TraditionalForm]}, {14.5,
FormBox["15", TraditionalForm]}, {19.5,
FormBox["20", TraditionalForm]}}, {{4.5,
FormBox["5", TraditionalForm]}, {9.5,
FormBox["10", TraditionalForm]}, {14.5,
FormBox["15", TraditionalForm]}, {19.5,
FormBox["20", TraditionalForm]}}}}]], "Output",
CellChangeTimes->{{3.4318405941121902`*^9, 3.431840667623358*^9},
3.43184074020571*^9, 3.431898448450037*^9, 3.4319986182194138`*^9,
3.432003299248691*^9, 3.432098517088634*^9, 3.4321003787629423`*^9,
3.4321779022589207`*^9, 3.43224962001298*^9, 3.4322546846074467`*^9,
3.4322555985251513`*^9, 3.432333029163083*^9, 3.4323354810580053`*^9,
3.432339284539028*^9, 3.43235777796799*^9, 3.432361154412184*^9,
3.432362007697166*^9, 3.4324440686745043`*^9, 3.4338073005204077`*^9,
3.434234737805285*^9, 3.435214761083148*^9, 3.435266382496573*^9,
3.4352667384823027`*^9, 3.435277739532988*^9, 3.4353651306115017`*^9,
3.435376698553464*^9, 3.479011986277185*^9, 3.4790182127603703`*^9,
3.4898118979294024`*^9, 3.518907513191221*^9, 3.521761263290341*^9,
3.5225446451991167`*^9, 3.5225505066973257`*^9, 3.52255792014497*^9,
3.522558329245788*^9, 3.522558973360345*^9, 3.531531184221983*^9,
3.5315341429807673`*^9, 3.5316145059576*^9, 3.531622862883803*^9,
3.53162703371964*^9, 3.531629520807845*^9, 3.531630110225121*^9,
3.53171324609468*^9, 3.5317760623195267`*^9, 3.53179019515032*^9,
3.531790874758623*^9, 3.532036622369439*^9, 3.532039838499104*^9,
3.532054638676709*^9, 3.5321248471704273`*^9, 3.535608664332902*^9,
3.537097434631255*^9, 3.537408789072092*^9, 3.537436914622607*^9,
3.537520506488999*^9, 3.537524986728428*^9, 3.537528516262309*^9,
3.5378487126207523`*^9, 3.537939045724902*^9, 3.540983981821355*^9,
3.541051015029014*^9, 3.546671094919609*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"linkRank21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[", "#", "]"}], "]"}], "&"}], ",",
"symmetricData21"}], "]"}]}]], "Input",
CellChangeTimes->{{3.430287685048291*^9, 3.4302876924535*^9}, {
3.430287757526835*^9, 3.430287782522847*^9}, {3.430288482244174*^9,
3.430288526651911*^9}, {3.4317354889955883`*^9, 3.431735494540948*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"21", ",", "17", ",", "19", ",", "13", ",", "10", ",", "12", ",", "9",
",", "2", ",", "3", ",", "5", ",", "18", ",", "14", ",", "8", ",", "7",
",", "6", ",", "4", ",", "11", ",", "15", ",", "16", ",", "20", ",",
"1"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"19", ",", "21", ",", "12", ",", "16", ",", "7", ",", "15", ",", "13",
",", "5", ",", "3", ",", "11", ",", "14", ",", "8", ",", "6", ",", "4",
",", "2", ",", "9", ",", "17", ",", "10", ",", "18", ",", "20", ",",
"1"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"20", ",", "17", ",", "21", ",", "12", ",", "8", ",", "13", ",", "7", ",",
"3", ",", "11", ",", "4", ",", "18", ",", "14", ",", "5", ",", "6", ",",
"1", ",", "9", ",", "10", ",", "16", ",", "15", ",", "19", ",", "2"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"6", ",", "14", ",", "3", ",", "21", ",", "19", ",", "17", ",", "18", ",",
"16", ",", "4", ",", "15", ",", "13", ",", "9", ",", "5", ",", "1", ",",
"2", ",", "10", ",", "11", ",", "12", ",", "8", ",", "20", ",", "7"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"5", ",", "2", ",", "1", ",", "20", ",", "21", ",", "14", ",", "16", ",",
"18", ",", "12", ",", "9", ",", "13", ",", "11", ",", "15", ",", "8",
",", "10", ",", "7", ",", "3", ",", "6", ",", "4", ",", "17", ",",
"19"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"10", ",", "18", ",", "6", ",", "20", ",", "16", ",", "21", ",", "15",
",", "11", ",", "4", ",", "13", ",", "17", ",", "9", ",", "5", ",", "2",
",", "1", ",", "8", ",", "14", ",", "12", ",", "7", ",", "19", ",",
"3"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"7", ",", "13", ",", "3", ",", "20", ",", "18", ",", "14", ",", "21", ",",
"17", ",", "12", ",", "15", ",", "10", ",", "6", ",", "4", ",", "2",
",", "1", ",", "16", ",", "11", ",", "8", ",", "9", ",", "19", ",",
"5"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"5", ",", "7", ",", "3", ",", "19", ",", "20", ",", "15", ",", "18", ",",
"21", ",", "17", ",", "16", ",", "10", ",", "9", ",", "12", ",", "11",
",", "6", ",", "13", ",", "4", ",", "2", ",", "1", ",", "14", ",", "8"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"4", ",", "2", ",", "7", ",", "11", ",", "20", ",", "6", ",", "15", ",",
"19", ",", "21", ",", "17", ",", "16", ",", "5", ",", "18", ",", "8",
",", "14", ",", "13", ",", "3", ",", "12", ",", "1", ",", "10", ",",
"9"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"8", ",", "14", ",", "3", ",", "20", ",", "17", ",", "13", ",", "18", ",",
"15", ",", "16", ",", "21", ",", "19", ",", "10", ",", "12", ",", "9",
",", "7", ",", "4", ",", "5", ",", "2", ",", "1", ",", "11", ",", "6"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"18", ",", "16", ",", "17", ",", "14", ",", "12", ",", "15", ",", "7",
",", "2", ",", "9", ",", "11", ",", "21", ",", "19", ",", "5", ",", "3",
",", "1", ",", "4", ",", "13", ",", "8", ",", "6", ",", "20", ",",
"10"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"17", ",", "12", ",", "15", ",", "16", ",", "18", ",", "14", ",", "8",
",", "11", ",", "9", ",", "10", ",", "20", ",", "21", ",", "3", ",", "1",
",", "5", ",", "7", ",", "2", ",", "6", ",", "4", ",", "19", ",",
"13"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"8", ",", "4", ",", "1", ",", "10", ",", "20", ",", "6", ",", "5", ",",
"9", ",", "15", ",", "12", ",", "11", ",", "3", ",", "21", ",", "18",
",", "19", ",", "14", ",", "13", ",", "16", ",", "2", ",", "17", ",",
"7"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"12", ",", "5", ",", "3", ",", "8", ",", "19", ",", "7", ",", "2", ",",
"14", ",", "13", ",", "10", ",", "15", ",", "1", ",", "20", ",", "21",
",", "16", ",", "11", ",", "18", ",", "9", ",", "6", ",", "17", ",",
"4"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"14", ",", "3", ",", "2", ",", "11", ",", "19", ",", "1", ",", "6", ",",
"7", ",", "17", ",", "12", ",", "13", ",", "10", ",", "20", ",", "16",
",", "21", ",", "8", ",", "4", ",", "9", ",", "5", ",", "15", ",",
"18"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"5", ",", "12", ",", "4", ",", "15", ",", "13", ",", "11", ",", "16", ",",
"10", ",", "9", ",", "2", ",", "8", ",", "3", ",", "14", ",", "7", ",",
"1", ",", "21", ",", "19", ",", "18", ",", "17", ",", "20", ",", "6"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"9", ",", "16", ",", "8", ",", "13", ",", "7", ",", "14", ",", "12", ",",
"1", ",", "6", ",", "5", ",", "15", ",", "4", ",", "11", ",", "10", ",",
"3", ",", "19", ",", "21", ",", "18", ",", "17", ",", "20", ",", "2"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"14", ",", "12", ",", "13", ",", "16", ",", "9", ",", "11", ",", "8", ",",
"1", ",", "7", ",", "2", ",", "10", ",", "5", ",", "15", ",", "6", ",",
"4", ",", "18", ",", "19", ",", "21", ",", "17", ",", "20", ",", "3"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"15", ",", "18", ",", "13", ",", "14", ",", "9", ",", "11", ",", "12",
",", "2", ",", "4", ",", "3", ",", "10", ",", "8", ",", "7", ",", "6",
",", "5", ",", "17", ",", "19", ",", "16", ",", "21", ",", "20", ",",
"1"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"15", ",", "14", ",", "9", ",", "17", ",", "13", ",", "12", ",", "10",
",", "5", ",", "2", ",", "3", ",", "11", ",", "8", ",", "7", ",", "4",
",", "1", ",", "18", ",", "20", ",", "19", ",", "16", ",", "21", ",",
"6"}], "}"}], ",",
RowBox[{"{",
RowBox[{
"4", ",", "3", ",", "2", ",", "16", ",", "20", ",", "11", ",", "10", ",",
"9", ",", "14", ",", "8", ",", "19", ",", "15", ",", "13", ",", "7", ",",
"17", ",", "12", ",", "5", ",", "6", ",", "1", ",", "18", ",", "21"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzFtI02EAhvFVOjOzZDgsQatVZpTMhkdK83M5ZoradG1ui+Uk0ZIlXkwY
hk0MCSTPMVlEMslaKiuxjdJlLDJqxGg2CreVMqr/N7IIOlys1buLh9/ds0dz
UXJuA4vFOonex3/NeXqNIQZVZDCqI33EuwqHRc/Vef0M6WyXpKnhppyk1UZY
y24p64GLO9f5vXC07UtV9yBDmNTQjh54VqC60gcHssd1M3BiqUNig890mRYP
XFiuGI4ZYkjgn9bHhkXbJhW5MJyiEObBLL87TQUtQQOvC+afGDEZoKL+TWI3
jAxYfJPw6PeM7XdhqWuIWmDTI+GPWWhdqTbOwZKXvzc+hCMPppIDkFNstHeM
MkQwLtKKrzPk3kr2zwwjQ/p+eQ+WQG3GqdNR+Sljc2Uw0lrf0AY5+to4HSzt
rZFYQwyh02OqWegOFNvKWZSE3x7of5FPyQ126G9hESX3BXcu24spsTbLzjyG
TerYsAPeMmXyn0CneKoral35Zp2vmhJT0sfPfqivOr4/toaS9jZ/YTws2Fcg
TID6zlT9VsgNLjmjtticylx4k7yKq4NrM83rCnjptVyohKJGF/HARbPbsxz9
HPYm+iDv0CdpBNonEi6YZZQ4xFKlXkGJTGnWcJSUHMuSpu+GvD8138Twtka+
qwK6ZVffVUJXMPkIA8/vtVdyVZTIjQvcYAMlW6bX3DEaSuYLP0TmWyn5DyCe
LbI=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Tr", "[",
RowBox[{"linkRank21", ",", "List"}], "]"}]], "Input",
CellChangeTimes->{{3.430288555501484*^9, 3.430288564463615*^9}, {
3.431735501704126*^9, 3.431735501852214*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"21", ",", "21", ",", "21", ",", "21", ",", "21", ",", "21", ",", "21", ",",
"21", ",", "21", ",", "21", ",", "21", ",", "21", ",", "21", ",", "21",
",", "21", ",", "21", ",", "21", ",", "21", ",", "21", ",", "21", ",",
"21"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzm1IU2EABeDrNifDzSJUmjSrVaKjqBCXRtrelqRkzG41dVvI1gexQqfE
UiGszYwsGmaZ0oog2vIjk6a5KCbSfgiFuW4siU00ZHFfo0UQVCzp7Mfh+XfO
2WhpZE+lMAxTiVive3unbvKEOR8IL0K18He92sUTz/2Linoo+KBZPAGbudby
DhgaWb3jKsx+z+gc3Twpjs7IO6A72nDlBowNTdlHoMvSyk5A8R7VIAcTjkM9
ols86SyzRcSQYb2GIvjQatSq4Y/lkMIEm1KcynbouXb73mXoN3EyB1R6hyJe
mKHLXzUAT9IeOghruf0/fXC3U983Dm05fwQvYGH608x5qKrt91+4wxNr/HBD
RS/2heRXXh9P2ANzBRoo3Mzqkwa7Po+XwzMBg9kGxS2GNDvMpUfY0WX8l7hN
Pljt2TdRyVAiMhe4pndR4vbF/5WUUrLt+cAlfxklY59qjr+C0mepiQCs+5a/
fRI2PhhuT1rLS+wRHSWq0wtfo1Dv2bsltZqS4S/REgn821+sTYe5szltUqgp
nX6T1JMRNBbBtXffph2FAqn1uwEm8uq0RlgYfEc4mCkPcR/hmDMsi8CZztix
Fdi8SXb2UQ0ljqDe2GagZLT7sWWNkRK5oiZ3A7SZ2HgFnG+pW38Qbo13zVXB
ddbsnTwMh19WZZnwXzmZtWSmpCm2NCuyoO/Jwsrrc5T8B1YMJRw=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"secondpos21", "=",
RowBox[{"Sort", "[",
RowBox[{
RowBox[{"Position", "[",
RowBox[{"linkRank21", ",", "20"}], "]"}], ",",
RowBox[{
RowBox[{"#1", "<", "#2"}], "&"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.430288587413619*^9, 3.430288590238925*^9}, {
3.430288621233404*^9, 3.43028865769895*^9}, {3.430288729892766*^9,
3.4302887508553963`*^9}, {3.4317355098273487`*^9, 3.431735516824976*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"6", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"9", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"10", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12", ",", "11"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14", ",", "13"}], "}"}], ",",
RowBox[{"{",
RowBox[{"15", ",", "13"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"21", ",", "5"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.430288628271688*^9, 3.430288658577793*^9, {3.430288738133697*^9,
3.4302887519379396`*^9}, 3.430354614730986*^9, 3.430527744901288*^9,
3.430611181410832*^9, 3.430620939209177*^9, 3.430687276759293*^9,
3.430693249676296*^9, 3.431731832478957*^9, 3.43173552074396*^9,
3.431752747938397*^9, 3.431822262626636*^9, 3.431840404266158*^9,
3.4318984493677387`*^9, 3.431998619046225*^9, 3.432003299838923*^9,
3.432098517396665*^9, 3.432100378888262*^9, 3.4321779029721193`*^9,
3.4322496202543907`*^9, 3.4322546855010357`*^9, 3.432255598638852*^9,
3.432333029561267*^9, 3.432335481444641*^9, 3.432339284960597*^9,
3.4323577781875277`*^9, 3.4323611549248037`*^9, 3.432362008012635*^9,
3.432444069973736*^9, 3.43380730105443*^9, 3.434234739243688*^9,
3.4352147625304823`*^9, 3.435266383047117*^9, 3.435266738601425*^9,
3.435277744928252*^9, 3.43536513087503*^9, 3.435376698867309*^9,
3.479011986814362*^9, 3.479018212942072*^9, 3.489811898256275*^9,
3.518907513305429*^9, 3.521761263501964*^9, 3.5225446453137197`*^9,
3.5225505067943153`*^9, 3.52255792019906*^9, 3.522558329289928*^9,
3.5225589734098997`*^9, 3.531531184321102*^9, 3.531534143042618*^9,
3.5316145060019693`*^9, 3.531622862945706*^9, 3.531627033780246*^9,
3.531629520849028*^9, 3.531630110269685*^9, 3.531713246138698*^9,
3.531776062373684*^9, 3.531790195325357*^9, 3.531790874798118*^9,
3.532036622411768*^9, 3.532039838546565*^9, 3.5320546387155046`*^9,
3.532124847216202*^9, 3.535608664461639*^9, 3.537097434767682*^9,
3.5374087892432737`*^9, 3.5374369147915163`*^9, 3.537520506628044*^9,
3.5375249868456697`*^9, 3.5375285163904247`*^9, 3.5378487127516127`*^9,
3.5379390458532543`*^9, 3.5409839820239697`*^9, 3.541051015240147*^9,
3.546671095073216*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"symmetricData21", "[",
RowBox[{"[",
RowBox[{"2", ",", "20"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.430289196532811*^9, 3.430289208753458*^9}, {
3.431735527279673*^9, 3.431735538230534*^9}}],
Cell[BoxData["58186"], "Output",
CellChangeTimes->{{3.430289203137178*^9, 3.430289209352394*^9},
3.430354615710702*^9, 3.430527745638589*^9, 3.430611182876028*^9,
3.430620940249329*^9, 3.430687277467874*^9, 3.430693250717124*^9,
3.431731833272223*^9, {3.431735523441236*^9, 3.4317355388925943`*^9},
3.4317527489597673`*^9, 3.431822263103301*^9, 3.431840404831761*^9,
3.431898449855872*^9, 3.431998619629072*^9, 3.432003300160615*^9,
3.432098517406247*^9, 3.432100378923779*^9, 3.432177903008834*^9,
3.4322496202880373`*^9, 3.4322546863657513`*^9, 3.432255598670079*^9,
3.432333029768818*^9, 3.4323354814909277`*^9, 3.432339285287478*^9,
3.4323577782204437`*^9, 3.432361154960395*^9, 3.432362008047407*^9,
3.4324440705401783`*^9, 3.4338073010948133`*^9, 3.4342347398777037`*^9,
3.43521476303401*^9, 3.4352663830860853`*^9, 3.4352667386354923`*^9,
3.435277745910351*^9, 3.435365131086052*^9, 3.435376698905099*^9,
3.47901198700795*^9, 3.479018212956524*^9, 3.489811898307029*^9,
3.518907513350358*^9, 3.521761263511648*^9, 3.52254464536414*^9,
3.522550506847419*^9, 3.5225579202083273`*^9, 3.522558329309643*^9,
3.522558973419902*^9, 3.531531184330851*^9, 3.531534143052507*^9,
3.5316145060120907`*^9, 3.531622862956444*^9, 3.531627033832412*^9,
3.531629520858839*^9, 3.531630110280671*^9, 3.531713246148724*^9,
3.5317760624016647`*^9, 3.531790195412527*^9, 3.531790874808385*^9,
3.532036622422937*^9, 3.532039838563025*^9, 3.532054638774006*^9,
3.532124847226604*^9, 3.5356086645109863`*^9, 3.537097434816511*^9,
3.537408789416234*^9, 3.537436914855509*^9, 3.537520506673835*^9,
3.537524986893303*^9, 3.537528516438799*^9, 3.537848712800201*^9,
3.5379390459017572`*^9, 3.540983982072644*^9, 3.5410510154424667`*^9,
3.5466710951208973`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Part", "[",
RowBox[{"symmetricData21", ",", "2", ",", "20"}], "]"}]], "Input",
CellChangeTimes->{{3.4302894533316727`*^9, 3.4302894554933987`*^9}, {
3.430289485656328*^9, 3.430289490114667*^9}, {3.431735542321257*^9,
3.431735545075656*^9}}],
Cell[BoxData["58186"], "Output",
CellChangeTimes->CompressedData["
1:eJwVzmtI02EUBvCFa865EWVGINtMKjSWGbRNY469DsHLTBmltP+cuVoWZhnE
FuuD5RxB1NYd6bZgajVwXSSdJAoTahmt1rqMmMXILv9XWJJEVOZ69uHw4zkc
eM4a8yG9ZQmHw6nGPG1rEQRdLPHast8l4CldxS6FmyVnQxxJCywsvpnYDa9d
iVT2wIzw0ZKTcFueqr77HEsqipXSHtifP+E8DVM5XJsf7tH59CPQEWR80fS+
3HGBex49KnecBzVk0CCHq3d2aBVwZl9CbITNWa6CLjg6MHv1BJS1vRV1w4bI
aPwWFOyVL7sDx0qeUF86c+t+DMHDDkvvQyjs42cMwweuyMoPcF7WF7BdYom9
yHOw6jJLaqY7f67vZQmz8KlIA0vrTI1pj1lNw5VQwexv7YQhkSnTCm9ft+jv
zbIkyfcYh2C4vXakmkOJ4YzMHVJSIvPP/Ssrp2RKPXg8oKak9Jmx+RGkv3gL
41Cp2LBpAq6S+rvSJr8IrPF6SmpSia/TkKci65Y2UBJKfizLgm9+b9Vmw/4c
sV0I/3inJtMO3HjMyKF94/PM7TDl7EgaoIbPaBl40RMmUag2voq+Tt8F34vi
0Ln2245FmPi7vN3bhL8DDGM3UCK5f9e8gqGEM2+U5EOdpul7FTQVmKS1UB1z
x3RQ+EK8mYVc/7gu10jJFjqZO9NKSWPe3EuumZLYkc+LYwco+Q+FACUm
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"secondvars21", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Part", "[",
RowBox[{"symmetricData21", ",",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "&"}], ",", "secondpos21"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.4302895304986773`*^9, 3.430289593791997*^9}, {
3.431735549300518*^9, 3.43173555724373*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"85171", ",", "58186", ",", "18266", ",", "121186", ",", "90180", ",",
"29671", ",", "44535", ",", "42240", ",", "6593", ",", "13571", ",",
"24628", ",", "19547", ",", "8643", ",", "6885", ",", "7049", ",",
"131656", ",", "277848", ",", "217813", ",", "108760", ",", "277848", ",",
"45206"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVxVtIk2EABuBftEa0IbisSTpnYcOiwwhnasq+hjLLYW06awcPc0ZomTdp
GE0b5grMtcZCoxtnEUmMzFKpUbgsxChGKzL8W22U9n+W0sLqwqx3Fw9Phvmk
pj6OYZgS2N2k3eDv4YiKt+NdGP9S1NfIHRzxqUXiajwg8Ybr8OSexaJO3Lxw
bZcdtwj0ZTYnR4TRvIxObB7/eL4bh95vbvXi/bIXmlH8RXp2MIgfFrhdCVc4
IkrqY1fjBt89fTae776klOMa+0KaES+nODa1Y2uf4vo5HPHNCGw4qp1ib+HT
h/ITb2OpcJoO4niTNjqMCz1Hex9gsTwxfgTP2iPrQvit+s5Yq5sjv49MNKmu
csR0sWNpSy9HmNRvWQq8LfOYLnYgzjNShGUXGmqb8Y2QhdeCU4WNmrvzHBln
+o3D2C9Xj5YwlIj+bHdM5lBiqYj+zS2gJI96O8YKKWHOVJkeYUkxb/kxzura
uvMJvnnK2x5bYee3sGWUCDSRuQ94n4tkrjpIieNTOHcN1mnzlWvxT0taGx+3
LU89ja1bem7IxnttL3nleIY9saDHdbUGpQHz/70iQczcfx18g9UuVsDiYuvX
ihWcI13fOFBJyXedydCmp2Tj7JA5yUBJV0+VWIIDE4cXVbj8R3X6AWxVOqdL
8eWhdBmHVSn+0mQjJUbns+TPtZRUuqOBBDMlHv7ciu84Jf8BgGQlZA==
"]]
}, Open ]],
Cell["reduce self linkage : symmetric linkage", "Text",
CellChangeTimes->{{3.4318262529277763`*^9, 3.431826279538787*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"symmetricDataReduceSelf21", "=", "symmetricData21"}],
";"}]], "Input",
CellChangeTimes->{{3.430289641367491*^9, 3.430289662070816*^9}, {
3.431735566866023*^9, 3.4317355701969*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"pos", "=", "1"}], ";",
RowBox[{"Do", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"symmetricDataReduceSelf21", "[",
RowBox[{"[",
RowBox[{"pos", ",", "pos"}], "]"}], "]"}], "=",
RowBox[{"secondvars21", "[",
RowBox[{"[", "pos", "]"}], "]"}]}], ";",
RowBox[{"pos", "++"}]}], ",",
RowBox[{"{",
RowBox[{"pos", ",", "21"}], "}"}]}], "]"}], ";",
RowBox[{"pos", "=."}]}]], "Input",
CellChangeTimes->{{3.430289673171294*^9, 3.4302898022297564`*^9}, {
3.430289865656664*^9, 3.4302898693211117`*^9}, {3.431735583740315*^9,
3.431735593879993*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"totalLinkageReduceSel21f", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Tr", "[", "#", "]"}], "&"}], ",", "symmetricDataReduceSelf21"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.43061662609507*^9, 3.430616663430936*^9}, {
3.431735608143908*^9, 3.4317356130346622`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"242090", ",", "208010", ",", "79826", ",", "488695", ",", "369250", ",",
"139486", ",", "154588", ",", "132073", ",", "39628", ",", "58609", ",",
"161724", ",", "69878", ",", "57768", ",", "26187", ",", "26221", ",",
"418928", ",", "791619", ",", "559068", ",", "311272", ",", "1426998", ",",
"110086"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzltIk2EAxvGvWrqVS4gJZdSysCFBdmDKLpp7G42Vg8XoYNtsbmYHGiqG
U7yYNlYSRpLVGCEDU8km09HcZks6aIGiQ9ssolZBC+x7k8xiIyI/enbx8Lt8
/gWWOl3NKoZhVNgG37ppcydLenzMl2o4UypTOeGYIrm3Hdpjw1rHLZb0tY9L
nDCrSHTtBjx3VN00BFUiTheGtnsebxzmSl7e5nWxJFXen8iCDi6il0KG16Ms
gT8XV7Ya4aLJtaMV3u8Y774CT/9dEDqgOP068QDmjxzKfQgP8JepFwpq9b8C
kG+57A7CTaL8NSG4uoYTfYJlbyKjTXdZQpLfatUu/EQ9qV1ulnQvp4oU0COx
n8zICfnhw7A52GCuh/Uxa7YNxiYadP7vLIlEe40B+DygDR9hKDk7U9w5WUrJ
e+nvFdlBSmx//G2jckqaPVWVT2BJI//fU2gN7S5+BjWm4daMXReFtoSWEvds
cuEjvC5QFq49Rkn6RVImgPvbypTroaJD3JIDB+XRiYza81MGKRxYms0+Dr3T
dT/00F5YqTTA+cdzJA5dU/H4PAzd+SxMQD/HnuBgTuPmS72nKHF+qDK06Cm5
cCZo2WigJF5g2bYdVmwxLamh/Gq1uBw+uul6p4F7fDv3sXDQ+EqTZ6Skf2gy
76sZvX3pOZ6FkrcDLDdmpeQ/bcQjqw==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"symmetricData21", "-", "symmetricDataReduceSelf21"}]], "Input",
CellChangeTimes->{{3.430289890471182*^9, 3.4302898993306437`*^9}, {
3.4317356161525803`*^9, 3.4317356201647253`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
"292721", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "108144", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "69412", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "1021906", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "717346", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "140865", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "110835", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"92686", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "60779", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "46541", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "250964", ",", "0", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "98127", ",", "0", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "168861", ",", "0", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "33425", ",",
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",",
"50535", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "348122", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "551908", ",", "0", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "468313", ",", "0", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "172792", ",", "0", ",", "0"}], "}"}],
",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "3129262", ",", "0"}],
"}"}], ",",
RowBox[{"{",
RowBox[{
"0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0", ",", "0", ",", "0", ",", "438450"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVymtIk2EAxfFFK5NaQs0wLFPLNKi1WVqGqz1Nx1YrbaTBpq69WXQRXbcJ
g5iNkV+G2s0NRCosdNJsZbWBs4VRLkOwtqhgRa3hfB+lwKxc1Ozsw+HHgX8W
06A6Oo/D4SgwobNZPNTCEkNt3bsvcJXRebiwlSV5JWcytHDClhs+Au9WKmUW
+GpwVtgMy5mRMvNlljhjPXkW2DGz9pIV1nSpG/tg2s05lRtuD7l6A3Di6fOr
3CssCXNdoYUwWDegLoCd8vvSQvhGNre6Cg432bJNMCu6tfMifDg8xTNDSVsg
1A2v8UtSHDAknqa98IdXM92f+A1G+yO43Jo+/zFc+TbO/wT9fK+n8TpLxvfQ
enk7S/pyb/xcb2dJ977fGyRw6LipMqGPJ3eXwpZio04Prdn1SQa4Tn9e5Zpk
iSVwp6ofVpw44FZwKKFaUat/GyW+0zP/isSU5FseNHl2UtJ+jKkegNrdyX+f
wJhg42YftO1wmRLe3pJiCJVRcnI8Ev0Ib3FlOQvKKfEIIkXJMOlPqXQxbFuR
aVwChb7RZwl7oi81BVCmH0s6CIsV+m9qKHBUSzVwv/Q1CcDYuWAgCM/6P/NC
8KuVVsRhjTn9VNch9B8YjVFNiWiRh1mmoWQqvzYjE0oKdd/lcFe4ds1e+Gup
/b0SKjbliFjoGH2hTK2iJO3eSGpER8mFwdkxLkNJvGMy7q2j5D8DYS64
"]]
}, Open ]],
Cell["reduce self linkage : cited/citing data", "Text",
CellChangeTimes->{{3.4318262529277763`*^9, 3.431826279538787*^9}, {
3.431826315958454*^9, 3.431826333923854*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DataReduceSelf", "=", "citedciting21Data"}],
";"}]], "Input",
CellChangeTimes->{{3.431826365724277*^9, 3.4318264349721613`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"pos", "=", "1"}], ";",
RowBox[{"Do", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"citedciting21DataReduceSelf", "[",
RowBox[{"[",
RowBox[{"pos", ",", "pos"}], "]"}], "]"}], "=",
RowBox[{"secondvars21", "[",
RowBox[{"[", "pos", "]"}], "]"}]}], ";",
RowBox[{"pos", "++"}]}], ",",
RowBox[{"{",
RowBox[{"pos", ",", "21"}], "}"}]}], "]"}], ";",
RowBox[{"pos", "=."}]}]], "Input",
CellChangeTimes->{{3.430289673171294*^9, 3.4302898022297564`*^9}, {
3.430289865656664*^9, 3.4302898693211117`*^9}, {3.431735583740315*^9,
3.431735593879993*^9}, {3.4318264408674097`*^9, 3.431826458221912*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21Data", "-", "citedciting21DataReduceSelf"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.431826490028743*^9, 3.4318265061324244`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"103775", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "24979", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "25573", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "450360", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "313583", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "55597", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "33150", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "25223", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "27093", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "16485", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "113168", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "39290", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "80109", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "13270",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"21743", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "108233", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "137030", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "125250", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "32016", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "1425707", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "196622"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.431826496474053*^9, 3.43182650692118*^9},
3.4318404092151327`*^9, 3.431898454597679*^9, 3.4319986245830393`*^9,
3.432003301921586*^9, 3.43209851804687*^9, 3.432100382622993*^9,
3.4321779044333057`*^9, 3.4322496209459763`*^9, 3.432254704243916*^9,
3.432255599599324*^9, 3.4323330308710327`*^9, 3.432335482367722*^9,
3.432339288544672*^9, 3.432357779087582*^9, 3.432361156091234*^9,
3.432362009131523*^9, 3.4324440728246193`*^9, 3.433807302179674*^9,
3.434234744187998*^9, 3.4352147659109793`*^9, 3.435266384224766*^9,
3.435266740661023*^9, 3.435277756990735*^9, 3.435365132092903*^9,
3.435376699723592*^9, 3.479011987779902*^9, 3.479018213275817*^9,
3.489811898623629*^9, 3.518907513619224*^9, 3.521761263692533*^9,
3.5225446457558823`*^9, 3.5225505071534567`*^9, 3.522557920330552*^9,
3.522558329422203*^9, 3.522558973549387*^9, 3.5315311845506287`*^9,
3.531534143204434*^9, 3.531614506236353*^9, 3.5316228631947823`*^9,
3.5316270343138247`*^9, 3.531629521074869*^9, 3.531630110505117*^9,
3.531713246395664*^9, 3.531776062564436*^9, 3.531790195577034*^9,
3.531790874987216*^9, 3.532036622599345*^9, 3.5320398386773863`*^9,
3.532054639101811*^9, 3.532124847381706*^9, 3.535608665064102*^9,
3.537097435213496*^9, 3.5374087898549013`*^9, 3.5374369153199453`*^9,
3.5375205071421623`*^9, 3.537524987264374*^9, 3.537528516857641*^9,
3.5378487132684717`*^9, 3.5379390463224*^9, 3.540983982424345*^9,
3.5410510158964977`*^9, 3.546671095472842*^9}]
}, Open ]],
Cell["reduce self linkage : citing/cited data", "Text",
CellChangeTimes->{{3.4318262529277763`*^9, 3.431826279538787*^9}, {
3.431826315958454*^9, 3.431826333923854*^9}, {3.431826603847274*^9,
3.43182660940696*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citingcited21DataReduceSelf", "=", "citingcited21Data"}],
";"}]], "Input",
CellChangeTimes->{{3.431826614947194*^9, 3.431826655284569*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"pos", "=", "1"}], ";",
RowBox[{"Do", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"citingcited21DataReduceSelf", "[",
RowBox[{"[",
RowBox[{"pos", ",", "pos"}], "]"}], "]"}], "=",
RowBox[{"secondvars21", "[",
RowBox[{"[", "pos", "]"}], "]"}]}], ";",
RowBox[{"pos", "++"}]}], ",",
RowBox[{"{",
RowBox[{"pos", ",", "21"}], "}"}]}], "]"}], ";",
RowBox[{"pos", "=."}]}]], "Input",
CellChangeTimes->{{3.430289673171294*^9, 3.4302898022297564`*^9}, {
3.430289865656664*^9, 3.4302898693211117`*^9}, {3.431735583740315*^9,
3.431735593879993*^9}, {3.4318264408674097`*^9, 3.431826458221912*^9}, {
3.431826672155509*^9, 3.431826677001522*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"citingcited21Data", "-", "citingcited21DataReduceSelf"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.431826490028743*^9, 3.4318265061324244`*^9}, {
3.431826693978714*^9, 3.431826706747979*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"103775", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "24979", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "25573", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "450360", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "313583", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "55597", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "33150", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "25223", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "27093", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "16485", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "113168", "0", "0",
"0", "0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "39290", "0", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "80109", "0",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "13270",
"0", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"21743", "0", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "108233", "0", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "137030", "0", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "125250", "0", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "32016", "0", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "1425707", "0"},
{"0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0", "0",
"0", "0", "0", "0", "0", "0", "196622"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzl1IU3Ech/FjOi2Wtl52UZKW2QuyDCm3DDJ/jXDmQJnm6mwRHqgWyzQQ
JVO2pDvBKEzmjcV2oc1A8SWHjSYYlcqU4yqGnIJeaJ6/0Cgyh0zru4uHz+2z
X6g3XU3iOO4Muu1scw89lKnk7PmqcRjL+OsNJdSd7Ep5JFOPeUZKhUrXW74Q
Hvm3rtfCmTuZWVYYyOzPccDi+2u99+Ds4Ep6O9wjfpP6YF5j1bZn8ErP3mUv
9Idv/B6B8WsdrjHoSz6a/ALOiRr1Z3hdN+9rfiyT276r3tAtk6I7uHLIJdPA
qiqvBE6+flqTcPPsYd85aDjQUdsAVYOOtCbIl7eahpZluhscsI7AUn/NeBnH
SNikffBOx0hcXF0vOs0o5phw+ooZ3WqzXX4JjV+U8Vfw+EL+sQDsjA07Enb9
2dkkVTAK5i9FPsFpVdlBRSUj28Wloi2ws9eoV8L4m9yWrXCtdWEqYWr1vKUQ
PveG0qrhqKfxJw8booLeAhe3f6AQ9EQ+ht5DzaVIugSdXPTCBtQW5No9Zkal
2XZLC8/ohDsg7LDgt64uax9s/2GLGuBXhT27HPLTT8JGOCFpCmQY3j1nVFsZ
WQVR/b2WkSnOiSkCo1PmXxv+m4z+A0CgA+U=
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["\<\
Standerdized asymmetric linkage (Cited ratio VS. citing ratio)\
\>", "Section",
CellChangeTimes->{{3.432003393487981*^9, 3.432003415371771*^9}, {
3.432004496167286*^9, 3.43200449869243*^9}, {3.432357840761788*^9,
3.432357841173917*^9}, {3.5316269144589863`*^9, 3.531626930463323*^9}, {
3.531626967295986*^9, 3.531626992302763*^9}, {3.531627133793055*^9,
3.531627171497546*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"zeroself", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "\[Rule]", "0"}], "&"}], ",",
RowBox[{"Transpose", "[",
RowBox[{"{",
RowBox[{
RowBox[{"Range", "[", "21", "]"}], ",",
RowBox[{"Range", "[", "21", "]"}]}], "}"}], "]"}]}], "]"}]}]], "Input",\
CellChangeTimes->{{3.435215406836521*^9, 3.4352155054956007`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "1"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"2", ",", "2"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"3", ",", "3"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"4", ",", "4"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"5", ",", "5"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"6", ",", "6"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"7", ",", "7"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"8", ",", "8"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"9", ",", "9"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"10", ",", "10"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"11", ",", "11"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"12", ",", "12"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"13", ",", "13"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"14", ",", "14"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"15", ",", "15"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"16", ",", "16"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"17", ",", "17"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"18", ",", "18"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"19", ",", "19"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"20", ",", "20"}], "}"}], "\[Rule]", "0"}], ",",
RowBox[{
RowBox[{"{",
RowBox[{"21", ",", "21"}], "}"}], "\[Rule]", "0"}]}], "}"}]], "Output",
CellChangeTimes->{
3.435215431870974*^9, {3.435215476410537*^9, 3.435215506557393*^9},
3.435266384788468*^9, 3.43526674114826*^9, 3.435277763335414*^9,
3.435365132390489*^9, 3.435376700194724*^9, 3.479012004749193*^9,
3.4790182134410954`*^9, 3.489811898781104*^9, 3.5189075290045757`*^9,
3.5217612637819033`*^9, 3.522544708689704*^9, 3.522550523775502*^9,
3.522557920394266*^9, 3.52255832948663*^9, 3.522558973617433*^9,
3.531531184677465*^9, 3.531534143268821*^9, 3.531614506314818*^9,
3.531622863310816*^9, 3.531627034613112*^9, 3.5316295211626997`*^9,
3.531630110633325*^9, 3.5317132465411873`*^9, 3.531776062642211*^9,
3.531790195691308*^9, 3.531790875131592*^9, 3.532036622695591*^9,
3.53203983874551*^9, 3.532054639293662*^9, 3.532124847500703*^9,
3.535608665183511*^9, 3.537097435397285*^9, 3.537408790059143*^9,
3.537436915477662*^9, 3.5375205073295393`*^9, 3.537524987459709*^9,
3.537528517041936*^9, 3.537848713453546*^9, 3.537939046492886*^9,
3.5409839825934477`*^9, 3.5410510161037703`*^9, 3.5466710955897083`*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"standerdizeline", "[", "m_", "]"}], ":=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "/",
RowBox[{"Tr", "[", "#", "]"}]}], "&"}], ",", "m"}], "]"}]}]], "Input",
CellChangeTimes->{{3.432357890481297*^9, 3.432357954641823*^9}, {
3.432358079039899*^9, 3.43235807973652*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"standerdizecolumn", "[", "m_", "]"}], ":=",
RowBox[{"Transpose", "[",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "/",
RowBox[{"Tr", "[", "#", "]"}]}], "&"}], ",",
RowBox[{"Transpose", "[", "m", "]"}]}], "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.432358156655098*^9, 3.432358215900189*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"standerdizecolumnline", "[", "m_", "]"}], ":=",
RowBox[{"standerdizeline", "[",
RowBox[{"standerdizecolumn", "[", "m", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.432358443398303*^9, 3.43235851088894*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21Datastanderdized", "=",
RowBox[{"Nest", "[",
RowBox[{"standerdizecolumnline", ",",
RowBox[{"N", "[", "citedciting21Data", "]"}], ",", "84"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.4323583978737698`*^9, 3.432358435852414*^9}, {
3.4323585286582737`*^9, 3.432358569109951*^9}, {3.4323586037259398`*^9,
3.432358685484953*^9}, {3.432358748275975*^9, 3.432358776221034*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citingcited21Datastanderdized", "=",
RowBox[{"Transpose", "[", "citedciting21Datastanderdized", "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.435214858591895*^9, 3.4352148892392178`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"citedciting21DatastanderdizedcitedParciting", "=",
RowBox[{"citedciting21Datastanderdized", "/",
RowBox[{"Transpose", "[", "citedciting21Datastanderdized", "]"}]}]}],
";"}]], "Input",
CellChangeTimes->{{3.432359354228044*^9, 3.432359405247736*^9}}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"Power", "::", "infy"}], "MessageName"], ":",
" ", "\<\"\:7121\:9650\:5f0f\[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak]\:304c\:898b\
\:4ed8\:304b\:308a\:307e\:3057\:305f\:ff0e \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{{3.432359396946102*^9, 3.432359406046309*^9},
3.432361159715405*^9, 3.432362016803598*^9, 3.4324440776022987`*^9,
3.433807305220418*^9, 3.434234756489263*^9, 3.435214771236925*^9,
3.435266386678956*^9, 3.435266744097733*^9, 3.435277769304873*^9,
3.435365133010775*^9, 3.435376700780682*^9, 3.479012005239048*^9,
3.479018213718992*^9, 3.489811899096567*^9, 3.518907529277565*^9,
3.5217612639461517`*^9, 3.5225447089847193`*^9, 3.5225505240552998`*^9,
3.5225579205272923`*^9, 3.522558329620845*^9, 3.522558973755776*^9,
3.5315311848427*^9, 3.531534143413096*^9, 3.5316145064579773`*^9,
3.531622863468148*^9, 3.531627034780164*^9, 3.531629521331341*^9,
3.531630110805739*^9, 3.53171324675865*^9, 3.531776062790804*^9,
3.531790195870199*^9, 3.531790875284487*^9, 3.532036622849584*^9,
3.532039838866152*^9, 3.532054639533504*^9, 3.5321248476459093`*^9,
3.53560866541284*^9, 3.537097436055292*^9, 3.537408790385233*^9,
3.5374369157353077`*^9, 3.5375205075605497`*^9, 3.537524987647707*^9,
3.537528517273481*^9, 3.537848713718102*^9, 3.537939046737781*^9,
3.5409839828228397`*^9, 3.541051016426065*^9, 3.546671095741713*^9}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"Power", "::", "infy"}], "MessageName"], ":",
" ", "\<\"\:7121\:9650\:5f0f\[NoBreak]\\!\\(1\\/0.`\\)\[NoBreak]\:304c\:898b\
\:4ed8\:304b\:308a\:307e\:3057\:305f\:ff0e \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/infy\\\", ButtonNote -> \
\\\"Power::infy\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->{{3.432359396946102*^9, 3.432359406046309*^9},
3.432361159715405*^9, 3.432362016803598*^9, 3.4324440776022987`*^9,
3.433807305220418*^9, 3.434234756489263*^9, 3.435214771236925*^9,
3.435266386678956*^9, 3.435266744097733*^9, 3.435277769304873*^9,
3.435365133010775*^9, 3.435376700780682*^9, 3.479012005239048*^9,
3.479018213718992*^9, 3.489811899096567*^9, 3.518907529277565*^9,
3.5217612639461517`*^9, 3.5225447089847193`*^9, 3.5225505240552998`*^9,
3.5225579205272923`*^9, 3.522558329620845*^9, 3.522558973755776*^9,
3.5315311848427*^9, 3.531534143413096*^9, 3.5316145064579773`*^9,
3.531622863468148*^9, 3.531627034780164*^9, 3.531629521331341*^9,
3.531630110805739*^9, 3.53171324675865*^9, 3.531776062790804*^9,
3.531790195870199*^9, 3.531790875284487*^9, 3.532036622849584*^9,
3.532039838866152*^9, 3.532054639533504*^9, 3.5321248476459093`*^9,
3.53560866541284*^9, 3.537097436055292*^9, 3.537408790385233*^9,
3.5374369157353077`*^9, 3.5375205075605497`*^9, 3.537524987647707*^9,
3.537528517273481*^9, 3.537848713718102*^9, 3.537939046737781*^9,
3.5409839828228397`*^9, 3.541051016426065*^9, 3.546671095744824*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{"citedciting21Datastanderdized", ",", "0.01"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"ClNames21", ",", "ClNames21"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.432358802659913*^9, 3.432358806649927*^9}, {
3.4323588491922503`*^9, 3.4323588601261673`*^9}, {3.432358911205798*^9,
3.4323589609482803`*^9}, 3.432359083962049*^9}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox["\<\"B-1\"\>",
HoldForm],
TagBox["\<\"B-2\"\>",
HoldForm],
TagBox["\<\"B-3\"\>",
HoldForm],
TagBox["\<\"C-1\"\>",
HoldForm],
TagBox["\<\"C-2\"\>",
HoldForm],
TagBox["\<\"Ca\"\>",
HoldForm],
TagBox["\<\"Cp\"\>",
HoldForm],
TagBox["\<\"E-1\"\>",
HoldForm],
TagBox["\<\"E-2\"\>",
HoldForm],
TagBox["\<\"E-3\"\>",
HoldForm],
TagBox["\<\"G-1\"\>",
HoldForm],
TagBox["\<\"G-2\"\>",
HoldForm],
TagBox["\<\"I-1\"\>",
HoldForm],
TagBox["\<\"I-2\"\>",
HoldForm],
TagBox["\<\"M\"\>",
HoldForm],
TagBox["\<\"Me-1\"\>",
HoldForm],
TagBox["\<\"Me-2\"\>",
HoldForm],
TagBox["\<\"Me-3\"\>",
HoldForm],
TagBox["\<\"Me-4\"\>",
HoldForm],
TagBox["\<\"Mo\"\>",
HoldForm],
TagBox["\<\"Q\"\>",
HoldForm]},
{
TagBox["\<\"B-1\"\>",
HoldForm], "0.75`", "0.05`", "0.08`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.03`", "0.01`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.01`", "0.01`", "0.04`", "0.`"},
{
TagBox["\<\"B-2\"\>",
HoldForm], "0.04`", "0.67`", "0.03`", "0.02`", "0.`", "0.04`", "0.02`",
"0.`", "0.`", "0.02`", "0.03`", "0.01`", "0.`", "0.`", "0.`", "0.01`",
"0.02`", "0.01`", "0.05`", "0.04`", "0.`"},
{
TagBox["\<\"B-3\"\>",
HoldForm], "0.08`", "0.02`", "0.77`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.06`", "0.01`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.01`", "0.01`", "0.01`", "0.`"},
{
TagBox["\<\"C-1\"\>",
HoldForm], "0.`", "0.02`", "0.`", "0.66`", "0.06`", "0.05`", "0.08`",
"0.04`", "0.`", "0.04`", "0.01`", "0.01`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.03`", "0.`"},
{
TagBox["\<\"C-2\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.06`", "0.64`", "0.01`", "0.02`",
"0.08`", "0.02`", "0.01`", "0.01`", "0.02`", "0.02`", "0.02`", "0.02`",
"0.`", "0.`", "0.`", "0.`", "0.`", "0.06`"},
{
TagBox["\<\"Ca\"\>",
HoldForm], "0.`", "0.04`", "0.`", "0.05`", "0.02`", "0.75`", "0.02`",
"0.01`", "0.`", "0.02`", "0.02`", "0.01`", "0.`", "0.`", "0.`", "0.`",
"0.01`", "0.01`", "0.`", "0.02`", "0.`"},
{
TagBox["\<\"Cp\"\>",
HoldForm], "0.`", "0.02`", "0.`", "0.07`", "0.02`", "0.02`", "0.72`",
"0.04`", "0.02`", "0.04`", "0.`", "0.`", "0.`", "0.`", "0.`", "0.02`",
"0.`", "0.`", "0.`", "0.01`", "0.`"},
{
TagBox["\<\"E-1\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.04`", "0.09`", "0.01`", "0.03`",
"0.73`", "0.04`", "0.02`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.`", "0.`"},
{
TagBox["\<\"E-2\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.`", "0.02`", "0.`", "0.01`",
"0.04`", "0.78`", "0.04`", "0.02`", "0.`", "0.03`", "0.01`", "0.03`",
"0.`", "0.`", "0.`", "0.`", "0.`", "0.`"},
{
TagBox["\<\"E-3\"\>",
HoldForm], "0.`", "0.02`", "0.`", "0.03`", "0.01`", "0.02`", "0.04`",
"0.02`", "0.04`", "0.75`", "0.03`", "0.01`", "0.01`", "0.01`", "0.`",
"0.`", "0.`", "0.`", "0.`", "0.`", "0.`"},
{
TagBox["\<\"G-1\"\>",
HoldForm], "0.04`", "0.03`", "0.06`", "0.01`", "0.01`", "0.03`",
"0.01`", "0.`", "0.02`", "0.03`", "0.64`", "0.07`", "0.`", "0.`", "0.`",
"0.`", "0.01`", "0.`", "0.`", "0.01`", "0.01`"},
{
TagBox["\<\"G-2\"\>",
HoldForm], "0.01`", "0.`", "0.01`", "0.01`", "0.01`", "0.01`", "0.`",
"0.`", "0.`", "0.`", "0.09`", "0.8300000000000001`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.`", "0.`", "0.01`", "0.01`"},
{
TagBox["\<\"I-1\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.`", "0.02`", "0.`", "0.`", "0.`",
"0.02`", "0.01`", "0.`", "0.`", "0.78`", "0.07`", "0.05`", "0.01`",
"0.`", "0.01`", "0.`", "0.`", "0.`"},
{
TagBox["\<\"I-2\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`", "0.01`",
"0.01`", "0.01`", "0.01`", "0.`", "0.06`", "0.85`", "0.02`", "0.`",
"0.01`", "0.`", "0.`", "0.`", "0.`"},
{
TagBox["\<\"M\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`", "0.`",
"0.02`", "0.`", "0.`", "0.`", "0.06`", "0.02`", "0.86`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.01`"},
{
TagBox["\<\"Me-1\"\>",
HoldForm], "0.`", "0.01`", "0.`", "0.`", "0.`", "0.`", "0.02`", "0.`",
"0.`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`", "0.73`", "0.1`",
"0.04`", "0.02`", "0.06`", "0.`"},
{
TagBox["\<\"Me-2\"\>",
HoldForm], "0.`", "0.02`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`",
"0.`", "0.`", "0.01`", "0.`", "0.`", "0.01`", "0.`", "0.1`", "0.63`",
"0.05`", "0.06`", "0.1`", "0.`"},
{
TagBox["\<\"Me-3\"\>",
HoldForm], "0.`", "0.`", "0.01`", "0.`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`", "0.03`", "0.06`",
"0.76`", "0.01`", "0.09`", "0.`"},
{
TagBox["\<\"Me-4\"\>",
HoldForm], "0.01`", "0.04`", "0.01`", "0.`", "0.`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.`", "0.`", "0.`", "0.`", "0.`", "0.02`",
"0.07`", "0.01`", "0.75`", "0.07`", "0.`"},
{
TagBox["\<\"Mo\"\>",
HoldForm], "0.04`", "0.04`", "0.02`", "0.03`", "0.01`", "0.02`",
"0.01`", "0.`", "0.`", "0.`", "0.01`", "0.01`", "0.01`", "0.`", "0.`",
"0.06`", "0.09`", "0.09`", "0.06`", "0.49`", "0.`"},
{
TagBox["\<\"Q\"\>",
HoldForm], "0.`", "0.`", "0.`", "0.`", "0.05`", "0.`", "0.`", "0.`",
"0.`", "0.`", "0.01`", "0.`", "0.`", "0.`", "0.01`", "0.`", "0.`",
"0.`", "0.`", "0.`", "0.9`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{
"B-1", "B-2", "B-3", "C-1", "C-2", "Ca", "Cp", "E-1", "E-2", "E-3",
"G-1", "G-2", "I-1", "I-2", "M", "Me-1", "Me-2", "Me-3", "Me-4", "Mo",
"Q"}, {"B-1", "B-2", "B-3", "C-1", "C-2", "Ca", "Cp", "E-1", "E-2",
"E-3", "G-1", "G-2", "I-1", "I-2", "M", "Me-1", "Me-2", "Me-3", "Me-4",
"Mo", "Q"}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzVsoQ3EcB/BDk9tYVosHzaWYlkhNbEV+SXNZ0SK1Q2wuCUWjyUqKSHlB
JistRsrlQXOZbSKX5Ek0CR0eEDt/bFpRxPidh2+fvi/fb5KuQ90URFGUDCP2
+/QbEyx8R8/2ci6v5g1zHryaTJy7ijTzJtp9ZOFtoblJHtEdGhFS4ugxsfAm
2O8snmLBmnPzmTrNgnSsXlqADrzHVnN28xscRahIb9V2osmSuVAD+mRbrVx7
YaG0z1Wzjqp8jfYSioDrVzp+kkPAMPr3K88j4FPOjWznE/DUDta50PSdmJ9d
9NIpy9xDvUJHP2fzWbyBKScQXO99vkUX7eUpIRUEbKZ3eTiqFNCFkai4UWbk
o2bLwyGnTXtPZ6Na80NoJdri6fNqULWltZBGT4YZcKMWNeO+QKMu/FEMSrk/
qgKoMzizbb4ad+OGaKOGgPD2VCekCWTEG8WJqP64y1eMTrYYEsq4rlu5UqGK
hdwsFg1bulaJagjMSBjRo5bAmVlwztPhf/9XYKedwD8w+dRi
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{
RowBox[{"Round", "[",
RowBox[{"citedciting21DatastanderdizedcitedParciting", ",", "0.01"}],
"]"}], "/.",
RowBox[{"{",
RowBox[{"ComplexInfinity", "\[Rule]", "\"\<None\>\""}], "}"}]}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"ClNames21", ",", "ClNames21"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.432358802659913*^9, 3.432358806649927*^9}, {
3.4323588491922503`*^9, 3.4323588601261673`*^9}, {3.432358911205798*^9,
3.4323589609482803`*^9}, {3.432359083962049*^9, 3.432359109914443*^9}, {
3.4323594842429733`*^9, 3.432359487930627*^9}, {3.4323595234957314`*^9,
3.432359603517198*^9}, 3.432359687560611*^9}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox["\<\"B-1\"\>",
HoldForm],
TagBox["\<\"B-2\"\>",
HoldForm],
TagBox["\<\"B-3\"\>",
HoldForm],
TagBox["\<\"C-1\"\>",
HoldForm],
TagBox["\<\"C-2\"\>",
HoldForm],
TagBox["\<\"Ca\"\>",
HoldForm],
TagBox["\<\"Cp\"\>",
HoldForm],
TagBox["\<\"E-1\"\>",
HoldForm],
TagBox["\<\"E-2\"\>",
HoldForm],
TagBox["\<\"E-3\"\>",
HoldForm],
TagBox["\<\"G-1\"\>",
HoldForm],
TagBox["\<\"G-2\"\>",
HoldForm],
TagBox["\<\"I-1\"\>",
HoldForm],
TagBox["\<\"I-2\"\>",
HoldForm],
TagBox["\<\"M\"\>",
HoldForm],
TagBox["\<\"Me-1\"\>",
HoldForm],
TagBox["\<\"Me-2\"\>",
HoldForm],
TagBox["\<\"Me-3\"\>",
HoldForm],
TagBox["\<\"Me-4\"\>",
HoldForm],
TagBox["\<\"Mo\"\>",
HoldForm],
TagBox["\<\"Q\"\>",
HoldForm]},
{
TagBox["\<\"B-1\"\>",
HoldForm], "1.`", "1.24`", "1.`", "1.08`", "1.76`",
"1.1500000000000001`", "0.97`", "1.31`", "0.78`", "0.53`", "0.89`",
"0.89`", "1.02`", "0.39`", "0.85`", "0.96`", "0.92`", "1.44`", "1.25`",
"0.87`", "1.4000000000000001`"},
{
TagBox["\<\"B-2\"\>",
HoldForm], "0.81`", "1.`", "1.1300000000000001`", "1.05`", "0.81`",
"0.98`", "0.89`", "1.02`", "0.52`", "0.96`", "0.92`", "1.54`",
"0.9500000000000001`", "1.`", "1.03`", "1.05`", "1.02`", "1.19`",
"1.1400000000000001`", "1.08`", "1.82`"},
{
TagBox["\<\"B-3\"\>",
HoldForm], "1.`", "0.89`", "1.`", "1.17`", "0.87`", "1.51`", "0.86`",
"1.04`", "0.9500000000000001`", "0.37`", "1.05`", "1.02`", "0.56`",
"0.18`", "0.3`", "1.1500000000000001`", "0.41000000000000003`", "1.22`",
"1.27`", "0.85`", "7.930000000000001`"},
{
TagBox["\<\"C-1\"\>",
HoldForm], "0.93`", "0.96`", "0.86`", "1.`", "1.03`",
"0.9400000000000001`", "1.1500000000000001`", "0.93`", "1.94`", "1.1`",
"0.91`", "1.04`", "1.16`", "0.88`", "1.1300000000000001`", "0.67`",
"0.31`", "0.5`", "0.66`", "0.97`", "0.59`"},
{
TagBox["\<\"C-2\"\>",
HoldForm], "0.5700000000000001`", "1.23`", "1.1500000000000001`",
"0.97`", "1.`", "0.87`", "1.1400000000000001`", "0.93`", "0.92`",
"0.86`", "0.99`", "2.21`", "1.12`", "1.19`", "1.16`", "1.1`",
"0.7000000000000001`", "1.46`", "0.8200000000000001`", "0.34`",
"1.1`"},
{
TagBox["\<\"Ca\"\>",
HoldForm], "0.87`", "1.02`", "0.66`", "1.06`", "1.1500000000000001`",
"1.`", "0.92`", "1.04`", "1.3`", "1.12`", "0.63`",
"0.6900000000000001`", "1.82`", "1.31`", "3.4`", "0.97`", "1.35`",
"1.67`", "1.04`", "1.27`", "0.77`"},
{
TagBox["\<\"Cp\"\>",
HoldForm], "1.04`", "1.12`", "1.17`", "0.87`", "0.88`", "1.09`", "1.`",
"1.26`", "1.25`", "1.01`", "0.8200000000000001`", "0.77`", "0.81`",
"0.75`", "1.72`", "0.84`", "0.89`", "1.2`", "0.93`",
"1.1300000000000001`", "0.51`"},
{
TagBox["\<\"E-1\"\>",
HoldForm], "0.76`", "0.98`", "0.96`", "1.08`", "1.08`", "0.96`",
"0.79`", "1.`", "1.03`", "0.99`", "0.98`", "1.08`", "0.97`", "1.09`",
"0.7000000000000001`", "0.6`", "1.6500000000000001`", "1.94`", "0.72`",
"0.36`", "0.42`"},
{
TagBox["\<\"E-2\"\>",
HoldForm], "1.29`", "1.92`", "1.05`", "0.51`", "1.08`", "0.77`",
"0.8`", "0.97`", "1.`", "0.89`", "1.08`", "2.64`",
"1.1500000000000001`", "0.66`", "1.1300000000000001`", "1.18`", "1.27`",
"1.49`", "1.86`", "0.81`", "1.01`"},
{
TagBox["\<\"E-3\"\>",
HoldForm], "1.9000000000000001`", "1.04`", "2.7`", "0.91`", "1.17`",
"0.89`", "0.99`", "1.01`", "1.1300000000000001`", "1.`", "0.92`",
"1.32`", "0.8300000000000001`", "0.8300000000000001`", "1.37`",
"1.6600000000000001`", "0.78`", "1.1`", "2.09`", "0.43`", "1.32`"},
{
TagBox["\<\"G-1\"\>",
HoldForm], "1.1300000000000001`", "1.08`", "0.96`", "1.1`", "1.01`",
"1.59`", "1.22`", "1.02`", "0.93`", "1.09`", "1.`",
"0.8200000000000001`", "0.9`", "0.6900000000000001`", "3.15`", "0.87`",
"1.09`", "0.68`", "1.12`", "1.04`", "0.72`"},
{
TagBox["\<\"G-2\"\>",
HoldForm], "1.1300000000000001`", "0.65`", "0.98`", "0.96`", "0.45`",
"1.44`", "1.3`", "0.93`", "0.38`", "0.76`", "1.23`", "1.`", "0.31`",
"0.`", "1.`", "2.02`", "0.53`", "0.35000000000000003`", "0.58`",
"0.59`", "1.06`"},
{
TagBox["\<\"I-1\"\>",
HoldForm], "0.98`", "1.05`", "1.78`", "0.86`", "0.89`", "0.55`",
"1.23`", "1.04`", "0.87`", "1.21`", "1.12`", "3.25`", "1.`", "1.2`",
"0.91`", "0.98`", "1.1400000000000001`", "0.92`", "0.81`", "0.63`",
"0.48`"},
{
TagBox["\<\"I-2\"\>",
HoldForm], "2.56`", "1.`", "5.63`", "1.1300000000000001`", "0.84`",
"0.77`", "1.33`", "0.92`", "1.53`", "1.21`", "1.44`", "\<\"None\"\>",
"0.8300000000000001`", "1.`", "0.9500000000000001`", "1.42`", "1.7`",
"1.28`", "1.21`", "1.19`", "0.24`"},
{
TagBox["\<\"M\"\>",
HoldForm], "1.18`", "0.97`", "3.3200000000000003`", "0.89`", "0.86`",
"0.29`", "0.58`", "1.44`", "0.89`", "0.73`", "0.32`", "1.`", "1.09`",
"1.05`", "1.`", "1.98`", "4.75`", "0.77`", "0.91`", "0.8`",
"1.1300000000000001`"},
{
TagBox["\<\"Me-1\"\>",
HoldForm], "1.04`", "0.9500000000000001`", "0.87`", "1.5`", "0.91`",
"1.03`", "1.18`", "1.67`", "0.85`", "0.6`", "1.1500000000000001`",
"0.49`", "1.02`", "0.7000000000000001`", "0.5`", "1.`", "0.97`",
"1.07`", "0.9`", "1.01`", "0.5700000000000001`"},
{
TagBox["\<\"Me-2\"\>",
HoldForm], "1.08`", "0.98`", "2.41`", "3.27`", "1.44`", "0.74`",
"1.1300000000000001`", "0.61`", "0.79`", "1.29`", "0.92`",
"1.8900000000000001`", "0.88`", "0.59`", "0.21`", "1.03`", "1.`",
"0.91`", "0.9500000000000001`", "1.11`", "0.56`"},
{
TagBox["\<\"Me-3\"\>",
HoldForm], "0.6900000000000001`", "0.84`", "0.8200000000000001`",
"2.02`", "0.68`", "0.6`", "0.8300000000000001`", "0.52`", "0.67`",
"0.91`", "1.48`", "2.87`", "1.08`", "0.78`", "1.31`",
"0.9400000000000001`", "1.1`", "1.`", "1.02`", "1.02`", "2.77`"},
{
TagBox["\<\"Me-4\"\>",
HoldForm], "0.8`", "0.88`", "0.79`", "1.52`", "1.22`", "0.96`",
"1.07`", "1.3800000000000001`", "0.54`", "0.48`", "0.89`", "1.71`",
"1.23`", "0.8300000000000001`", "1.1`", "1.11`", "1.05`", "0.98`",
"1.`", "1.08`", "0.`"},
{
TagBox["\<\"Mo\"\>",
HoldForm], "1.1500000000000001`", "0.93`", "1.18`", "1.03`", "2.97`",
"0.79`", "0.88`", "2.8000000000000003`", "1.24`", "2.31`", "0.96`",
"1.68`", "1.58`", "0.84`", "1.25`", "0.99`", "0.9`", "0.98`", "0.93`",
"1.`", "1.6`"},
{
TagBox["\<\"Q\"\>",
HoldForm], "0.72`", "0.55`", "0.13`", "1.7`", "0.91`", "1.29`",
"1.94`", "2.4`", "0.99`", "0.76`", "1.3900000000000001`",
"0.9500000000000001`", "2.07`", "4.25`", "0.88`", "1.76`", "1.8`",
"0.36`", "\<\"None\"\>", "0.62`", "1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{
"B-1", "B-2", "B-3", "C-1", "C-2", "Ca", "Cp", "E-1", "E-2", "E-3",
"G-1", "G-2", "I-1", "I-2", "M", "Me-1", "Me-2", "Me-3", "Me-4", "Mo",
"Q"}, {"B-1", "B-2", "B-3", "C-1", "C-2", "Ca", "Cp", "E-1", "E-2",
"E-3", "G-1", "G-2", "I-1", "I-2", "M", "Me-1", "Me-2", "Me-3", "Me-4",
"Mo", "Q"}}]]]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGAwAOI0KwPWbZNeOlrucBEH0T8XiordA9IeddU7y6e+dFwi
J1boMe2l48Mte76rzXjpmFeTpOUApP0ea4SDaDaB5TtdgfRsuSWJBUC6SWcF
exmQnt+0MWTD65eO31j3xWwG0nMF07d7MrxynHFYZ+IJ81eOdfcZ/lnavnJM
KFjcscPuleO/Ga3xu0H0NKE/+4D0vR2m+vuB9CeFXfUguuSoXNkd/1eOy1vf
P78LpNvfBqiyBrxyDPH6ZMkJpNvSY525gXTLJbMqHiD9mfHZYRBdxfU02hRI
d1Y/ZQ8B0oyVje+igHTRn2znaCDN/uau42Ug/en+nctXgPSORV947wDpAIHv
of+AtPlKg+zF4a8cQ7M6oquiXjlqtl9MEop+5bh4T62cApAO9y197wGkZRUq
5L2B9DyXtTd8gLSdvZXhSyAtZ3LbRzTmleOq1U9EnyQC5c8IXmRJeuVYr/L7
356cV44Af9LBXg==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{
RowBox[{"Round", "[",
RowBox[{"citedciting21DatastanderdizedcitedParciting", ",", "0.01"}],
"]"}], "/.",
RowBox[{"{",
RowBox[{"ComplexInfinity", "\[Rule]", "\"\<None\>\""}], "}"}]}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"Flatten", "[", "jFieldName21", "]"}], ",",
RowBox[{"Flatten", "[", "jFieldName21withLF", "]"}]}], "}"}]}], ",",
RowBox[{"TableSpacing", "\[Rule]",
RowBox[{"{",
RowBox[{"0.5", ",", "0.5"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.432358802659913*^9, 3.432358806649927*^9}, {
3.4323588491922503`*^9, 3.4323588601261673`*^9}, {3.432358911205798*^9,
3.4323589609482803`*^9}, {3.432359083962049*^9, 3.432359109914443*^9}, {
3.4323594842429733`*^9, 3.432359487930627*^9}, {3.4323595234957314`*^9,
3.432359603517198*^9}, 3.432359687560611*^9, {3.531628362669537*^9,
3.53162836893647*^9}, {3.5316284027918377`*^9, 3.531628431465426*^9}, {
3.531628572604377*^9, 3.53162857907757*^9}, {3.531628752996044*^9,
3.531628769022311*^9}, {3.531628823728121*^9, 3.531628852519601*^9}, {
3.531629278003483*^9, 3.531629284508527*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
HoldForm],
TagBox["\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>",
HoldForm],
TagBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
HoldForm],
TagBox["\<\"\:5316\:5b66\"\>",
HoldForm],
TagBox["\<\"\:7269\:6027\:7269\:7406\"\>",
HoldForm],
TagBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
HoldForm],
TagBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
HoldForm],
TagBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\:30b9\"\
\>",
HoldForm],
TagBox["\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>",
HoldForm],
TagBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\:30ae\
\:30fc\\n\:5de5\:5b66\"\>",
HoldForm],
TagBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
HoldForm],
TagBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
HoldForm],
TagBox["\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>",
HoldForm],
TagBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
HoldForm],
TagBox["\<\"\:6570\:5b66\"\>",
HoldForm],
TagBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
HoldForm],
TagBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
HoldForm],
TagBox["\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>",
HoldForm],
TagBox["\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>",
HoldForm],
TagBox["\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>",
HoldForm],
TagBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>",
HoldForm]},
{
TagBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
HoldForm], "1.`", "1.24`", "1.`", "1.08`", "1.76`",
"1.1500000000000001`", "0.97`", "1.31`", "0.78`", "0.53`", "0.89`",
"0.89`", "1.02`", "0.39`", "0.85`", "0.96`", "0.92`", "1.44`", "1.25`",
"0.87`", "1.4000000000000001`"},
{
TagBox["\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
HoldForm], "0.81`", "1.`", "1.1300000000000001`", "1.05`", "0.81`",
"0.98`", "0.89`", "1.02`", "0.52`", "0.96`", "0.92`", "1.54`",
"0.9500000000000001`", "1.`", "1.03`", "1.05`", "1.02`", "1.19`",
"1.1400000000000001`", "1.08`", "1.82`"},
{
TagBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
HoldForm], "1.`", "0.89`", "1.`", "1.17`", "0.87`", "1.51`", "0.86`",
"1.04`", "0.9500000000000001`", "0.37`", "1.05`", "1.02`", "0.56`",
"0.18`", "0.3`", "1.1500000000000001`", "0.41000000000000003`", "1.22`",
"1.27`", "0.85`", "7.930000000000001`"},
{
TagBox["\<\"\:5316\:5b66\"\>",
HoldForm], "0.93`", "0.96`", "0.86`", "1.`", "1.03`",
"0.9400000000000001`", "1.1500000000000001`", "0.93`", "1.94`", "1.1`",
"0.91`", "1.04`", "1.16`", "0.88`", "1.1300000000000001`", "0.67`",
"0.31`", "0.5`", "0.66`", "0.97`", "0.59`"},
{
TagBox["\<\"\:7269\:6027\:7269\:7406\"\>",
HoldForm], "0.5700000000000001`", "1.23`", "1.1500000000000001`",
"0.97`", "1.`", "0.87`", "1.1400000000000001`", "0.93`", "0.92`",
"0.86`", "0.99`", "2.21`", "1.12`", "1.19`", "1.16`", "1.1`",
"0.7000000000000001`", "1.46`", "0.8200000000000001`", "0.34`",
"1.1`"},
{
TagBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
HoldForm], "0.87`", "1.02`", "0.66`", "1.06`", "1.1500000000000001`",
"1.`", "0.92`", "1.04`", "1.3`", "1.12`", "0.63`",
"0.6900000000000001`", "1.82`", "1.31`", "3.4`", "0.97`", "1.35`",
"1.67`", "1.04`", "1.27`", "0.77`"},
{
TagBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
HoldForm], "1.04`", "1.12`", "1.17`", "0.87`", "0.88`", "1.09`", "1.`",
"1.26`", "1.25`", "1.01`", "0.8200000000000001`", "0.77`", "0.81`",
"0.75`", "1.72`", "0.84`", "0.89`", "1.2`", "0.93`",
"1.1300000000000001`", "0.51`"},
{
TagBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>",
HoldForm], "0.76`", "0.98`", "0.96`", "1.08`", "1.08`", "0.96`",
"0.79`", "1.`", "1.03`", "0.99`", "0.98`", "1.08`", "0.97`", "1.09`",
"0.7000000000000001`", "0.6`", "1.6500000000000001`", "1.94`", "0.72`",
"0.36`", "0.42`"},
{
TagBox["\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
HoldForm], "1.29`", "1.92`", "1.05`", "0.51`", "1.08`", "0.77`",
"0.8`", "0.97`", "1.`", "0.89`", "1.08`", "2.64`",
"1.1500000000000001`", "0.66`", "1.1300000000000001`", "1.18`", "1.27`",
"1.49`", "1.86`", "0.81`", "1.01`"},
{
TagBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\
\:5de5\:5b66\"\>",
HoldForm], "1.9000000000000001`", "1.04`", "2.7`", "0.91`", "1.17`",
"0.89`", "0.99`", "1.01`", "1.1300000000000001`", "1.`", "0.92`",
"1.32`", "0.8300000000000001`", "0.8300000000000001`", "1.37`",
"1.6600000000000001`", "0.78`", "1.1`", "2.09`", "0.43`", "1.32`"},
{
TagBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
HoldForm], "1.1300000000000001`", "1.08`", "0.96`", "1.1`", "1.01`",
"1.59`", "1.22`", "1.02`", "0.93`", "1.09`", "1.`",
"0.8200000000000001`", "0.9`", "0.6900000000000001`", "3.15`", "0.87`",
"1.09`", "0.68`", "1.12`", "1.04`", "0.72`"},
{
TagBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
HoldForm], "1.1300000000000001`", "0.65`", "0.98`", "0.96`", "0.45`",
"1.44`", "1.3`", "0.93`", "0.38`", "0.76`", "1.23`", "1.`", "0.31`",
"0.`", "1.`", "2.02`", "0.53`", "0.35000000000000003`", "0.58`",
"0.59`", "1.06`"},
{
TagBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
HoldForm], "0.98`", "1.05`", "1.78`", "0.86`", "0.89`", "0.55`",
"1.23`", "1.04`", "0.87`", "1.21`", "1.12`", "3.25`", "1.`", "1.2`",
"0.91`", "0.98`", "1.1400000000000001`", "0.92`", "0.81`", "0.63`",
"0.48`"},
{
TagBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
HoldForm], "2.56`", "1.`", "5.63`", "1.1300000000000001`", "0.84`",
"0.77`", "1.33`", "0.92`", "1.53`", "1.21`", "1.44`", "\<\"None\"\>",
"0.8300000000000001`", "1.`", "0.9500000000000001`", "1.42`", "1.7`",
"1.28`", "1.21`", "1.19`", "0.24`"},
{
TagBox["\<\"\:6570\:5b66\"\>",
HoldForm], "1.18`", "0.97`", "3.3200000000000003`", "0.89`", "0.86`",
"0.29`", "0.58`", "1.44`", "0.89`", "0.73`", "0.32`", "1.`", "1.09`",
"1.05`", "1.`", "1.98`", "4.75`", "0.77`", "0.91`", "0.8`",
"1.1300000000000001`"},
{
TagBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
HoldForm], "1.04`", "0.9500000000000001`", "0.87`", "1.5`", "0.91`",
"1.03`", "1.18`", "1.67`", "0.85`", "0.6`", "1.1500000000000001`",
"0.49`", "1.02`", "0.7000000000000001`", "0.5`", "1.`", "0.97`",
"1.07`", "0.9`", "1.01`", "0.5700000000000001`"},
{
TagBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
HoldForm], "1.08`", "0.98`", "2.41`", "3.27`", "1.44`", "0.74`",
"1.1300000000000001`", "0.61`", "0.79`", "1.29`", "0.92`",
"1.8900000000000001`", "0.88`", "0.59`", "0.21`", "1.03`", "1.`",
"0.91`", "0.9500000000000001`", "1.11`", "0.56`"},
{
TagBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
HoldForm], "0.6900000000000001`", "0.84`", "0.8200000000000001`",
"2.02`", "0.68`", "0.6`", "0.8300000000000001`", "0.52`", "0.67`",
"0.91`", "1.48`", "2.87`", "1.08`", "0.78`", "1.31`",
"0.9400000000000001`", "1.1`", "1.`", "1.02`", "1.02`", "2.77`"},
{
TagBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
HoldForm], "0.8`", "0.88`", "0.79`", "1.52`", "1.22`", "0.96`",
"1.07`", "1.3800000000000001`", "0.54`", "0.48`", "0.89`", "1.71`",
"1.23`", "0.8300000000000001`", "1.1`", "1.11`", "1.05`", "0.98`",
"1.`", "1.08`", "0.`"},
{
TagBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
HoldForm], "1.1500000000000001`", "0.93`", "1.18`", "1.03`", "2.97`",
"0.79`", "0.88`", "2.8000000000000003`", "1.24`", "2.31`", "0.96`",
"1.68`", "1.58`", "0.84`", "1.25`", "0.99`", "0.9`", "0.98`", "0.93`",
"1.`", "1.6`"},
{
TagBox["\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>",
HoldForm], "0.72`", "0.55`", "0.13`", "1.7`", "0.91`", "1.29`",
"1.94`", "2.4`", "0.99`", "0.76`", "1.3900000000000001`",
"0.9500000000000001`", "2.07`", "4.25`", "0.88`", "1.76`", "1.8`",
"0.36`", "\<\"None\"\>", "0.62`", "1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.35]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {{
Offset[0.2]}}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[
BoxForm`e$,
TableHeadings -> {{
"\:52d5\:690d\:7269\:5b66", "\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66",
"\:6c34\:7523\:30fb\:6d77\:6d0b", "\:5316\:5b66",
"\:7269\:6027\:7269\:7406", "\:5206\:6790\:5316\:5b66",
"\:5fdc\:7528\:5316\:5b66",
"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9",
"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9",
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66", "\:6c17\:8c61\:30fb\:74b0\:5883", "\:5730\:7403\:79d1\:5b66",
"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", "\:6570\:7406\:5de5\:5b66",
"\:6570\:5b66", "\:81e8\:5e8a\:533b\:5b661",
"\:81e8\:5e8a\:533b\:5b662",
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66",
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7",
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66",
"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406"}, {
"\:52d5\:690d\:7269\:5b66", "\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66",
"\:6c34\:7523\:30fb\:6d77\:6d0b", "\:5316\:5b66",
"\:7269\:6027\:7269\:7406", "\:5206\:6790\:5316\:5b66",
"\:5fdc\:7528\:5316\:5b66",
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9",
"\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9",
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", "\:6c17\:8c61\:30fb\:74b0\:5883", "\:5730\:7403\:79d1\:5b66",
"\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", "\:6570\:7406\:5de5\:5b66",
"\:6570\:5b66", "\:81e8\:5e8a\:533b\:5b661",
"\:81e8\:5e8a\:533b\:5b662",
"\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66",
"\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7",
"\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66",
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406"}},
TableSpacing -> {0.5, 0.5}]]]], "Output",
CellChangeTimes->{
3.531628372851283*^9, {3.531628410920422*^9, 3.531628433592218*^9},
3.531628581476252*^9, {3.531628758445519*^9, 3.531628769766177*^9}, {
3.531628827093988*^9, 3.53162885286129*^9}, {3.531629270078978*^9,
3.5316292852456017`*^9}, 3.531629521879684*^9, 3.531630111357983*^9,
3.5317132472449293`*^9, 3.531776063232348*^9, 3.531790196129747*^9,
3.531790875420918*^9, 3.532036622983501*^9, 3.532039838923612*^9,
3.532054639701749*^9, 3.532124847893338*^9, 3.535608665571076*^9,
3.5370974363050823`*^9, 3.537408790631713*^9, 3.537436916148114*^9,
3.5375205077168617`*^9, 3.537524987800625*^9, 3.537528517467955*^9,
3.5378487139377832`*^9, 3.537939046899316*^9, 3.5409839831989307`*^9,
3.541051016620907*^9, 3.546671095897636*^9}]
}, Open ]],
Cell["for jsims letter ->", "Text",
CellChangeTimes->{{3.489811824459701*^9, 3.489811857624363*^9}},
FontSize->24],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"asymmetrictable", "=",
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{
RowBox[{"Round", "[",
RowBox[{"citedciting21DatastanderdizedcitedParciting", ",", "0.01"}],
"]"}], "/.",
RowBox[{"{",
RowBox[{"ComplexInfinity", "\[Rule]", "\"\<None\>\""}], "}"}]}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"jFieldName21Text", ",", "jFieldName21withLFText"}], "}"}]}],
",",
RowBox[{"TableSpacing", "\[Rule]",
RowBox[{"{",
RowBox[{"0.75", ",", "0.5"}], "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.432358802659913*^9, 3.432358806649927*^9}, {
3.4323588491922503`*^9, 3.4323588601261673`*^9}, {3.432358911205798*^9,
3.4323589609482803`*^9}, {3.432359083962049*^9, 3.432359109914443*^9}, {
3.4323594842429733`*^9, 3.432359487930627*^9}, {3.4323595234957314`*^9,
3.432359603517198*^9}, 3.432359687560611*^9, {3.531628362669537*^9,
3.53162836893647*^9}, {3.5316284027918377`*^9, 3.531628431465426*^9}, {
3.531628572604377*^9, 3.53162857907757*^9}, {3.531628752996044*^9,
3.531628769022311*^9}, {3.531628823728121*^9, 3.531628852519601*^9}, {
3.53162903199586*^9, 3.531629052835881*^9}, {3.531629220996738*^9,
3.531629229945475*^9}, {3.5316294457133303`*^9, 3.531629453236155*^9},
3.531630015412141*^9, {3.531713581981084*^9, 3.531713609053093*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\
\:30ae\:30fc\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]],
HoldForm]},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]],
HoldForm], "1.`", "1.24`", "1.`", "1.08`", "1.76`",
"1.1500000000000001`", "0.97`", "1.31`", "0.78`", "0.53`", "0.89`",
"0.89`", "1.02`", "0.39`", "0.85`", "0.96`", "0.92`", "1.44`", "1.25`",
"0.87`", "1.4000000000000001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]]],
HoldForm], "0.81`", "1.`", "1.1300000000000001`", "1.05`", "0.81`",
"0.98`", "0.89`", "1.02`", "0.52`", "0.96`", "0.92`", "1.54`",
"0.9500000000000001`", "1.`", "1.03`", "1.05`", "1.02`", "1.19`",
"1.1400000000000001`", "1.08`", "1.82`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]],
HoldForm], "1.`", "0.89`", "1.`", "1.17`", "0.87`", "1.51`", "0.86`",
"1.04`", "0.9500000000000001`", "0.37`", "1.05`", "1.02`", "0.56`",
"0.18`", "0.3`", "1.1500000000000001`", "0.41000000000000003`", "1.22`",
"1.27`", "0.85`", "7.930000000000001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.93`", "0.96`", "0.86`", "1.`", "1.03`",
"0.9400000000000001`", "1.1500000000000001`", "0.93`", "1.94`", "1.1`",
"0.91`", "1.04`", "1.16`", "0.88`", "1.1300000000000001`", "0.67`",
"0.31`", "0.5`", "0.66`", "0.97`", "0.59`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]],
HoldForm], "0.5700000000000001`", "1.23`", "1.1500000000000001`",
"0.97`", "1.`", "0.87`", "1.1400000000000001`", "0.93`", "0.92`",
"0.86`", "0.99`", "2.21`", "1.12`", "1.19`", "1.16`", "1.1`",
"0.7000000000000001`", "1.46`", "0.8200000000000001`", "0.34`",
"1.1`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.87`", "1.02`", "0.66`", "1.06`", "1.1500000000000001`",
"1.`", "0.92`", "1.04`", "1.3`", "1.12`", "0.63`",
"0.6900000000000001`", "1.82`", "1.31`", "3.4`", "0.97`", "1.35`",
"1.67`", "1.04`", "1.27`", "0.77`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]],
HoldForm], "1.04`", "1.12`", "1.17`", "0.87`", "0.88`", "1.09`", "1.`",
"1.26`", "1.25`", "1.01`", "0.8200000000000001`", "0.77`", "0.81`",
"0.75`", "1.72`", "0.84`", "0.89`", "1.2`", "0.93`",
"1.1300000000000001`", "0.51`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]],
HoldForm], "0.76`", "0.98`", "0.96`", "1.08`", "1.08`", "0.96`",
"0.79`", "1.`", "1.03`", "0.99`", "0.98`", "1.08`", "0.97`", "1.09`",
"0.7000000000000001`", "0.6`", "1.6500000000000001`", "1.94`", "0.72`",
"0.36`", "0.42`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]]],
HoldForm], "1.29`", "1.92`", "1.05`", "0.51`", "1.08`", "0.77`",
"0.8`", "0.97`", "1.`", "0.89`", "1.08`", "2.64`",
"1.1500000000000001`", "0.66`", "1.1300000000000001`", "1.18`", "1.27`",
"1.49`", "1.86`", "0.81`", "1.01`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\\n\:30cd\:30eb\
\:30ae\:30fc\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\
\:30cd\:30eb\:30ae\:30fc\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "1.9000000000000001`", "1.04`", "2.7`", "0.91`", "1.17`",
"0.89`", "0.99`", "1.01`", "1.1300000000000001`", "1.`", "0.92`",
"1.32`", "0.8300000000000001`", "0.8300000000000001`", "1.37`",
"1.6600000000000001`", "0.78`", "1.1`", "2.09`", "0.43`", "1.32`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]],
HoldForm], "1.1300000000000001`", "1.08`", "0.96`", "1.1`", "1.01`",
"1.59`", "1.22`", "1.02`", "0.93`", "1.09`", "1.`",
"0.8200000000000001`", "0.9`", "0.6900000000000001`", "3.15`", "0.87`",
"1.09`", "0.68`", "1.12`", "1.04`", "0.72`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "1.1300000000000001`", "0.65`", "0.98`", "0.96`", "0.45`",
"1.44`", "1.3`", "0.93`", "0.38`", "0.76`", "1.23`", "1.`", "0.31`",
"0.`", "1.`", "2.02`", "0.53`", "0.35000000000000003`", "0.58`",
"0.59`", "1.06`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.98`", "1.05`", "1.78`", "0.86`", "0.89`", "0.55`",
"1.23`", "1.04`", "0.87`", "1.21`", "1.12`", "3.25`", "1.`", "1.2`",
"0.91`", "0.98`", "1.1400000000000001`", "0.92`", "0.81`", "0.63`",
"0.48`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "2.56`", "1.`", "5.63`", "1.1300000000000001`", "0.84`",
"0.77`", "1.33`", "0.92`", "1.53`", "1.21`", "1.44`", "\<\"None\"\>",
"0.8300000000000001`", "1.`", "0.9500000000000001`", "1.42`", "1.7`",
"1.28`", "1.21`", "1.19`", "0.24`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 10]]],
HoldForm], "1.18`", "0.97`", "3.3200000000000003`", "0.89`", "0.86`",
"0.29`", "0.58`", "1.44`", "0.89`", "0.73`", "0.32`", "1.`", "1.09`",
"1.05`", "1.`", "1.98`", "4.75`", "0.77`", "0.91`", "0.8`",
"1.1300000000000001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]],
HoldForm], "1.04`", "0.9500000000000001`", "0.87`", "1.5`", "0.91`",
"1.03`", "1.18`", "1.67`", "0.85`", "0.6`", "1.1500000000000001`",
"0.49`", "1.02`", "0.7000000000000001`", "0.5`", "1.`", "0.97`",
"1.07`", "0.9`", "1.01`", "0.5700000000000001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]],
HoldForm], "1.08`", "0.98`", "2.41`", "3.27`", "1.44`", "0.74`",
"1.1300000000000001`", "0.61`", "0.79`", "1.29`", "0.92`",
"1.8900000000000001`", "0.88`", "0.59`", "0.21`", "1.03`", "1.`",
"0.91`", "0.9500000000000001`", "1.11`", "0.56`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "0.6900000000000001`", "0.84`", "0.8200000000000001`",
"2.02`", "0.68`", "0.6`", "0.8300000000000001`", "0.52`", "0.67`",
"0.91`", "1.48`", "2.87`", "1.08`", "0.78`", "1.31`",
"0.9400000000000001`", "1.1`", "1.`", "1.02`", "1.02`", "2.77`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
HoldForm], "0.8`", "0.88`", "0.79`", "1.52`", "1.22`", "0.96`",
"1.07`", "1.3800000000000001`", "0.54`", "0.48`", "0.89`", "1.71`",
"1.23`", "0.8300000000000001`", "1.1`", "1.11`", "1.05`", "0.98`",
"1.`", "1.08`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
HoldForm], "1.1500000000000001`", "0.93`", "1.18`", "1.03`", "2.97`",
"0.79`", "0.88`", "2.8000000000000003`", "1.24`", "2.31`", "0.96`",
"1.68`", "1.58`", "0.84`", "1.25`", "0.99`", "0.9`", "0.98`", "0.93`",
"1.`", "1.6`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]],
HoldForm], "0.72`", "0.55`", "0.13`", "1.7`", "0.91`", "1.29`",
"1.94`", "2.4`", "0.99`", "0.76`", "1.3900000000000001`",
"0.9500000000000001`", "2.07`", "4.25`", "0.88`", "1.76`", "1.8`",
"0.36`", "\<\"None\"\>", "0.62`", "1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.35]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.3]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[BoxForm`e$, TableHeadings -> {{
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]}, {
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]],
Text[
Style["\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]],
Text[
Style["\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:5b66", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]],
Text[
Style["\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]],
Text[
Style["\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]}}, TableSpacing -> {0.75, 0.5}]]]], "Output",
CellChangeTimes->{{3.531629015055949*^9, 3.53162905326554*^9},
3.5316292310442*^9, 3.531629289357963*^9, 3.531629338321783*^9,
3.531629454243206*^9, 3.531629522157402*^9, {3.531629994714869*^9,
3.531630015837036*^9}, 3.5316301116419277`*^9, 3.531713247534539*^9,
3.531713613794981*^9, 3.5317760635121193`*^9, 3.531790196217599*^9,
3.531790875484407*^9, 3.532036623043613*^9, 3.532039838953726*^9,
3.5320546397759657`*^9, 3.532124847950308*^9, 3.535608665721287*^9,
3.537097436355523*^9, 3.5374087908127747`*^9, 3.537436916581378*^9,
3.537520507778742*^9, 3.537524987863168*^9, 3.5375285176453037`*^9,
3.5378487139749393`*^9, 3.537939046957213*^9, 3.540983983263075*^9,
3.5410510168056107`*^9, 3.546671095957329*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"asymmetrictable", "=",
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{
RowBox[{"Ceiling", "[",
RowBox[{"citedciting21DatastanderdizedcitedParciting", ",", "1"}],
"]"}], "/.",
RowBox[{"{",
RowBox[{"ComplexInfinity", "\[Rule]", "\"\<None\>\""}], "}"}]}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"jFieldName21Text", ",", "jFieldName21withLFText"}], "}"}]}],
",",
RowBox[{"TableSpacing", "\[Rule]",
RowBox[{"{",
RowBox[{"0.75", ",", "0.5"}], "}"}]}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.432358802659913*^9, 3.432358806649927*^9}, {
3.4323588491922503`*^9, 3.4323588601261673`*^9}, {3.432358911205798*^9,
3.4323589609482803`*^9}, {3.432359083962049*^9, 3.432359109914443*^9}, {
3.4323594842429733`*^9, 3.432359487930627*^9}, {3.4323595234957314`*^9,
3.432359603517198*^9}, 3.432359687560611*^9, {3.531628362669537*^9,
3.53162836893647*^9}, {3.5316284027918377`*^9, 3.531628431465426*^9}, {
3.531628572604377*^9, 3.53162857907757*^9}, {3.531628752996044*^9,
3.531628769022311*^9}, {3.531628823728121*^9, 3.531628852519601*^9}, {
3.53162903199586*^9, 3.531629052835881*^9}, {3.531629220996738*^9,
3.531629229945475*^9}, {3.5316294457133303`*^9, 3.531629453236155*^9},
3.531630015412141*^9, {3.531713581981084*^9, 3.531713609053093*^9}, {
3.532132757180722*^9, 3.532132768278593*^9}, {3.532142675371323*^9,
3.532142680767666*^9}, {3.532142802736506*^9, 3.532142805589464*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\
\:30ae\:30fc\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]],
HoldForm]},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]],
HoldForm], "1", "2", "1", "2", "2", "2", "1", "2", "1", "1", "1", "1",
"2", "1", "1", "1", "1", "2", "2", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]]],
HoldForm], "1", "1", "2", "2", "1", "1", "1", "2", "1", "1", "1", "2",
"1", "2", "2", "2", "2", "2", "2", "2", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]],
HoldForm], "2", "1", "1", "2", "1", "2", "1", "2", "1", "1", "2", "2",
"1", "1", "1", "2", "1", "2", "2", "1", "8"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]],
HoldForm], "1", "1", "1", "1", "2", "1", "2", "1", "2", "2", "1", "2",
"2", "1", "2", "1", "1", "1", "1", "1", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]],
HoldForm], "1", "2", "2", "1", "1", "1", "2", "1", "1", "1", "1", "3",
"2", "2", "2", "2", "1", "2", "1", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]]],
HoldForm], "1", "2", "1", "2", "2", "1", "1", "2", "2", "2", "1", "1",
"2", "2", "4", "1", "2", "2", "2", "2", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]],
HoldForm], "2", "2", "2", "1", "1", "2", "1", "2", "2", "2", "1", "1",
"1", "1", "2", "1", "1", "2", "1", "2", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]],
HoldForm], "1", "1", "1", "2", "2", "1", "1", "1", "2", "1", "1", "2",
"1", "2", "1", "1", "2", "2", "1", "1", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]]],
HoldForm], "2", "2", "2", "1", "2", "1", "1", "1", "1", "1", "2", "3",
"2", "1", "2", "2", "2", "2", "2", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\\n\:30cd\:30eb\
\:30ae\:30fc\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\
\:30cd\:30eb\:30ae\:30fc\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "2", "2", "3", "1", "2", "1", "1", "2", "2", "1", "1", "2",
"1", "1", "2", "2", "1", "2", "3", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]],
HoldForm], "2", "2", "1", "2", "2", "2", "2", "2", "1", "2", "1", "1",
"1", "1", "4", "1", "2", "1", "2", "2", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "2", "1", "1", "1", "1", "2", "2", "1", "1", "1", "2", "1",
"1", "0", "2", "3", "1", "1", "1", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "1", "2", "2", "1", "1", "1", "2", "2", "1", "2", "2", "4",
"1", "2", "1", "1", "2", "1", "1", "1", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "3", "1", "6", "2", "1", "1", "2", "1", "2", "2",
"2", "\<\"None\"\>", "1", "1", "1", "2", "2", "2", "2", "2", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 10]]],
HoldForm], "2", "1", "4", "1", "1", "1", "1", "2", "1", "1", "1", "1",
"2", "2", "1", "2", "5", "1", "1", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]],
HoldForm], "2", "1", "1", "2", "1", "2", "2", "2", "1", "1", "2", "1",
"2", "1", "1", "1", "1", "2", "1", "2", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]],
HoldForm], "2", "1", "3", "4", "2", "1", "2", "1", "1", "2", "1", "2",
"1", "1", "1", "2", "1", "1", "1", "2", "1"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "1", "1", "1", "3", "1", "1", "1", "1", "1", "1", "2", "3",
"2", "1", "2", "1", "2", "1", "2", "2", "3"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
HoldForm], "1", "1", "1", "2", "2", "1", "2", "2", "1", "1", "1", "2",
"2", "1", "2", "2", "2", "1", "1", "2", "0"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
HoldForm], "2", "1", "2", "2", "3", "1", "1", "3", "2", "3", "1", "2",
"2", "1", "2", "1", "1", "1", "1", "1", "2"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]],
HoldForm], "1", "1", "1", "2", "1", "2", "2", "3", "1", "1", "2", "1",
"3", "5", "1", "2", "2", "1", "\<\"None\"\>", "1", "1"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.35]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.3]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[BoxForm`e$, TableHeadings -> {{
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]}, {
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]],
Text[
Style["\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]],
Text[
Style["\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:5b66", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]],
Text[
Style["\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]],
Text[
Style["\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]}}, TableSpacing -> {0.75, 0.5}]]]], "Output",
CellChangeTimes->{{3.5321327498700247`*^9, 3.532132769508852*^9},
3.5321426817730017`*^9, 3.532142806818441*^9, 3.53560866579006*^9,
3.537097436404291*^9, 3.5374087909149837`*^9, 3.537436916713739*^9,
3.537520507852188*^9, 3.537524987936633*^9, 3.5375285179589653`*^9,
3.537848714021227*^9, 3.537939047030966*^9, 3.540983983328294*^9,
3.541051016900659*^9, 3.5466710960104*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Tr", "[",
RowBox[{
RowBox[{
RowBox[{"Round", "[",
RowBox[{"citedciting21DatastanderdizedcitedParciting", ",", "0.01"}],
"]"}], "/.",
RowBox[{"{",
RowBox[{"ComplexInfinity", "\[Rule]", "\"\<None\>\""}], "}"}]}], ",",
"List"}], "]"}]], "Input",
CellChangeTimes->{{3.432358802659913*^9, 3.432358806649927*^9}, {
3.4323588491922503`*^9, 3.4323588601261673`*^9}, {3.432358911205798*^9,
3.4323589609482803`*^9}, {3.432359083962049*^9, 3.432359109914443*^9}, {
3.4323594842429733`*^9, 3.432359487930627*^9}, {3.4323595234957314`*^9,
3.432359603517198*^9}, 3.432359687560611*^9, {3.531628362669537*^9,
3.53162836893647*^9}, {3.5316284027918377`*^9, 3.531628431465426*^9}, {
3.531628572604377*^9, 3.53162857907757*^9}, {3.531628752996044*^9,
3.531628769022311*^9}, {3.531628823728121*^9, 3.531628852519601*^9}, {
3.53162903199586*^9, 3.531629052835881*^9}, {3.531629220996738*^9,
3.531629229945475*^9}, {3.5316294457133303`*^9, 3.531629453236155*^9},
3.531630015412141*^9, {3.531713581981084*^9, 3.531713609053093*^9}, {
3.532142907521761*^9, 3.532142928081727*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",",
"1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",",
"1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",", "1.`", ",",
"1.`", ",", "1.`", ",", "1.`"}], "}"}]], "Output",
CellChangeTimes->{{3.5321429159477262`*^9, 3.532142928634425*^9},
3.535608665848791*^9, 3.537097436529882*^9, 3.537408790995088*^9,
3.537436916772462*^9, 3.537520508007942*^9, 3.537524987979274*^9,
3.537528518034155*^9, 3.537848714050729*^9, 3.537939047171109*^9,
3.540983983376689*^9, 3.541051016985999*^9, 3.546671096043531*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"asymmetricEffectTable", "=",
RowBox[{
RowBox[{
RowBox[{"Ceiling", "[",
RowBox[{"citedciting21DatastanderdizedcitedParciting", ",", "1"}],
"]"}], "-", "1"}], "/.",
RowBox[{"{",
RowBox[{"ComplexInfinity", "\[Rule]", "\"\<None\>\""}], "}"}]}]}],
")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5321429716393957`*^9, 3.5321430445295343`*^9}, {
3.532143133565571*^9, 3.5321431755054913`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"0", "1", "0", "1", "1", "1", "0", "1", "0", "0", "0", "0", "1", "0",
"0", "0", "0", "1", "1", "0", "1"},
{"0", "0", "1", "1", "0", "0", "0", "1", "0", "0", "0", "1", "0", "1",
"1", "1", "1", "1", "1", "1", "1"},
{"1", "0", "0", "1", "0", "1", "0", "1", "0", "0", "1", "1", "0", "0",
"0", "1", "0", "1", "1", "0", "7"},
{"0", "0", "0", "0", "1", "0", "1", "0", "1", "1", "0", "1", "1", "0",
"1", "0", "0", "0", "0", "0", "0"},
{"0", "1", "1", "0", "0", "0", "1", "0", "0", "0", "0", "2", "1", "1",
"1", "1", "0", "1", "0", "0", "1"},
{"0", "1", "0", "1", "1", "0", "0", "1", "1", "1", "0", "0", "1", "1",
"3", "0", "1", "1", "1", "1", "0"},
{"1", "1", "1", "0", "0", "1", "0", "1", "1", "1", "0", "0", "0", "0",
"1", "0", "0", "1", "0", "1", "0"},
{"0", "0", "0", "1", "1", "0", "0", "0", "1", "0", "0", "1", "0", "1",
"0", "0", "1", "1", "0", "0", "0"},
{"1", "1", "1", "0", "1", "0", "0", "0", "0", "0", "1", "2", "1", "0",
"1", "1", "1", "1", "1", "0", "1"},
{"1", "1", "2", "0", "1", "0", "0", "1", "1", "0", "0", "1", "0", "0",
"1", "1", "0", "1", "2", "0", "1"},
{"1", "1", "0", "1", "1", "1", "1", "1", "0", "1", "0", "0", "0", "0",
"3", "0", "1", "0", "1", "1", "0"},
{"1", "0", "0", "0", "0", "1", "1", "0", "0", "0", "1", "0", "0",
RowBox[{"-", "1"}], "1", "2", "0", "0", "0", "0", "1"},
{"0", "1", "1", "0", "0", "0", "1", "1", "0", "1", "1", "3", "0", "1",
"0", "0", "1", "0", "0", "0", "0"},
{"2", "0", "5", "1", "0", "0", "1", "0", "1", "1", "1", "\<\"None\"\>",
"0", "0", "0", "1", "1", "1", "1", "1", "0"},
{"1", "0", "3", "0", "0", "0", "0", "1", "0", "0", "0", "0", "1", "1",
"0", "1", "4", "0", "0", "0", "1"},
{"1", "0", "0", "1", "0", "1", "1", "1", "0", "0", "1", "0", "1", "0",
"0", "0", "0", "1", "0", "1", "0"},
{"1", "0", "2", "3", "1", "0", "1", "0", "0", "1", "0", "1", "0", "0",
"0", "1", "0", "0", "0", "1", "0"},
{"0", "0", "0", "2", "0", "0", "0", "0", "0", "0", "1", "2", "1", "0",
"1", "0", "1", "0", "1", "1", "2"},
{"0", "0", "0", "1", "1", "0", "1", "1", "0", "0", "0", "1", "1", "0",
"1", "1", "1", "0", "0", "1",
RowBox[{"-", "1"}]},
{"1", "0", "1", "1", "2", "0", "0", "2", "1", "2", "0", "1", "1", "0",
"1", "0", "0", "0", "0", "0", "1"},
{"0", "0", "0", "1", "0", "1", "1", "2", "0", "0", "1", "0", "2", "4",
"0", "1", "1", "0", "\<\"None\"\>", "0", "0"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.5321429657428417`*^9, 3.532143045031592*^9},
3.53214317805742*^9, 3.535608665926435*^9, 3.5370974365741873`*^9,
3.5374087910647717`*^9, 3.537436916828765*^9, 3.5375205080710287`*^9,
3.5375249880318117`*^9, 3.537528518100045*^9, 3.5378487140836077`*^9,
3.537939047233819*^9, 3.540983983429864*^9, 3.541051017060774*^9,
3.546671096095648*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"asymmetricEffectTable", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"x_", "/;",
RowBox[{"x", ">", "0"}]}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5321431055446033`*^9, 3.532143106249099*^9}, {
3.532143183474391*^9, 3.5321432501009483`*^9}, {3.532143297041441*^9,
3.53214332424557*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"9", ",", "12", ",", "10", ",", "7", ",", "10", ",", "13", ",", "10", ",",
"7", ",", "13", ",", "12", ",", "12", ",", "7", ",", "9", ",", "12", ",",
"8", ",", "9", ",", "9", ",", "9", ",", "10", ",", "11", ",", "9"}],
"}"}]], "Output",
CellChangeTimes->{{3.532143299140884*^9, 3.532143325295443*^9},
3.53560866598498*^9, 3.537097436617219*^9, 3.537408791127776*^9,
3.537436916872954*^9, 3.5375205081098022`*^9, 3.537524988078966*^9,
3.537528518142799*^9, 3.537848714113214*^9, 3.5379390472741756`*^9,
3.5409839834759703`*^9, 3.541051017186204*^9, 3.546671096142591*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"(",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"asymmetricEffectTable", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"x_", "/;",
RowBox[{"x", ">", "0"}]}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}], "//", "Tr"}], ")"}]], "Input",\
CellChangeTimes->{{3.532143783042776*^9, 3.532143810072545*^9}, {
3.532143857627084*^9, 3.5321438580755577`*^9}}],
Cell[BoxData["208"], "Output",
CellChangeTimes->{{3.5321437860104647`*^9, 3.532143794353046*^9}, {
3.5321438314691772`*^9, 3.532143858563911*^9}, 3.5356086660324163`*^9,
3.5370974366657877`*^9, 3.537408791194912*^9, 3.537436916923985*^9,
3.5375205081673737`*^9, 3.5375249881288233`*^9, 3.5375285181946983`*^9,
3.537848714142344*^9, 3.5379390473241*^9, 3.540983983513886*^9,
3.541051017318652*^9, 3.5466710961899*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"(",
RowBox[{"21", "*", "21"}], ")"}], "-", "21"}], ")"}], "/",
"2"}]], "Input",
CellChangeTimes->{{3.5321438127918577`*^9, 3.532143828430476*^9}}],
Cell[BoxData["210"], "Output",
CellChangeTimes->{3.5321438286296253`*^9, 3.535608666082161*^9,
3.537097436716939*^9, 3.537408791348878*^9, 3.537436916972151*^9,
3.537520508229311*^9, 3.537524988180934*^9, 3.5375285182444963`*^9,
3.537848714171558*^9, 3.537939047373785*^9, 3.540983983560248*^9,
3.5410510174779243`*^9, 3.54667109624592*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Position", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"asymmetricEffectTable", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"x_", "/;",
RowBox[{"x", ">", "0"}]}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}], ",", "13"}], "]"}]], "Input",
CellChangeTimes->{{3.53214339758224*^9, 3.532143412918868*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "6", "}"}], ",",
RowBox[{"{", "9", "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.532143413734812*^9, 3.5356086661320057`*^9,
3.537097436767975*^9, 3.537408791723057*^9, 3.5374369170234013`*^9,
3.537520508277935*^9, 3.537524988228918*^9, 3.5375285182948303`*^9,
3.5378487142017107`*^9, 3.537939047423397*^9, 3.5409839836099577`*^9,
3.541051017520121*^9, 3.5466710962921257`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"6", ",", "9"}], "}"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.5321433670373487`*^9, 3.532143381485908*^9}, {
3.5321434172321453`*^9, 3.532143421721612*^9}, {3.532143492654779*^9,
3.532143501136298*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "\<\"\:5206\:6790\:5316\:5b66\"\>", "}"}], ",",
RowBox[{"{", "\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>", "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.5321433832425547`*^9, 3.532143422075322*^9,
3.5321435025188*^9, 3.535608666170002*^9, 3.537097436818825*^9,
3.537408791814768*^9, 3.537436917074868*^9, 3.5375205083274612`*^9,
3.5375249882806997`*^9, 3.5375285183444853`*^9, 3.537848714231536*^9,
3.537939047480056*^9, 3.5409839836598587`*^9, 3.541051017562645*^9,
3.5466710963275023`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Position", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Count", "[",
RowBox[{
RowBox[{"asymmetricEffectTable", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"x_", "/;",
RowBox[{"x", ">", "0"}]}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",", "21"}], "}"}]}], "]"}], ",", "7"}], "]"}]], "Input",
CellChangeTimes->{{3.53214339758224*^9, 3.532143412918868*^9}, {
3.5321440497987347`*^9, 3.532144050597987*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "4", "}"}], ",",
RowBox[{"{", "8", "}"}], ",",
RowBox[{"{", "12", "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.532144050895936*^9, 3.535608666216195*^9,
3.537097436867505*^9, 3.537408791898635*^9, 3.537436917123913*^9,
3.537520508377618*^9, 3.537524988331224*^9, 3.5375285183943243`*^9,
3.5378487142609167`*^9, 3.537939047523898*^9, 3.540983983709999*^9,
3.541051017605185*^9, 3.546671096373294*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21", "[",
RowBox[{"[",
RowBox[{"{",
RowBox[{"4", ",", "8", ",", "12"}], "}"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.532144060207155*^9, 3.5321440658104353`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "\<\"\:5316\:5b66\"\>", "}"}], ",",
RowBox[{
"{", "\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>",
"}"}], ",",
RowBox[{"{", "\<\"\:5730\:7403\:79d1\:5b66\"\>", "}"}]}], "}"}]], "Output",\
CellChangeTimes->{3.5321440668259*^9, 3.535608666265575*^9,
3.5370974369009867`*^9, 3.537408791982202*^9, 3.5374369171756697`*^9,
3.537520508434949*^9, 3.537524988380081*^9, 3.537528518444841*^9,
3.537848714290522*^9, 3.537939047581089*^9, 3.540983983760569*^9,
3.541051017647492*^9, 3.546671096430282*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Select", "[",
RowBox[{"#", ",",
RowBox[{
RowBox[{"#", "\[GreaterEqual]", "4"}], "&"}]}], "]"}], "&"}], ",",
"citedciting21DatastanderdizedcitedParciting"}], "]"}]], "Input",
CellChangeTimes->{{3.4338074239108257`*^9, 3.433807508157118*^9}, {
3.433809894711644*^9, 3.433809905295444*^9}}],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"GreaterEqual", "::", "nord"}], "MessageName"], ":",
" ", "\<\"\[NoBreak]\\!\\(ComplexInfinity\\)\[NoBreak]\:3068\:306e\:7121\
\:52b9\:306a\:6bd4\:8f03\:304c\:8a66\:307f\:3089\:308c\:307e\:3057\:305f\:ff0e\
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/nord\\\", \
ButtonNote -> \\\"GreaterEqual::nord\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBeIrweX/Kqa+dLTZF13oMe2l46sL33+qzXjp6CfTquUA
pCcXZISD6Igj+rtcgXQB187EAiA94/xO9jIgHfjtWMiG1y8dH0Qfi9kMpPcn
5W33ZHjluCjUeOIJ81eOu1pY/lnavnJkcV3ZscPulSN3Ynf8biB9JVX0zz4g
7bDeQn8/kDZx2FsPol2iVMru+L9yVNn+9fldIM3UGKLKGvDKUWfGV0tOIH1z
aqozN5C2PuJVxQOkM9J/HQbReR9+RZsCaSeDn+whQJpnYfe7KJC+rmLnaCAd
NOGZ42WQup6Hl68A6dpzf3nvAGkGPqawf0B6lapX9uLwV44y9fOiq6JeOcbo
MSULRb9ynHV5pZwCkP70sf+9B5C2+jpB3htIv3l3/oYPkH4V4WX4EkhH9Xzx
EY155Wjx86fok0Sgu0zMLrIkvXKcsVnw/56cV44AHJq1Vg==
"]],
Cell[BoxData[
RowBox[{
StyleBox[
RowBox[{"GreaterEqual", "::", "nord"}], "MessageName"], ":",
" ", "\<\"\[NoBreak]\\!\\(ComplexInfinity\\)\[NoBreak]\:3068\:306e\:7121\
\:52b9\:306a\:6bd4\:8f03\:304c\:8a66\:307f\:3089\:308c\:307e\:3057\:305f\:ff0e\
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/nord\\\", \
ButtonNote -> \\\"GreaterEqual::nord\\\"]\\)\"\>"}]], "Message", "MSG",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBeIrweX/Kqa+dLTZF13oMe2l46sL33+qzXjp6CfTquUA
pCcXZISD6Igj+rtcgXQB187EAiA94/xO9jIgHfjtWMiG1y8dH0Qfi9kMpPcn
5W33ZHjluCjUeOIJ81eOu1pY/lnavnJkcV3ZscPulSN3Ynf8biB9JVX0zz4g
7bDeQn8/kDZx2FsPol2iVMru+L9yVNn+9fldIM3UGKLKGvDKUWfGV0tOIH1z
aqozN5C2PuJVxQOkM9J/HQbReR9+RZsCaSeDn+whQJpnYfe7KJC+rmLnaCAd
NOGZ42WQup6Hl68A6dpzf3nvAGkGPqawf0B6lapX9uLwV44y9fOiq6JeOcbo
MSULRb9ynHV5pZwCkP70sf+9B5C2+jpB3htIv3l3/oYPkH4V4WX4EkhH9Xzx
EY155Wjx86fok0Sgu0zMLrIkAdWfF/y/J+eVIwAabrUU
"]],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "7.92643951599058`", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "5.627149126558891`", "}"}], ",",
RowBox[{"{", "4.745055874141407`", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "}"}], ",",
RowBox[{"{", "4.247593867266565`", "}"}]}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQBWKFj5X/Kqa+dExQySr0mPbS8do1h19qM1466hS2aTkA
6aUG5eEgOuuF/i5XIH3LdldiAZC2er6LvQxIn+s7GbLh9UtHg4XHYjYDabvF
eds9GV453p9pPPGE+SvHnPUs/yxtXzmKNq7s2GH3ypFvXnf8biB9qlX0zz4g
nXHaQn8/kM6J31sPoh3KVMru+L9yfHT76/O7QPrEwhBV1oBXjv1bv1pyAum5
N1KduYF0Dqd3FQ+Q/rb912EQbeD+O9oUSL+t/8keAuIf634XBaTb1hc7RwPp
gO3PHC8D6dqNDy9fAdKbfvzlvQOkWcyYwv4B6WUNXtmLw185Pl8xL7oq6pUj
zwSmZKHoV44m+qvkFID0MdEJ7z2AdInsRHlvIL3D48INHyD9pc7L8CWQfrH+
i49ozCtHM7lfok8SXzne6TG7yJL0yvHGY8H/e3JeOQIA0yi5WQ==
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Standerdized symmetric linkage", "Section",
CellChangeTimes->{{3.43526655391509*^9, 3.435266572516923*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"symmetricLinkage21Datastanderdized", "=",
RowBox[{
"citedciting21Datastanderdized", "+", "citingcited21Datastanderdized"}]}],
";"}]], "Input",
CellChangeTimes->{{3.435214916076404*^9, 3.4352149732805*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{"Round", "[",
RowBox[{"symmetricLinkage21Datastanderdized", ",", "0.001"}], "]"}],
"]"}]], "Input",
CellChangeTimes->{{3.4353768480947847`*^9, 3.4353768542263737`*^9}, {
3.435376888321854*^9, 3.435376899323266*^9}, 3.5316276014431047`*^9}],
Cell[BoxData[
TagBox[GridBox[{
{"1.497`", "0.091`", "0.152`", "0.003`", "0.002`",
"0.009000000000000001`", "0.004`", "0.`", "0.002`", "0.004`", "0.07`",
"0.027`", "0.004`", "0.006`", "0.005`", "0.001`", "0.002`", "0.011`",
"0.026000000000000002`", "0.083`", "0.`"},
{"0.091`", "1.35`", "0.049`", "0.034`", "0.001`", "0.088`", "0.037`",
"0.001`", "0.001`", "0.039`", "0.06`", "0.009000000000000001`", "0.001`",
"0.002`", "0.`", "0.011`", "0.044`", "0.01`", "0.08700000000000001`",
"0.084`", "0.`"},
{"0.152`", "0.049`", "1.55`", "0.003`", "0.001`", "0.008`", "0.002`",
"0.`", "0.01`", "0.001`", "0.115`", "0.029`", "0.001`", "0.002`", "0.`",
"0.002`", "0.002`", "0.018000000000000002`", "0.023`", "0.032`", "0.`"},
{"0.003`", "0.034`", "0.003`", "1.313`", "0.121`", "0.094`", "0.145`",
"0.084`", "0.004`", "0.07200000000000001`", "0.019`", "0.011`", "0.003`",
"0.001`", "0.001`", "0.006`", "0.004`", "0.007`", "0.007`", "0.062`",
"0.004`"},
{"0.002`", "0.001`", "0.001`", "0.121`", "1.285`", "0.031`",
"0.043000000000000003`", "0.17400000000000002`", "0.04`",
"0.026000000000000002`", "0.018000000000000002`", "0.024`", "0.032`",
"0.03`", "0.03`", "0.006`", "0.001`", "0.003`", "0.002`", "0.019`",
"0.109`"},
{"0.009000000000000001`", "0.088`", "0.008`", "0.094`", "0.031`",
"1.502`", "0.045`", "0.019`", "0.006`", "0.036000000000000004`",
"0.057`", "0.016`", "0.005`", "0.003`", "0.`", "0.006`", "0.015`",
"0.009000000000000001`", "0.008`", "0.042`", "0.002`"},
{"0.004`", "0.037`", "0.002`", "0.145`", "0.043000000000000003`",
"0.045`", "1.448`", "0.069`", "0.03`", "0.081`", "0.01`", "0.004`",
"0.002`", "0.001`", "0.001`", "0.033`", "0.006`", "0.004`",
"0.009000000000000001`", "0.025`", "0.001`"},
{"0.`", "0.001`", "0.`", "0.084`", "0.17400000000000002`", "0.019`",
"0.069`", "1.467`", "0.088`", "0.05`", "0.005`", "0.008`",
"0.009000000000000001`", "0.015`", "0.001`", "0.006`", "0.`", "0.`",
"0.`", "0.002`", "0.001`"},
{"0.002`", "0.001`", "0.01`", "0.004`", "0.04`", "0.006`", "0.03`",
"0.088`", "1.553`", "0.082`", "0.033`", "0.006`", "0.053`", "0.017`",
"0.051000000000000004`", "0.009000000000000001`", "0.001`", "0.007`",
"0.`", "0.002`", "0.006`"},
{"0.004`", "0.039`", "0.001`", "0.07200000000000001`",
"0.026000000000000002`", "0.036000000000000004`", "0.081`", "0.05`",
"0.082`", "1.491`", "0.063`", "0.009000000000000001`", "0.021`",
"0.014`", "0.006`", "0.001`", "0.001`", "0.`", "0.`", "0.002`", "0.001`"},
{"0.07`", "0.06`", "0.115`", "0.019`", "0.018000000000000002`", "0.057`",
"0.01`", "0.005`", "0.033`", "0.063`", "1.287`", "0.159`", "0.008`",
"0.011`", "0.003`", "0.004`", "0.017`", "0.004`", "0.006`",
"0.026000000000000002`", "0.025`"},
{"0.027`", "0.009000000000000001`", "0.029`", "0.011`", "0.024`",
"0.016`", "0.004`", "0.008`", "0.006`", "0.009000000000000001`",
"0.159`", "1.6620000000000001`", "0.002`", "0.001`", "0.004`", "0.001`",
"0.`", "0.001`", "0.001`", "0.015`", "0.01`"},
{"0.004`", "0.001`", "0.001`", "0.003`", "0.032`", "0.005`", "0.002`",
"0.009000000000000001`", "0.053`", "0.021`", "0.008`", "0.002`", "1.56`",
"0.133`", "0.114`", "0.015`", "0.006`", "0.019`", "0.001`",
"0.009000000000000001`", "0.003`"},
{"0.006`", "0.002`", "0.002`", "0.001`", "0.03`", "0.003`", "0.001`",
"0.015`", "0.017`", "0.014`", "0.011`", "0.001`", "0.133`", "1.694`",
"0.04`", "0.005`", "0.014`", "0.004`", "0.002`", "0.004`", "0.001`"},
{"0.005`", "0.`", "0.`", "0.001`", "0.03`", "0.`", "0.001`", "0.001`",
"0.051000000000000004`", "0.006`", "0.003`", "0.004`", "0.114`", "0.04`",
"1.714`", "0.001`", "0.`", "0.001`", "0.`", "0.001`", "0.024`"},
{"0.001`", "0.011`", "0.002`", "0.006`", "0.006`", "0.006`", "0.033`",
"0.006`", "0.009000000000000001`", "0.001`", "0.004`", "0.001`",
"0.015`", "0.005`", "0.001`", "1.459`", "0.197`", "0.07`",
"0.043000000000000003`", "0.121`", "0.001`"},
{"0.002`", "0.044`", "0.002`", "0.004`", "0.001`", "0.015`", "0.006`",
"0.`", "0.001`", "0.001`", "0.017`", "0.`", "0.006`", "0.014`", "0.`",
"0.197`", "1.2670000000000001`", "0.113`", "0.127`", "0.184`", "0.`"},
{"0.011`", "0.01`", "0.018000000000000002`", "0.007`", "0.003`",
"0.009000000000000001`", "0.004`", "0.`", "0.007`", "0.`", "0.004`",
"0.001`", "0.019`", "0.004`", "0.001`", "0.07`", "0.113`", "1.518`",
"0.028`", "0.17200000000000001`", "0.`"},
{"0.026000000000000002`", "0.08700000000000001`", "0.023`", "0.007`",
"0.002`", "0.008`", "0.009000000000000001`", "0.`", "0.`", "0.`",
"0.006`", "0.001`", "0.001`", "0.002`", "0.`", "0.043000000000000003`",
"0.127`", "0.028`", "1.498`", "0.131`", "0.`"},
{"0.083`", "0.084`", "0.032`", "0.062`", "0.019`", "0.042`", "0.025`",
"0.002`", "0.002`", "0.002`", "0.026000000000000002`", "0.015`",
"0.009000000000000001`", "0.004`", "0.001`", "0.121`", "0.184`",
"0.17200000000000001`", "0.131`", "0.979`", "0.005`"},
{"0.`", "0.`", "0.`", "0.004`", "0.109`", "0.002`", "0.001`", "0.001`",
"0.006`", "0.001`", "0.025`", "0.01`", "0.003`", "0.001`", "0.024`",
"0.001`", "0.`", "0.`", "0.`", "0.005`", "1.805`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGDQAGKhA4+kyma8dJy29Y4CiN7zTT5iw+uXjkY9J2M2A2mp
nMLtngyvHMv+HZxywvyVo74o+z9L21eOEc26S3bYvXLcNkEocTeQvsou/mcf
kK6ystLfD6QXPTpQD6K9d2uX3fF/5diw7vvzu0DaNilMlTXgleO8198tOYG0
3sQMZ24gHSfs3AWiH7T6VvEAabuKv4dBdN26P9GmQLqr7zd7CJC2OTTxXRSQ
dlpX6hwNpA9NeeF4GUgnKDy+fAVIs7Ez8d0B0t/eMYf9A9L7mP2yF4e/cpxj
uzC6KuqV40oftmShaKC5E9bIKQDpGb8mvvcA0rNmTpb3BtJfZl664QOkMw56
G74E0v88v/uIxrxyzN/5R/RJ4ivHc7EWF1mSXjlWzBH+vyfnlSMAWIOhig==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"symmetricLinkage21DataDiagonalstanderdized", "=",
RowBox[{
"diagonalStanderdize", "[", " ", "symmetricLinkage21Datastanderdized",
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.535610839065496*^9, 3.535610885561537*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"1.`", "0.06409889805439417`", "0.1000498728225817`",
"0.0024481444818202397`", "0.0016392826413268219`",
"0.006141282029210163`", "0.0028757547173513948`",
"0.00015455756472682977`", "0.0010310364072135206`",
"0.0026136878891710714`", "0.05036317869541113`", "0.01680774602105949`",
"0.0025170509916544546`", "0.003722200980959831`",
"0.0032698593637519257`", "0.0008208696351096909`",
"0.0015418476765329896`", "0.007330101566290614`",
"0.01719412914211336`", "0.06840699351367291`",
"0.00006487323387434835`"},
{"0.06409889805439417`", "1.`", "0.03371524157563751`",
"0.025816458569303435`", "0.0009136820691782378`",
"0.06155033570557136`", "0.026818564309973463`",
"0.0009229690420020775`", "0.0006189705253945695`",
"0.027501049039230143`", "0.04524612646348569`", "0.005810975457426922`",
"0.0009255132991294378`", "0.0011523957607488527`",
"0.0002657032120327288`", "0.007957942306182948`",
"0.033433236231324964`", "0.006979182722404114`",
"0.061491320807774794`", "0.07315199872905882`",
"0.00007292989784665792`"},
{"0.10004987282258171`", "0.03371524157563751`", "1.`",
"0.001898523837061389`", "0.0008163148153723822`",
"0.005043005069591061`", "0.001185767091178807`",
"0.0002014673069323298`", "0.0062173743573512115`",
"0.0009643528132903061`", "0.08142401278671017`",
"0.018248766805240443`", "0.0006198986331003354`",
"0.0013538478537149668`", "0.00020025156947597086`",
"0.0013665860451173835`", "0.0012560731036007676`",
"0.011500822609861641`", "0.015036622516877637`",
"0.026215138231706552`", "0.00008433079834682445`"},
{"0.0024481444818202393`", "0.02581645856930343`",
"0.001898523837061389`", "1.`", "0.09315375820623639`",
"0.06715403342537268`", "0.10543079932873131`", "0.06046188680750209`",
"0.0030112692030945356`", "0.05147214577992996`",
"0.014830658730592968`", "0.007648151859463921`",
"0.0021961774107665494`", "0.0006624267405640956`",
"0.0008024805654715952`", "0.004296633164219497`",
"0.0029287039618897735`", "0.005112937703527217`",
"0.004683950379830594`", "0.05444797215221827`", "0.002878266867772398`"},
{"0.0016392826413268219`", "0.0009136820691782378`",
"0.0008163148153723823`", "0.09315375820623639`", "1.`",
"0.022502948181844357`", "0.03155338388333252`", "0.1268257114629136`",
"0.02828422996471971`", "0.018914930062819517`", "0.014176656193191283`",
"0.01649748770367934`", "0.022765285110314632`",
"0.020324867015912792`", "0.020406696503072915`",
"0.004058640271583312`", "0.00040525887299661307`",
"0.002073786899565289`", "0.0013388090110170565`",
"0.017115160803980085`", "0.07184909969395867`"},
{"0.0061412820292101634`", "0.06155033570557136`",
"0.005043005069591061`", "0.06715403342537268`", "0.022502948181844357`",
"1.`", "0.03049619785401064`", "0.012675790059542238`",
"0.0036767474395563086`", "0.024070104798340833`",
"0.040694559447611994`", "0.010381061635709652`",
"0.003013050495093689`", "0.0017381352504581636`",
"0.0001444820293852562`", "0.0042748242837672085`",
"0.010855431701376853`", "0.006114869760371242`",
"0.005523673168885353`", "0.03427211442408346`",
"0.0011412054316920627`"},
{"0.0028757547173513948`", "0.026818564309973463`",
"0.001185767091178807`", "0.1054307993287313`", "0.03155338388333252`",
"0.03049619785401064`", "1.`", "0.04768419584852775`",
"0.0203322636974913`", "0.05480668506391294`", "0.007013535837455947`",
"0.002437409719638799`", "0.0010425165629896092`",
"0.0008741711492244197`", "0.00046836184502066616`",
"0.022879780560216598`", "0.004094590974677118`",
"0.0029266861841673476`", "0.005793872382346603`",
"0.020841047868795946`", "0.0006461939588117433`"},
{"0.00015455756472682977`", "0.0009229690420020775`",
"0.0002014673069323298`", "0.06046188680750209`", "0.1268257114629136`",
"0.012675790059542238`", "0.04768419584852775`", "1.`",
"0.058250482392053535`", "0.033523151331438954`",
"0.003568135038900969`", "0.0052597288166746576`",
"0.005738050909657653`", "0.009754422463383624`",
"0.000717607546062933`", "0.0039277388408995315`",
"0.00008675970794531386`", "0.00007273248796563657`",
"0.00006237096389689164`", "0.001891693310296104`",
"0.0006472886418031729`"},
{"0.0010310364072135204`", "0.0006189705253945695`",
"0.0062173743573512115`", "0.0030112692030945356`",
"0.02828422996471971`", "0.003676747439556309`", "0.0203322636974913`",
"0.05825048239205354`", "1.`", "0.053713385773830113`",
"0.023590770991781553`", "0.0039127883104952054`",
"0.03398260656100332`", "0.010750425860930992`", "0.031053447264352087`",
"0.006113670062915546`", "0.000647914631717393`",
"0.004441243671449442`", "0.00020194186398100474`",
"0.0014664125526246566`", "0.003311633851201324`"},
{"0.0026136878891710714`", "0.02750104903923014`",
"0.0009643528132903059`", "0.05147214577992996`", "0.01891493006281952`",
"0.024070104798340833`", "0.054806685063912945`",
"0.03352315133143896`", "0.05371338577383011`", "1.`",
"0.04530322991262659`", "0.005650067502452525`", "0.014078248751957782`",
"0.008704732564201964`", "0.003799715957850141`",
"0.0007134883087933919`", "0.0004352995990798741`",
"0.00024051571009630184`", "0.00017995875398364988`",
"0.0013276007596724176`", "0.0008113712115303804`"},
{"0.05036317869541113`", "0.04524612646348569`", "0.08142401278671017`",
"0.014830658730592966`", "0.014176656193191283`",
"0.040694559447611994`", "0.007013535837455949`",
"0.003568135038900969`", "0.023590770991781553`", "0.04530322991262659`",
"0.9999999999999998`", "0.10876645613369745`", "0.005534793348100889`",
"0.0073944077293237615`", "0.0023450659166325337`",
"0.002840371870939917`", "0.013276240276653898`",
"0.003197296441164938`", "0.004477158283125794`", "0.02347613665138138`",
"0.01612043658811893`"},
{"0.016807746021059486`", "0.005810975457426922`",
"0.018248766805240443`", "0.007648151859463921`",
"0.016497487703679342`", "0.010381061635709652`",
"0.002437409719638799`", "0.0052597288166746576`",
"0.0039127883104952054`", "0.005650067502452525`",
"0.10876645613369747`", "1.`", "0.0009555723247166262`",
"0.0004916733072358648`", "0.00223947433179499`",
"0.0009332619426111256`", "0.00023061059846200493`",
"0.000518134914627499`", "0.0007848461705191496`",
"0.011704580783104762`", "0.005921473212486762`"},
{"0.002517050991654454`", "0.0009255132991294379`",
"0.0006198986331003354`", "0.0021961774107665494`",
"0.022765285110314632`", "0.0030130504950936885`",
"0.0010425165629896092`", "0.005738050909657653`",
"0.033982606561003326`", "0.014078248751957782`", "0.00553479334810089`",
"0.000955572324716626`", "1.0000000000000002`", "0.08168870437017314`",
"0.06962727186826227`", "0.01019794327536365`", "0.0041423891530892615`",
"0.01228124397760482`", "0.0006647090279446876`",
"0.007357295521752283`", "0.0019302873033502162`"},
{"0.003722200980959831`", "0.0011523957607488527`",
"0.0013538478537149668`", "0.0006624267405640956`",
"0.020324867015912792`", "0.0017381352504581634`",
"0.0008741711492244196`", "0.009754422463383624`",
"0.010750425860930992`", "0.008704732564201963`",
"0.0073944077293237615`", "0.0004916733072358648`",
"0.08168870437017314`", "0.9999999999999998`", "0.02374206201976246`",
"0.003363987179098271`", "0.00926362217767675`",
"0.0021874714777267113`", "0.001039442748905232`",
"0.0033867165414846272`", "0.0007316897519481527`"},
{"0.0032698593637519257`", "0.0002657032120327288`",
"0.00020025156947597086`", "0.0008024805654715952`",
"0.020406696503072915`", "0.0001444820293852562`",
"0.00046836184502066627`", "0.000717607546062933`",
"0.031053447264352087`", "0.003799715957850141`",
"0.0023450659166325337`", "0.00223947433179499`", "0.06962727186826227`",
"0.02374206201976246`", "1.0000000000000002`", "0.0004447751245566723`",
"0.00016977747535410094`", "0.00045942790442502347`",
"0.0003041405301258628`", "0.0011413207565890142`",
"0.01366751462282772`"},
{"0.000820869635109691`", "0.007957942306182948`",
"0.0013665860451173835`", "0.004296633164219498`",
"0.004058640271583312`", "0.004274824283767208`",
"0.022879780560216598`", "0.003927738840899532`",
"0.006113670062915546`", "0.000713488308793392`",
"0.002840371870939917`", "0.0009332619426111254`",
"0.01019794327536365`", "0.0033639871790982706`",
"0.00044477512455667233`", "1.`", "0.14518011925180505`",
"0.04732848075428348`", "0.02892573390377716`", "0.10102075990158507`",
"0.0009140896160165241`"},
{"0.0015418476765329896`", "0.03343323623132497`",
"0.0012560731036007674`", "0.002928703961889773`",
"0.00040525887299661307`", "0.010855431701376853`",
"0.004094590974677118`", "0.00008675970794531388`",
"0.000647914631717393`", "0.00043529959907987414`",
"0.013276240276653898`", "0.00023061059846200493`",
"0.0041423891530892615`", "0.00926362217767675`",
"0.00016977747535410094`", "0.14518011925180505`", "1.`",
"0.08141866653644808`", "0.0925312125695032`", "0.1654268759669956`",
"0.00004749902332839671`"},
{"0.007330101566290614`", "0.0069791827224041135`",
"0.011500822609861641`", "0.005112937703527217`",
"0.0020737868995652884`", "0.006114869760371243`",
"0.002926686184167347`", "0.00007273248796563657`",
"0.004441243671449442`", "0.00024051571009630187`",
"0.003197296441164938`", "0.000518134914627499`",
"0.012281243977604819`", "0.0021874714777267113`",
"0.0004594279044250234`", "0.04732848075428348`", "0.08141866653644808`",
"1.0000000000000002`", "0.018662544492337323`", "0.14114413152699515`",
"0.00010376189485575395`"},
{"0.01719412914211336`", "0.06149132080777479`", "0.015036622516877637`",
"0.004683950379830594`", "0.0013388090110170565`",
"0.005523673168885353`", "0.005793872382346603`",
"0.00006237096389689164`", "0.00020194186398100476`",
"0.00017995875398364985`", "0.004477158283125794`",
"0.0007848461705191496`", "0.0006647090279446876`",
"0.0010394427489052321`", "0.00030414053012586275`",
"0.02892573390377716`", "0.0925312125695032`", "0.01866254449233732`",
"1.`", "0.10794048044826816`", "9.390293625360477`*^-6"},
{"0.06840699351367291`", "0.07315199872905882`", "0.026215138231706556`",
"0.05444797215221828`", "0.017115160803980088`", "0.03427211442408346`",
"0.020841047868795946`", "0.001891693310296104`",
"0.0014664125526246566`", "0.0013276007596724176`",
"0.02347613665138138`", "0.011704580783104762`",
"0.0073572955217522835`", "0.003386716541484627`",
"0.0011413207565890142`", "0.10102075990158507`", "0.16542687596699557`",
"0.14114413152699518`", "0.10794048044826816`", "1.`",
"0.003405715033879745`"},
{"0.00006487323387434835`", "0.00007292989784665792`",
"0.00008433079834682447`", "0.002878266867772398`",
"0.07184909969395867`", "0.0011412054316920627`",
"0.0006461939588117434`", "0.0006472886418031729`",
"0.003311633851201324`", "0.0008113712115303805`",
"0.016120436588118927`", "0.005921473212486762`",
"0.0019302873033502164`", "0.0007316897519481527`",
"0.013667514622827722`", "0.0009140896160165241`",
"0.00004749902332839671`", "0.00010376189485575393`",
"9.390293625360477`*^-6", "0.003405715033879745`",
"1.0000000000000002`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.5356108696829357`*^9, 3.5356108864715548`*^9},
3.5370974370933323`*^9, 3.537408792288527*^9, 3.5374369174485197`*^9,
3.537520508720192*^9, 3.537524988667849*^9, 3.537528518636307*^9,
3.537848714401245*^9, 3.537939047806875*^9, 3.5409839840998373`*^9,
3.5410510178165607`*^9, 3.54667109666925*^9}]
}, Open ]],
Cell["for jsims letter ->", "Text",
CellChangeTimes->{{3.4898167059063683`*^9, 3.489816713650765*^9}},
FontSize->24],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{"symmetricLinkage21DataDiagonalstanderdized", ",", "0.001"}],
"]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"jFieldName21Text", ",", "jFieldName21withLFText"}], "}"}]}],
",",
RowBox[{"TableSpacing", "\[Rule]",
RowBox[{"{",
RowBox[{"0.75", ",", "0.5"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.435376922887288*^9, 3.435376991821336*^9}, {
3.531630628628664*^9, 3.531630693611917*^9}, {3.537437005975301*^9,
3.537437018390449*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\
\:30ae\:30fc\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]],
HoldForm]},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]],
HoldForm], "1.`", "0.064`", "0.1`", "0.002`", "0.002`", "0.006`",
"0.003`", "0.`", "0.001`", "0.003`", "0.05`", "0.017`", "0.003`",
"0.004`", "0.003`", "0.001`", "0.002`", "0.007`", "0.017`", "0.068`",
"0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]]],
HoldForm], "0.064`", "1.`", "0.034`", "0.026000000000000002`",
"0.001`", "0.062`", "0.027`", "0.001`", "0.001`", "0.028`", "0.045`",
"0.006`", "0.001`", "0.001`", "0.`", "0.008`", "0.033`", "0.007`",
"0.061`", "0.073`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]],
HoldForm], "0.1`", "0.034`", "1.`", "0.002`", "0.001`", "0.005`",
"0.001`", "0.`", "0.006`", "0.001`", "0.081`", "0.018000000000000002`",
"0.001`", "0.001`", "0.`", "0.001`", "0.001`", "0.012`", "0.015`",
"0.026000000000000002`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.002`", "0.026000000000000002`", "0.002`", "1.`",
"0.093`", "0.067`", "0.105`", "0.06`", "0.003`",
"0.051000000000000004`", "0.015`", "0.008`", "0.002`", "0.001`",
"0.001`", "0.004`", "0.003`", "0.005`", "0.005`", "0.054`", "0.003`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]],
HoldForm], "0.002`", "0.001`", "0.001`", "0.093`", "1.`", "0.023`",
"0.032`", "0.127`", "0.028`", "0.019`", "0.014`", "0.016`", "0.023`",
"0.02`", "0.02`", "0.004`", "0.`", "0.002`", "0.001`", "0.017`",
"0.07200000000000001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.006`", "0.062`", "0.005`", "0.067`", "0.023`", "1.`",
"0.03`", "0.013000000000000001`", "0.004`", "0.024`", "0.041`", "0.01`",
"0.003`", "0.002`", "0.`", "0.004`", "0.011`", "0.006`", "0.006`",
"0.034`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.003`", "0.027`", "0.001`", "0.105`", "0.032`", "0.03`",
"1.`", "0.048`", "0.02`", "0.055`", "0.007`", "0.002`", "0.001`",
"0.001`", "0.`", "0.023`", "0.004`", "0.003`", "0.006`", "0.021`",
"0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]],
HoldForm], "0.`", "0.001`", "0.`", "0.06`", "0.127`",
"0.013000000000000001`", "0.048`", "1.`", "0.058`", "0.034`", "0.004`",
"0.005`", "0.006`", "0.01`", "0.001`", "0.004`", "0.`", "0.`", "0.`",
"0.002`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]]],
HoldForm], "0.001`", "0.001`", "0.006`", "0.003`", "0.028`", "0.004`",
"0.02`", "0.058`", "1.`", "0.054`", "0.024`", "0.004`", "0.034`",
"0.011`", "0.031`", "0.006`", "0.001`", "0.004`", "0.`", "0.001`",
"0.003`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\\n\:30cd\:30eb\
\:30ae\:30fc\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\
\:30cd\:30eb\:30ae\:30fc\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.003`", "0.028`", "0.001`", "0.051000000000000004`",
"0.019`", "0.024`", "0.055`", "0.034`", "0.054`", "1.`", "0.045`",
"0.006`", "0.014`", "0.009000000000000001`", "0.004`", "0.001`", "0.`",
"0.`", "0.`", "0.001`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]],
HoldForm], "0.05`", "0.045`", "0.081`", "0.015`", "0.014`", "0.041`",
"0.007`", "0.004`", "0.024`", "0.045`", "1.`", "0.109`", "0.006`",
"0.007`", "0.002`", "0.003`", "0.013000000000000001`", "0.003`",
"0.004`", "0.023`", "0.016`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "0.017`", "0.006`", "0.018000000000000002`", "0.008`",
"0.016`", "0.01`", "0.002`", "0.005`", "0.004`", "0.006`", "0.109`",
"1.`", "0.001`", "0.`", "0.002`", "0.001`", "0.`", "0.001`", "0.001`",
"0.012`", "0.006`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.003`", "0.001`", "0.001`", "0.002`", "0.023`", "0.003`",
"0.001`", "0.006`", "0.034`", "0.014`", "0.006`", "0.001`", "1.`",
"0.082`", "0.07`", "0.01`", "0.004`", "0.012`", "0.001`", "0.007`",
"0.002`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.004`", "0.001`", "0.001`", "0.001`", "0.02`", "0.002`",
"0.001`", "0.01`", "0.011`", "0.009000000000000001`", "0.007`", "0.`",
"0.082`", "1.`", "0.024`", "0.003`", "0.009000000000000001`", "0.002`",
"0.001`", "0.003`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 10]]],
HoldForm], "0.003`", "0.`", "0.`", "0.001`", "0.02`", "0.`", "0.`",
"0.001`", "0.031`", "0.004`", "0.002`", "0.002`", "0.07`", "0.024`",
"1.`", "0.`", "0.`", "0.`", "0.`", "0.001`", "0.014`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]],
HoldForm], "0.001`", "0.008`", "0.001`", "0.004`", "0.004`", "0.004`",
"0.023`", "0.004`", "0.006`", "0.001`", "0.003`", "0.001`", "0.01`",
"0.003`", "0.`", "1.`", "0.145`", "0.047`", "0.029`", "0.101`",
"0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]],
HoldForm], "0.002`", "0.033`", "0.001`", "0.003`", "0.`", "0.011`",
"0.004`", "0.`", "0.001`", "0.`", "0.013000000000000001`", "0.`",
"0.004`", "0.009000000000000001`", "0.`", "0.145`", "1.`", "0.081`",
"0.093`", "0.165`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "0.007`", "0.007`", "0.012`", "0.005`", "0.002`", "0.006`",
"0.003`", "0.`", "0.004`", "0.`", "0.003`", "0.001`", "0.012`",
"0.002`", "0.`", "0.047`", "0.081`", "1.`", "0.019`",
"0.14100000000000001`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
HoldForm], "0.017`", "0.061`", "0.015`", "0.005`", "0.001`", "0.006`",
"0.006`", "0.`", "0.`", "0.`", "0.004`", "0.001`", "0.001`", "0.001`",
"0.`", "0.029`", "0.093`", "0.019`", "1.`", "0.108`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
HoldForm], "0.068`", "0.073`", "0.026000000000000002`", "0.054`",
"0.017`", "0.034`", "0.021`", "0.002`", "0.001`", "0.001`", "0.023`",
"0.012`", "0.007`", "0.003`", "0.001`", "0.101`", "0.165`",
"0.14100000000000001`", "0.108`", "1.`", "0.003`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]],
HoldForm], "0.`", "0.`", "0.`", "0.003`", "0.07200000000000001`",
"0.001`", "0.001`", "0.001`", "0.003`", "0.001`", "0.016`", "0.006`",
"0.002`", "0.001`", "0.014`", "0.001`", "0.`", "0.`", "0.`", "0.003`",
"1.`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.35]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.3]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[BoxForm`e$, TableHeadings -> {{
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]}, {
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]],
Text[
Style["\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]],
Text[
Style["\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:5b66", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]],
Text[
Style["\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]],
Text[
Style["\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]}}, TableSpacing -> {0.75, 0.5}]]]], "Output",
CellChangeTimes->{3.537437021226713*^9, 3.537520508856868*^9,
3.537524988721354*^9, 3.537528518772388*^9, 3.537848714452057*^9,
3.537939048032147*^9, 3.54098398416448*^9, 3.541051017887103*^9,
3.546671096728031*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"TableForm", "[",
RowBox[{
RowBox[{"Round", "[",
RowBox[{"symmetricLinkage21Datastanderdized", ",", "0.001"}], "]"}], ",",
RowBox[{"TableHeadings", "\[Rule]",
RowBox[{"{",
RowBox[{"jFieldName21Text", ",", "jFieldName21withLFText"}], "}"}]}],
",",
RowBox[{"TableSpacing", "\[Rule]",
RowBox[{"{",
RowBox[{"0.75", ",", "0.5"}], "}"}]}]}], "]"}]], "Input",
CellChangeTimes->{{3.435376922887288*^9, 3.435376991821336*^9}, {
3.531630628628664*^9, 3.531630693611917*^9}}],
Cell[BoxData[
TagBox[
TagBox[GridBox[{
{
StyleBox["\[Null]",
ShowStringCharacters->False],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\\n\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\\n\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\\n\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\\n\:30a8\:30cd\:30eb\
\:30ae\:30fc\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\\n\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\\n\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\\n\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\\n\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]]],
HoldForm],
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->9]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]],
HoldForm]},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]],
HoldForm], "1.497`", "0.091`", "0.152`", "0.003`", "0.002`",
"0.009000000000000001`", "0.004`", "0.`", "0.002`", "0.004`", "0.07`",
"0.027`", "0.004`", "0.006`", "0.005`", "0.001`", "0.002`", "0.011`",
"0.026000000000000002`", "0.083`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]]],
HoldForm], "0.091`", "1.35`", "0.049`", "0.034`", "0.001`", "0.088`",
"0.037`", "0.001`", "0.001`", "0.039`", "0.06`",
"0.009000000000000001`", "0.001`", "0.002`", "0.`", "0.011`", "0.044`",
"0.01`", "0.08700000000000001`", "0.084`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]],
HoldForm], "0.152`", "0.049`", "1.55`", "0.003`", "0.001`", "0.008`",
"0.002`", "0.`", "0.01`", "0.001`", "0.115`", "0.029`", "0.001`",
"0.002`", "0.`", "0.002`", "0.002`", "0.018000000000000002`", "0.023`",
"0.032`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.003`", "0.034`", "0.003`", "1.313`", "0.121`", "0.094`",
"0.145`", "0.084`", "0.004`", "0.07200000000000001`", "0.019`",
"0.011`", "0.003`", "0.001`", "0.001`", "0.006`", "0.004`", "0.007`",
"0.007`", "0.062`", "0.004`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]],
HoldForm], "0.002`", "0.001`", "0.001`", "0.121`", "1.285`", "0.031`",
"0.043000000000000003`", "0.17400000000000002`", "0.04`",
"0.026000000000000002`", "0.018000000000000002`", "0.024`", "0.032`",
"0.03`", "0.03`", "0.006`", "0.001`", "0.003`", "0.002`", "0.019`",
"0.109`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5206\:6790\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.009000000000000001`", "0.088`", "0.008`", "0.094`",
"0.031`", "1.502`", "0.045`", "0.019`", "0.006`",
"0.036000000000000004`", "0.057`", "0.016`", "0.005`", "0.003`", "0.`",
"0.006`", "0.015`", "0.009000000000000001`", "0.008`", "0.042`",
"0.002`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]],
HoldForm], "0.004`", "0.037`", "0.002`", "0.145`",
"0.043000000000000003`", "0.045`", "1.448`", "0.069`", "0.03`",
"0.081`", "0.01`", "0.004`", "0.002`", "0.001`", "0.001`", "0.033`",
"0.006`", "0.004`", "0.009000000000000001`", "0.025`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]],
HoldForm], "0.`", "0.001`", "0.`", "0.084`", "0.17400000000000002`",
"0.019`", "0.069`", "1.467`", "0.088`", "0.05`", "0.005`", "0.008`",
"0.009000000000000001`", "0.015`", "0.001`", "0.006`", "0.`", "0.`",
"0.`", "0.002`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]]],
HoldForm], "0.002`", "0.001`", "0.01`", "0.004`", "0.04`", "0.006`",
"0.03`", "0.088`", "1.553`", "0.082`", "0.033`", "0.006`", "0.053`",
"0.017`", "0.051000000000000004`", "0.009000000000000001`", "0.001`",
"0.007`", "0.`", "0.002`", "0.006`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\\n\:30cd\:30eb\
\:30ae\:30fc\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\
\:30cd\:30eb\:30ae\:30fc\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.004`", "0.039`", "0.001`", "0.07200000000000001`",
"0.026000000000000002`", "0.036000000000000004`", "0.081`", "0.05`",
"0.082`", "1.491`", "0.063`", "0.009000000000000001`", "0.021`",
"0.014`", "0.006`", "0.001`", "0.001`", "0.`", "0.`", "0.002`",
"0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]],
HoldForm], "0.07`", "0.06`", "0.115`", "0.019`",
"0.018000000000000002`", "0.057`", "0.01`", "0.005`", "0.033`",
"0.063`", "1.287`", "0.159`", "0.008`", "0.011`", "0.003`", "0.004`",
"0.017`", "0.004`", "0.006`", "0.026000000000000002`", "0.025`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "0.027`", "0.009000000000000001`", "0.029`", "0.011`",
"0.024`", "0.016`", "0.004`", "0.008`", "0.006`",
"0.009000000000000001`", "0.159`", "1.6620000000000001`", "0.002`",
"0.001`", "0.004`", "0.001`", "0.`", "0.001`", "0.001`", "0.015`",
"0.01`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.004`", "0.001`", "0.001`", "0.003`", "0.032`", "0.005`",
"0.002`", "0.009000000000000001`", "0.053`", "0.021`", "0.008`",
"0.002`", "1.56`", "0.133`", "0.114`", "0.015`", "0.006`", "0.019`",
"0.001`", "0.009000000000000001`", "0.003`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]],
HoldForm], "0.006`", "0.002`", "0.002`", "0.001`", "0.03`", "0.003`",
"0.001`", "0.015`", "0.017`", "0.014`", "0.011`", "0.001`", "0.133`",
"1.694`", "0.04`", "0.005`", "0.014`", "0.004`", "0.002`", "0.004`",
"0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:5b66", FontSize -> 10]]],
HoldForm], "0.005`", "0.`", "0.`", "0.001`", "0.03`", "0.`", "0.001`",
"0.001`", "0.051000000000000004`", "0.006`", "0.003`", "0.004`",
"0.114`", "0.04`", "1.714`", "0.001`", "0.`", "0.001`", "0.`", "0.001`",
"0.024`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]],
HoldForm], "0.001`", "0.011`", "0.002`", "0.006`", "0.006`", "0.006`",
"0.033`", "0.006`", "0.009000000000000001`", "0.001`", "0.004`",
"0.001`", "0.015`", "0.005`", "0.001`", "1.459`", "0.197`", "0.07`",
"0.043000000000000003`", "0.121`", "0.001`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]],
HoldForm], "0.002`", "0.044`", "0.002`", "0.004`", "0.001`", "0.015`",
"0.006`", "0.`", "0.001`", "0.001`", "0.017`", "0.`", "0.006`",
"0.014`", "0.`", "0.197`", "1.2670000000000001`", "0.113`", "0.127`",
"0.184`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
HoldForm], "0.011`", "0.01`", "0.018000000000000002`", "0.007`",
"0.003`", "0.009000000000000001`", "0.004`", "0.`", "0.007`", "0.`",
"0.004`", "0.001`", "0.019`", "0.004`", "0.001`", "0.07`", "0.113`",
"1.518`", "0.028`", "0.17200000000000001`", "0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
HoldForm], "0.026000000000000002`", "0.08700000000000001`", "0.023`",
"0.007`", "0.002`", "0.008`", "0.009000000000000001`", "0.`", "0.`",
"0.`", "0.006`", "0.001`", "0.001`", "0.002`", "0.`",
"0.043000000000000003`", "0.127`", "0.028`", "1.498`", "0.131`",
"0.`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
HoldForm], "0.083`", "0.084`", "0.032`", "0.062`", "0.019`", "0.042`",
"0.025`", "0.002`", "0.002`", "0.002`", "0.026000000000000002`",
"0.015`", "0.009000000000000001`", "0.004`", "0.001`", "0.121`",
"0.184`", "0.17200000000000001`", "0.131`", "0.979`", "0.005`"},
{
TagBox[
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7d20\:7c92\:5b50\:30fb\\n\:5929\:4f53\:7269\:7406\"\>\
",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]],
HoldForm], "0.`", "0.`", "0.`", "0.004`", "0.109`", "0.002`", "0.001`",
"0.001`", "0.006`", "0.001`", "0.025`", "0.01`", "0.003`", "0.001`",
"0.024`", "0.001`", "0.`", "0.`", "0.`", "0.005`", "1.805`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxDividers->{
"Columns" -> {False, True, {False}, False}, "ColumnsIndexed" -> {},
"Rows" -> {False, True, {False}, False}, "RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.35]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.3]},
Offset[0.2]}, "RowsIndexed" -> {}}],
{OutputFormsDump`HeadedRows, OutputFormsDump`HeadedColumns}],
Function[BoxForm`e$,
TableForm[BoxForm`e$, TableHeadings -> {{
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]],
Text[
Style["\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]],
Text[
Style["\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9", FontSize -> 10]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\n\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
10]]}, {
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 9]],
Text[
Style["\:8fb2\:5b66\:30fb\n\:98df\:54c1\:5b66", FontSize -> 9]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 9]],
Text[
Style["\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 9]],
Text[
Style["\:5206\:6790\:5316\:5b66", FontSize -> 9]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 9]],
Text[
Style[
"\:91d1\:5c5e\:30fb\:30bb\:30e9\n\:30df\:30c3\:30af\:30b9", FontSize ->
9]],
Text[
Style["\:6a5f\:68b0\:30fb\n\:571f\:6728\:5efa\:7bc9", FontSize -> 9]],
Text[
Style[
"\:5316\:5b66\:5de5\:5b66\:30fb\n\:30a8\:30cd\:30eb\:30ae\:30fc\n\
\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 9]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\n\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 9]],
Text[
Style["\:6570\:5b66", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 9]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 9]],
Text[
Style["\:5fc3\:7406\:30fb\n\:795e\:7d4c\:79d1\:5b66", FontSize -> 9]],
Text[
Style["\:7363\:533b\:5b66\:30fb\n\:611f\:67d3\:75c7", FontSize -> 9]],
Text[
Style["\:751f\:5316\:5b66\:30fb\n\:751f\:7406\:5b66", FontSize -> 9]],
Text[
Style[
"\:7d20\:7c92\:5b50\:30fb\n\:5929\:4f53\:7269\:7406", FontSize ->
9]]}}, TableSpacing -> {0.75, 0.5}]]]], "Output",
CellChangeTimes->{3.531630695091764*^9, 3.53171324799148*^9,
3.5317760639296417`*^9, 3.5317901966414137`*^9, 3.531790875741579*^9,
3.532036623328661*^9, 3.532039839142249*^9, 3.532054640150227*^9,
3.5321248481733637`*^9, 3.5356086665047083`*^9, 3.537097437153345*^9,
3.5374087924053383`*^9, 3.537436917530129*^9, 3.53752050919491*^9,
3.537524988787944*^9, 3.537528518851787*^9, 3.537848714501367*^9,
3.537939048377602*^9, 3.540983984234063*^9, 3.541051017970498*^9,
3.546671096782024*^9}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Higher linkage > 0.075", "Section",
CellChangeTimes->{{3.532145080130301*^9, 3.532145109621167*^9}, {
3.537524958675131*^9, 3.5375249606825867`*^9}, {3.537849495996995*^9,
3.537849498182847*^9}, {3.537849532860743*^9, 3.537849536125708*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"linkTH", "=", "0.075"}]], "Input",
CellChangeTimes->{{3.537849608889155*^9, 3.537849623822277*^9}}],
Cell[BoxData["0.075`"], "Output",
CellChangeTimes->{3.5378496255081053`*^9, 3.5378496569566936`*^9,
3.53784969225745*^9, 3.5379390484495487`*^9, 3.540983984279405*^9,
3.541051018037005*^9, 3.546671096825358*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"higherlinkage", "[", "linkTH", "]"}], "=",
RowBox[{"Cases", "[",
RowBox[{
RowBox[{"Position", "[",
RowBox[{"symmetricLinkage21DataDiagonalstanderdized", ",",
RowBox[{"x_", "/;",
RowBox[{"x", ">", "linkTH"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"y_", "/;",
RowBox[{
RowBox[{"y", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[NotEqual]",
RowBox[{"y", "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], ",",
RowBox[{"{", "1", "}"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.537521000862452*^9, 3.537521206136447*^9}, {
3.537521550133275*^9, 3.537521568598299*^9}, {3.537849543663924*^9,
3.537849579144981*^9}, {3.537849630623863*^9, 3.537849641687495*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "3"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "11"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "7"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5", ",", "8"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11", ",", "3"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11", ",", "12"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12", ",", "11"}], "}"}], ",",
RowBox[{"{",
RowBox[{"13", ",", "14"}], "}"}], ",",
RowBox[{"{",
RowBox[{"14", ",", "13"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "16"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "18"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "19"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "16"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "18"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "19"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.5375211109123583`*^9, 3.5375211686746407`*^9},
3.537521207077099*^9, 3.537521574344002*^9, 3.537524989015046*^9,
3.537528519115156*^9, 3.5378487145764017`*^9, {3.537849550543887*^9,
3.537849583599019*^9}, 3.5378496571900053`*^9, 3.53784969246632*^9,
3.5379390485181923`*^9, 3.5409839843305807`*^9, 3.541051018083029*^9,
3.5466710968767014`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"higherlinkedFieldsSorted", "=",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Sort", "[",
RowBox[{"{",
RowBox[{
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}], "]"}],
"&"}], ",",
RowBox[{"higherlinkage", "[", "linkTH", "]"}]}], "]"}], "//",
"Union"}]}]], "Input",
CellChangeTimes->{{3.537521586339716*^9, 3.537521648938609*^9}, {
3.5375216937552757`*^9, 3.5375217467444153`*^9}, {3.537526756464645*^9,
3.537526758152055*^9}, {3.5378496489512672`*^9, 3.537849651063089*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\
\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{{3.537521643423738*^9, 3.537521650991055*^9},
3.537521713854195*^9, 3.537521752766425*^9, 3.5375249890681953`*^9,
3.53752675954895*^9, 3.537528519169957*^9, 3.53784871460851*^9, {
3.53784955531286*^9, 3.537849583827944*^9}, 3.537849657344677*^9,
3.537849692617302*^9, 3.537939048573845*^9, 3.54098398438734*^9,
3.541051018134473*^9, 3.546671096937161*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"higherlinkedFields", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}], "&"}], ",",
RowBox[{"higherlinkage", "[", "linkTH", "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.53752678385395*^9, 3.5375268217573433`*^9}, {
3.537529076632321*^9, 3.53752909105354*^9}, {3.537849678133854*^9,
3.537849680429762*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\
\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\
\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.537526791336734*^9, 3.537526822367474*^9},
3.537528519227995*^9, 3.537529094700849*^9, 3.537848714648094*^9, {
3.537849555457658*^9, 3.537849583987012*^9}, 3.537849657492646*^9,
3.5378496927780647`*^9, 3.5379390486501923`*^9, 3.540983984446533*^9,
3.541051018201887*^9, 3.546671096990987*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"hihgerlinkedValue", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"citedciting21DatastanderdizedcitedParciting", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "&"}], ",",
RowBox[{"higherlinkage", "[", "linkTH", "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.53752658580225*^9, 3.537526709132498*^9}, {
3.537526812642799*^9, 3.537526818093143*^9}, {3.537529101030614*^9,
3.537529113421968*^9}, {3.537849683571005*^9, 3.537849685469202*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.9991527466334338`", ",", "1.00084797181354`", ",", "1.0456522969391029`",
",", "1.0321081684985294`", ",", "1.1479463919345476`", ",",
"0.9688906943298017`", ",", "0.9263247580363887`", ",",
"0.871120818032953`", ",", "1.0795350025187573`", ",",
"0.9563408438228088`", ",", "0.8152921476703506`", ",",
"1.2265541902463322`", ",", "1.2011886795599656`", ",",
"0.8325086782921836`", ",", "0.9697868033811222`", ",",
"1.011722950870336`", ",", "1.0311544728321118`", ",",
"0.9078869491914079`", ",", "0.9522727527458636`", ",",
"1.1111646608583572`", ",", "1.1014587233472524`", ",",
"1.0198378213102897`", ",", "1.0501193036517276`", ",",
"1.0788468678731387`", ",", "0.9884128843175382`", ",",
"0.8999566267950924`", ",", "0.9805480627451116`", ",",
"0.9269156075610814`"}], "}"}]], "Output",
CellChangeTimes->{{3.5375265978635817`*^9, 3.537526613496311*^9},
3.537526652914166*^9, 3.5375267095908537`*^9, {3.537526814797595*^9,
3.5375268261971188`*^9}, 3.537528519280458*^9, 3.5375291144508057`*^9,
3.537848714688102*^9, {3.537849555595193*^9, 3.5378495841395893`*^9},
3.5378496576307096`*^9, 3.537849692948813*^9, 3.537939048711196*^9,
3.5409839845039387`*^9, 3.541051018261496*^9, 3.546671097025639*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"higherlinkedFields", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"hihgerlinkedValue", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"n", ",",
RowBox[{"Length", "[", "hihgerlinkedValue", "]"}]}], "}"}]}],
"]"}]], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",", "0.9991527466334338`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]}], "}"}], ",",
"1.00084797181354`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",", "1.0456522969391029`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
"1.0321081684985294`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
"1.1479463919345476`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
"0.9688906943298017`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]]}], "}"}], ",", "0.9263247580363887`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
"0.871120818032953`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
"1.0795350025187573`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",", "0.9563408438228088`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]}], "}"}], ",",
"0.8152921476703506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",", "1.2265541902463322`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]]}], "}"}], ",",
"1.2011886795599656`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]]}],
"}"}], ",", "0.8325086782921836`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
"0.9697868033811222`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.011722950870336`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
"1.0311544728321118`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}],
"}"}], ",", "0.9078869491914079`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}],
"}"}], ",", "0.9522727527458636`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.1111646608583572`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
"1.1014587233472524`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.0198378213102897`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
"1.0501193036517276`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.0788468678731387`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
"0.9884128843175382`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
"0.8999566267950924`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}],
"}"}], ",", "0.9805480627451116`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}],
"}"}], ",", "0.9269156075610814`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.537530585023278*^9, 3.5378487147226763`*^9, {3.537849555734717*^9,
3.537849584285543*^9}, 3.537849657779147*^9, 3.537849693124098*^9,
3.537939048777897*^9, 3.540983984565137*^9, 3.541051018324119*^9,
3.546671097097636*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Sort", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"higherlinkedFields", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"hihgerlinkedValue", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"n", ",",
RowBox[{"Length", "[", "hihgerlinkedValue", "]"}]}], "}"}]}], "]"}],
",",
RowBox[{
RowBox[{
RowBox[{"#1", "[",
RowBox[{"[", "2", "]"}], "]"}], ">",
RowBox[{"#2", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "&"}]}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.537530415667163*^9, 3.5375305564142923`*^9}, {
3.53753060968575*^9, 3.537530610069079*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.2265541902463322`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.2011886795599656`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.1479463919345476`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.1111646608583572`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.1014587233472524`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9",
FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0795350025187573`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0788468678731387`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0501193036517276`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0456522969391029`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0321081684985294`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0311544728321118`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0198378213102897`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.011722950870336`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.00084797181354`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9991527466334338`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9884128843175382`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9805480627451116`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9697868033811222`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9688906943298017`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9563408438228088`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9522727527458636`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9269156075610814`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9",
FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9263247580363887`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9078869491914079`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.8999566267950924`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.871120818032953`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6570\:7406\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.8325086782921836`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.8152921476703506`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{{{
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]},
1.2265541902463322`}, {{
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]]},
1.2011886795599656`}, {{
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]},
1.1479463919345476`}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.1111646608583572`}, {{
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]},
1.1014587233472524`}, {{
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]},
1.0795350025187573`}, {{
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.0788468678731387`}, {{
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]},
1.0501193036517276`}, {{
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]},
1.0456522969391029`}, {{
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]},
1.0321081684985294`}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]},
1.0311544728321118`}, {{
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.0198378213102897`}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.011722950870336}, {{
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]},
1.00084797181354}, {{
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]},
0.9991527466334338}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]},
0.9884128843175382}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]},
0.9805480627451116}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]},
0.9697868033811222}, {{
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]]}, 0.9688906943298017}, {{
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]},
0.9563408438228088}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]},
0.9522727527458636}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]},
0.9269156075610814}, {{
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]}, 0.9263247580363887}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]},
0.9078869491914079}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]},
0.8999566267950924}, {{
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]]}, 0.871120818032953}, {{
Text[
Style["\:6570\:7406\:5de5\:5b66", FontSize -> 10]],
Text[
Style["\:96fb\:5b50\:60c5\:5831\:5de5\:5b66", FontSize -> 10]]},
0.8325086782921836}, {{
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]},
0.8152921476703506}}]]], "Output",
CellChangeTimes->{
3.53753045492627*^9, {3.5375304862760344`*^9, 3.537530498272748*^9},
3.53753055739711*^9, 3.5375306110665417`*^9, 3.5378487147709208`*^9, {
3.537849555896644*^9, 3.5378495844524107`*^9}, 3.537849657940777*^9,
3.537849693324573*^9, 3.53793904888194*^9, 3.540983984644228*^9,
3.541051018534684*^9, 3.546671097161903*^9}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Higher linkage > 0.1", "Section",
CellChangeTimes->{{3.532145080130301*^9, 3.532145109621167*^9}, {
3.537524958675131*^9, 3.5375249606825867`*^9}, {3.537849495996995*^9,
3.537849498182847*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"higherlinkage", "[", "0.1", "]"}], "=",
RowBox[{"Cases", "[",
RowBox[{
RowBox[{"Position", "[",
RowBox[{"symmetricLinkage21DataDiagonalstanderdized", ",",
RowBox[{"x_", "/;",
RowBox[{"x", ">", "0.1"}]}], ",",
RowBox[{"{", "2", "}"}]}], "]"}], ",",
RowBox[{"y_", "/;",
RowBox[{
RowBox[{"y", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[NotEqual]",
RowBox[{"y", "[",
RowBox[{"[", "2", "]"}], "]"}]}]}], ",",
RowBox[{"{", "1", "}"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.537521000862452*^9, 3.537521206136447*^9}, {
3.537521550133275*^9, 3.537521568598299*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "3"}], "}"}], ",",
RowBox[{"{",
RowBox[{"3", ",", "1"}], "}"}], ",",
RowBox[{"{",
RowBox[{"4", ",", "7"}], "}"}], ",",
RowBox[{"{",
RowBox[{"5", ",", "8"}], "}"}], ",",
RowBox[{"{",
RowBox[{"7", ",", "4"}], "}"}], ",",
RowBox[{"{",
RowBox[{"8", ",", "5"}], "}"}], ",",
RowBox[{"{",
RowBox[{"11", ",", "12"}], "}"}], ",",
RowBox[{"{",
RowBox[{"12", ",", "11"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"16", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "16"}], "}"}], ",",
RowBox[{"{",
RowBox[{"17", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"18", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"19", ",", "20"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "16"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "18"}], "}"}], ",",
RowBox[{"{",
RowBox[{"20", ",", "19"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.5375211109123583`*^9, 3.5375211686746407`*^9},
3.537521207077099*^9, 3.537521574344002*^9, 3.537524989015046*^9,
3.537528519115156*^9, 3.5378487145764017`*^9, 3.537849719974099*^9,
3.537939048945031*^9, 3.54098398468685*^9, 3.541051018600039*^9,
3.54667109719912*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"higherlinkedFieldsSorted", "=",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Sort", "[",
RowBox[{"{",
RowBox[{
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}], "]"}],
"&"}], ",",
RowBox[{"higherlinkage", "[", "0.1", "]"}]}], "]"}], "//",
"Union"}]}]], "Input",
CellChangeTimes->{{3.537521586339716*^9, 3.537521648938609*^9}, {
3.5375216937552757`*^9, 3.5375217467444153`*^9}, {3.537526756464645*^9,
3.537526758152055*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\
\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{{3.537521643423738*^9, 3.537521650991055*^9},
3.537521713854195*^9, 3.537521752766425*^9, 3.5375249890681953`*^9,
3.53752675954895*^9, 3.537528519169957*^9, 3.53784871460851*^9,
3.537849720195284*^9, 3.537939048999545*^9, 3.540983984734746*^9,
3.541051018664082*^9, 3.546671097251136*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"higherlinkedFields", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"jFieldName21Text", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}]}], "}"}], "&"}], ",",
RowBox[{"higherlinkage", "[", "0.1", "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.53752678385395*^9, 3.5375268217573433`*^9}, {
3.537529076632321*^9, 3.53752909105354*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\
\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9\
\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}],
"}"}], ",",
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]],
",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->{{3.537526791336734*^9, 3.537526822367474*^9},
3.537528519227995*^9, 3.537529094700849*^9, 3.537848714648094*^9,
3.537849720346711*^9, 3.537939049056061*^9, 3.540983984790678*^9,
3.541051018723282*^9, 3.546671097306409*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"hihgerlinkedValue", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"citedciting21DatastanderdizedcitedParciting", "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "]"}], "]"}], "[",
RowBox[{"[",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "]"}], "]"}], "&"}], ",",
RowBox[{"higherlinkage", "[", "0.1", "]"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.53752658580225*^9, 3.537526709132498*^9}, {
3.537526812642799*^9, 3.537526818093143*^9}, {3.537529101030614*^9,
3.537529113421968*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.9991527466334338`", ",", "1.00084797181354`", ",", "1.1479463919345476`",
",", "0.9263247580363887`", ",", "0.871120818032953`", ",",
"1.0795350025187573`", ",", "0.8152921476703506`", ",",
"1.2265541902463322`", ",", "0.9697868033811222`", ",",
"1.011722950870336`", ",", "1.0311544728321118`", ",",
"1.1111646608583572`", ",", "1.0198378213102897`", ",",
"1.0788468678731387`", ",", "0.9884128843175382`", ",",
"0.8999566267950924`", ",", "0.9805480627451116`", ",",
"0.9269156075610814`"}], "}"}]], "Output",
CellChangeTimes->{{3.5375265978635817`*^9, 3.537526613496311*^9},
3.537526652914166*^9, 3.5375267095908537`*^9, {3.537526814797595*^9,
3.5375268261971188`*^9}, 3.537528519280458*^9, 3.5375291144508057`*^9,
3.537848714688102*^9, 3.537849720480649*^9, 3.537939049111651*^9,
3.540983984830443*^9, 3.541051018776767*^9, 3.546671097343307*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"higherlinkedFields", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"hihgerlinkedValue", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"n", ",",
RowBox[{"Length", "[", "hihgerlinkedValue", "]"}]}], "}"}]}],
"]"}]], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}], "}"}],
",", "0.9991527466334338`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]}], "}"}], ",",
"1.00084797181354`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
"1.1479463919345476`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]]}], "}"}], ",", "0.9263247580363887`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}], "}"}], ",",
"0.871120818032953`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}], "}"}], ",",
"1.0795350025187573`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]}], "}"}], ",",
"0.8152921476703506`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}], "}"}],
",", "1.2265541902463322`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
"0.9697868033811222`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.011722950870336`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
"1.0311544728321118`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.1111646608583572`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.0198378213102897`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}],
"}"}], ",", "1.0788468678731387`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}], "}"}], ",",
"0.9884128843175382`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}], "}"}], ",",
"0.8999566267950924`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}],
"}"}], ",", "0.9805480627451116`"}], "}"}], ",",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]], ",",
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}],
"}"}], ",", "0.9269156075610814`"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{3.537530585023278*^9, 3.5378487147226763`*^9,
3.537849720632476*^9, 3.537939049177939*^9, 3.540983984892448*^9,
3.5410510188320932`*^9, 3.546671097405116*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"Sort", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{
RowBox[{"higherlinkedFields", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"hihgerlinkedValue", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"n", ",",
RowBox[{"Length", "[", "hihgerlinkedValue", "]"}]}], "}"}]}], "]"}],
",",
RowBox[{
RowBox[{
RowBox[{"#1", "[",
RowBox[{"[", "2", "]"}], "]"}], ">",
RowBox[{"#2", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "&"}]}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.537530415667163*^9, 3.5375305564142923`*^9}, {
3.53753060968575*^9, 3.537530610069079*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.2265541902463322`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.1479463919345476`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.1111646608583572`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9",
FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0795350025187573`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0788468678731387`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0311544728321118`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.0198378213102897`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.011722950870336`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "1.00084797181354`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:52d5\:690d\:7269\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9991527466334338`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9884128843175382`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9805480627451116`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b661\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9697868033811222`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9269156075610814`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:7269\:6027\:7269\:7406\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:91d1\:5c5e\:30fb\\n\:30bb\:30e9\:30df\:30c3\:30af\
\:30b9\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9",
FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.9263247580363887`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style[
"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:81e8\:5e8a\:533b\:5b662\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.8999566267950924`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5fdc\:7528\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5316\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5316\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.871120818032953`"},
{GridBox[{
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]]},
{
InterpretationBox[Cell[BoxData[
StyleBox["\<\"\:5730\:7403\:79d1\:5b66\"\>",
StripOnInput->False,
FontSize->10]], "Text", "TR"],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]]}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], "0.8152921476703506`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{{{
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]]},
1.2265541902463322`}, {{
Text[
Style["\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]]},
1.1479463919345476`}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.1111646608583572`}, {{
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]],
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]]},
1.0795350025187573`}, {{
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.0788468678731387`}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]},
1.0311544728321118`}, {{
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.0198378213102897`}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]]},
1.011722950870336}, {{
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]],
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]]},
1.00084797181354}, {{
Text[
Style["\:52d5\:690d\:7269\:5b66", FontSize -> 10]],
Text[
Style["\:6c34\:7523\:30fb\:6d77\:6d0b", FontSize -> 10]]},
0.9991527466334338}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]]},
0.9884128843175382}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66", FontSize -> 10]]},
0.9805480627451116}, {{
Text[
Style["\:81e8\:5e8a\:533b\:5b661", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]},
0.9697868033811222}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7", FontSize -> 10]]},
0.9269156075610814}, {{
Text[
Style["\:7269\:6027\:7269\:7406", FontSize -> 10]],
Text[
Style[
"\:91d1\:5c5e\:30fb\n\:30bb\:30e9\:30df\:30c3\:30af\:30b9", FontSize ->
10]]}, 0.9263247580363887}, {{
Text[
Style["\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66", FontSize -> 10]],
Text[
Style["\:81e8\:5e8a\:533b\:5b662", FontSize -> 10]]},
0.8999566267950924}, {{
Text[
Style["\:5fdc\:7528\:5316\:5b66", FontSize -> 10]],
Text[
Style["\:5316\:5b66", FontSize -> 10]]}, 0.871120818032953}, {{
Text[
Style["\:6c17\:8c61\:30fb\:74b0\:5883", FontSize -> 10]],
Text[
Style["\:5730\:7403\:79d1\:5b66", FontSize -> 10]]},
0.8152921476703506}}]]], "Output",
CellChangeTimes->{
3.53753045492627*^9, {3.5375304862760344`*^9, 3.537530498272748*^9},
3.53753055739711*^9, 3.5375306110665417`*^9, 3.5378487147709208`*^9,
3.53784972080867*^9, 3.537939049329256*^9, 3.540983984953616*^9,
3.541051018906087*^9, 3.54667109746292*^9}]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Cluster analysis", "Section",
CellChangeTimes->{{3.431822599871025*^9, 3.431822604488411*^9}}],
Cell[BoxData[
RowBox[{"Needs", "[", "\"\<HierarchicalClustering`\>\"", "]"}]], "Input",
CellChangeTimes->{{3.431823650782237*^9, 3.431823680205832*^9}}],
Cell[CellGroupData[{
Cell["raw cited matrix", "Subsection",
CellChangeTimes->{{3.431824441854018*^9, 3.431824445428808*^9}, {
3.4318249610285587`*^9, 3.431824964963443*^9}, {3.43182549807127*^9,
3.431825498399736*^9}, {3.431998934541287*^9, 3.4319989396132317`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Agglomerate", "[",
RowBox[{
RowBox[{"citedciting21Data", "\[Rule]", "ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}]}],
"]"}]], "Input",
CellChangeTimes->{{3.431822626935895*^9, 3.431822672516711*^9}, {
3.431823611972501*^9, 3.431823636577286*^9}, {3.4318237026233053`*^9,
3.43182370423993*^9}, {3.431823747821875*^9, 3.4318237496000147`*^9}, {
3.431823783796399*^9, 3.4318237923791857`*^9}, {3.431823861229189*^9,
3.4318238749761066`*^9}}],
Cell[BoxData[
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{"\<\"B-1\"\>", ",",
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{"\<\"B-3\"\>", ",",
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{
RowBox[{"Cluster", "[",
RowBox[{"\<\"I-2\"\>", ",", "\<\"M\"\>", ",",
SqrtBox["1182301091"], ",", "1", ",", "1"}], "]"}],
",", "\<\"E-3\"\>", ",",
SqrtBox["1344491923"], ",", "2", ",", "1"}], "]"}],
",", "\<\"E-2\"\>", ",",
SqrtBox["1524707474"], ",", "3", ",", "1"}], "]"}], ",",
RowBox[{"7", " ",
SqrtBox["50099659"]}], ",", "1", ",", "4"}], "]"}],
",", "\<\"G-2\"\>", ",",
SqrtBox["3952802499"], ",", "5", ",", "1"}], "]"}],
",", "\<\"E-1\"\>", ",",
SqrtBox["5319325437"], ",", "6", ",", "1"}], "]"}],
",", "\<\"Cp\"\>", ",",
RowBox[{"4", " ",
SqrtBox["414969801"]}], ",", "7", ",", "1"}], "]"}],
",", "\<\"I-1\"\>", ",",
SqrtBox["7558961635"], ",", "8", ",", "1"}], "]"}],
",", "\<\"B-2\"\>", ",",
SqrtBox["7902557669"], ",", "9", ",", "1"}], "]"}],
",", "\<\"Ca\"\>", ",",
SqrtBox["7962419258"], ",", "10", ",", "1"}], "]"}],
",", "\<\"G-1\"\>", ",",
SqrtBox["18894892862"], ",", "11", ",", "1"}], "]"}],
",", "\<\"Me-4\"\>", ",",
SqrtBox["22274925053"], ",", "12", ",", "1"}], "]"}], ",",
RowBox[{"2", " ",
SqrtBox["8557389247"]}], ",", "1", ",", "13"}], "]"}],
",", "\<\"Q\"\>", ",",
SqrtBox["58971590353"], ",", "14", ",", "1"}], "]"}],
",", "\<\"Me-1\"\>", ",",
RowBox[{"2", " ",
SqrtBox["15546098405"]}], ",", "15", ",", "1"}], "]"}],
",", "\<\"Me-3\"\>", ",",
SqrtBox["127728068390"], ",", "16", ",", "1"}], "]"}],
",", "\<\"C-2\"\>", ",",
SqrtBox["152810091039"], ",", "17", ",", "1"}], "]"}],
",", "\<\"Me-2\"\>", ",",
SqrtBox["183977864939"], ",", "18", ",", "1"}], "]"}],
",", "\<\"C-1\"\>", ",",
RowBox[{"2", " ",
SqrtBox["77297996438"]}], ",", "19", ",", "1"}], "]"}],
",", "\<\"Mo\"\>", ",",
SqrtBox["2539018231022"], ",", "20", ",", "1"}], "]"}]], "Output",
CellChangeTimes->{
3.4318226441080217`*^9, 3.431823617451804*^9, {3.4318236850252943`*^9,
3.4318237050636673`*^9}, 3.4318237937185507`*^9, 3.431823876763258*^9,
3.43184041163785*^9, 3.43189845702183*^9, 3.4319986276331577`*^9,
3.432003302752184*^9, 3.4320986087873707`*^9, 3.432100608598065*^9,
3.432178128012519*^9, 3.432249844076935*^9, 3.432254963492032*^9,
3.43225582397749*^9, 3.4323330724067507`*^9, 3.43233552468099*^9,
3.432339333173462*^9, 3.432357820785254*^9, 3.432361205758113*^9,
3.432362069982637*^9, 3.432457229696033*^9, 3.435277866395252*^9,
3.435365178528858*^9, 3.4353767460109262`*^9, 3.479012132920515*^9,
3.4790182702354813`*^9, 3.4898119535262957`*^9, 3.518907714892057*^9,
3.522544982720912*^9, 3.522550544089754*^9, 3.5225579215131197`*^9,
3.5225583305871477`*^9, 3.5225589747787037`*^9, 3.531531186781283*^9,
3.531534144756413*^9, 3.531614507608212*^9, 3.531622864981094*^9,
3.531627036701824*^9, 3.531629523907934*^9, 3.531630113457226*^9,
3.5317132496696672`*^9, 3.531776065367378*^9, 3.5317901986366034`*^9,
3.531790877015024*^9, 3.53203662471402*^9, 3.5320398400325193`*^9,
3.532054641928903*^9, 3.532124849422876*^9, 3.535608669637711*^9,
3.537097439858*^9, 3.537408793999775*^9, 3.5374369185090523`*^9,
3.5375205100471907`*^9, 3.537524989217524*^9, 3.5375285194261017`*^9,
3.537848714992625*^9, 3.537939049482163*^9, 3.540983985188404*^9,
3.541051019064996*^9, 3.546671097704742*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Average\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431825550572604*^9, 3.431825555213567*^9}, {
3.431998717348991*^9, 3.431998721166292*^9}, {3.431998767817792*^9,
3.4319987804986258`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.7460982867674468}, {2, 0.7460982867674468}, {2,
0}}], LineBox[{{3, 0}, {3, 0.7700959704430073}, {
4, 0.7700959704430073}, {4, 0}}],
LineBox[{{1.5, 0.7460982867674468}, {1.5, 0.8937179565938216}, {3.5,
0.8937179565938216}, {3.5, 0.7700959704430073}}],
LineBox[{{5, 0}, {5, 0.843856876105251}, {6, 0.843856876105251}, {6,
0}}], LineBox[{{7, 0}, {7, 0.5946848355579317}, {
8, 0.5946848355579317}, {8, 0}}],
LineBox[{{7.5, 0.5946848355579317}, {7.5, 0.6957898682005917}, {
9, 0.6957898682005917}, {9, 0}}],
LineBox[{{8.25, 0.6957898682005917}, {8.25, 0.7556247497549503}, {
10, 0.7556247497549503}, {10, 0}}],
LineBox[{{9.125, 0.7556247497549503}, {9.125, 0.7866164102520937}, {
11, 0.7866164102520937}, {11, 0}}],
LineBox[{{5.5, 0.843856876105251}, {5.5, 0.8948634134107107}, {10.0625,
0.8948634134107107}, {10.0625, 0.7866164102520937}}],
LineBox[{{2.5, 0.8937179565938216}, {2.5, 0.9454613305984993}, {7.78125,
0.9454613305984993}, {7.78125, 0.8948634134107107}}],
LineBox[{{12, 0}, {12, 0.7842134286543229}, {13, 0.7842134286543229}, {
13, 0}}],
LineBox[{{12.5, 0.7842134286543229}, {12.5, 0.8765482522196397}, {
14, 0.8765482522196397}, {14, 0}}],
LineBox[{{15, 0}, {15, 0.7016544964672449}, {16, 0.7016544964672449}, {
16, 0}}],
LineBox[{{15.5, 0.7016544964672449}, {15.5, 0.807912336588381}, {
17, 0.807912336588381}, {17, 0}}],
LineBox[{{18, 0}, {18, 0.6686417854100298}, {19, 0.6686417854100298}, {
19, 0}}],
LineBox[{{16.25, 0.807912336588381}, {16.25, 0.855898340040837}, {18.5,
0.855898340040837}, {18.5, 0.6686417854100298}}],
LineBox[{{17.375, 0.855898340040837}, {17.375, 0.9077663107327234}, {
20, 0.9077663107327234}, {20, 0}}],
LineBox[{{13.25, 0.8765482522196397}, {13.25, 0.9619235035095887}, {
18.6875, 0.9619235035095887}, {18.6875, 0.9077663107327234}}],
LineBox[{{15.96875, 0.9619235035095887}, {15.96875,
0.9680211972480129}, {21, 0.9680211972480129}, {21, 0}}],
LineBox[{{5.140625, 0.9454613305984993}, {5.140625,
0.9752070517765551}, {18.484375, 0.9752070517765551}, {18.484375,
0.9680211972480129}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{650., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->{{3.431998771566196*^9, 3.431998781325036*^9},
3.4320033030784597`*^9, 3.43209861212748*^9, 3.432100608909582*^9,
3.432178128425475*^9, 3.432249844229656*^9, 3.4322549669132957`*^9,
3.432255824122381*^9, 3.432333072591877*^9, 3.432335524862082*^9,
3.4323393337159653`*^9, 3.432357821021138*^9, 3.432361206101153*^9,
3.432362070534553*^9, 3.432457232226242*^9, 3.43527786796949*^9,
3.4353651788647947`*^9, 3.435376746344943*^9, 3.479012133023676*^9,
3.47901827036688*^9, 3.489811953648632*^9, 3.5189077151612988`*^9,
3.5225449827970133`*^9, 3.522550544165711*^9, 3.522557921583735*^9,
3.522558330658268*^9, 3.522558974852786*^9, 3.531531186841647*^9,
3.531534144835886*^9, 3.531614507685721*^9, 3.531622865043077*^9,
3.531627036811987*^9, 3.5316295240104322`*^9, 3.5316301135627604`*^9,
3.53171324977993*^9, 3.531776065453717*^9, 3.531790198729706*^9,
3.5317908771026077`*^9, 3.532036624797949*^9, 3.532039840096238*^9,
3.532054641990632*^9, 3.5321248495020113`*^9, 3.535608669701171*^9,
3.537097439925736*^9, 3.537408794095738*^9, 3.537436918578068*^9,
3.537520510204791*^9, 3.537524989276875*^9, 3.537528519487306*^9,
3.5378487150531597`*^9, 3.537939049541093*^9, 3.540983985260767*^9,
3.541051019127399*^9, 3.5466710977670803`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Complete\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431825550572604*^9, 3.431825555213567*^9}, {
3.431998717348991*^9, 3.431998721166292*^9}, {3.431998767817792*^9,
3.4319987804986258`*^9}, {3.432008499833523*^9, 3.432008606595348*^9}, {
3.4320087165645514`*^9, 3.432008723901321*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.7460982867674468}, {2, 0.7460982867674468}, {2,
0}}], LineBox[{{3, 0}, {3, 0.7700959704430073}, {
4, 0.7700959704430073}, {4, 0}}],
LineBox[{{1.5, 0.7460982867674468}, {1.5, 0.9536964298715764}, {3.5,
0.9536964298715764}, {3.5, 0.7700959704430073}}],
LineBox[{{5, 0}, {5, 0.7016544964672449}, {6, 0.7016544964672449}, {6,
0}}], LineBox[{{5.5, 0.7016544964672449}, {5.5, 0.8311992534604249}, {
7, 0.8311992534604249}, {7, 0}}],
LineBox[{{6.25, 0.8311992534604249}, {6.25, 0.9077217128437116}, {
8, 0.9077217128437116}, {8, 0}}],
LineBox[{{2.5, 0.9536964298715764}, {2.5, 0.9867964372168458}, {7.125,
0.9867964372168458}, {7.125, 0.9077217128437116}}],
LineBox[{{9, 0}, {9, 0.8115993234194185}, {10, 0.8115993234194185}, {10,
0}}], LineBox[{{11, 0}, {11, 0.5946848355579317}, {
12, 0.5946848355579317}, {12, 0}}],
LineBox[{{11.5, 0.5946848355579317}, {11.5, 0.7274703006422664}, {
13, 0.7274703006422664}, {13, 0}}],
LineBox[{{12.25, 0.7274703006422664}, {12.25, 0.8425696494441495}, {
14, 0.8425696494441495}, {14, 0}}],
LineBox[{{9.5, 0.8115993234194185}, {9.5, 0.9242565951701944}, {13.125,
0.9242565951701944}, {13.125, 0.8425696494441495}}],
LineBox[{{4.8125, 0.9867964372168458}, {4.8125, 0.9950190540069995}, {
11.3125, 0.9950190540069995}, {11.3125, 0.9242565951701944}}],
LineBox[{{15, 0}, {15, 0.6686417854100298}, {16, 0.6686417854100298}, {
16, 0}}],
LineBox[{{15.5, 0.6686417854100298}, {15.5, 0.888707563071545}, {
17, 0.888707563071545}, {17, 0}}],
LineBox[{{19, 0}, {19, 0.7842134286543229}, {20, 0.7842134286543229}, {
20, 0}}],
LineBox[{{18, 0}, {18, 0.922984866790684}, {19.5, 0.922984866790684}, {
19.5, 0.7842134286543229}}],
LineBox[{{16.25, 0.888707563071545}, {16.25, 0.9778558202690364}, {18.75,
0.9778558202690364}, {18.75, 0.922984866790684}}],
LineBox[{{17.5, 0.9778558202690364}, {17.5, 0.9923309082161921}, {
21, 0.9923309082161921}, {21, 0}}],
LineBox[{{8.0625, 0.9950190540069995}, {8.0625, 0.9983623603777192}, {
19.25, 0.9983623603777192}, {19.25, 0.9923309082161921}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{683., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJwVyGkow2EAx/E/mTlX7hfkKIq9cY5aWh5yzS2hHY5t7onQ0qixF+SNFxZJ
coSwJMJabfEGKVGyQkbSkj00xxvl/u3Ft099o2Qd5Q0uDMPwkKJPp/UcsxPX
0dVGHqyWR9SlwndHIF8CNeIRgQZmlHnvDcLJDxZXC82SkPtl+Hk3G7gKh1wP
XvWwZ2PpYwvWDBzO7EAv9oWXAQr1kVqb85vmDrIn7STnq7apE+Y+lPiqYLR0
SbHxZCetphP5Fgwwpu7mM5QUO9pXjtIoaT2+1hsFlGyvsWUmKJpP+d6FfrFV
8XuwTnijcfrMlqqsJZRIb8Meb6CO0xvDKqVE1RnN94TN8dNZ3nBOrVX7wH4m
Zd/paVe6hAc1wwkeFdB9/Mohgotxy1liyN0PzTyHjUKWxQLNl4RjhYbN5Mpf
+Co0ti1UUaI4/ROrRZTY3LLl/mJKphYs4ZFwveXoJQ9GmfURBVDQ/XZZCJN0
8kQ7nEhMLgqSUBKu5Abb6imx/jScucko4Sj5f2YlJf8oq9KF
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Single\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431825550572604*^9, 3.431825555213567*^9}, {
3.431998717348991*^9, 3.431998721166292*^9}, {3.431998767817792*^9,
3.4319987804986258`*^9}, {3.432008499833523*^9, 3.432008606595348*^9}, {
3.432008690644186*^9, 3.4320086974396143`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.7460982867674468}, {2, 0.7460982867674468}, {2,
0}}], LineBox[{{3, 0}, {3, 0.7700959704430073}, {
4, 0.7700959704430073}, {4, 0}}],
LineBox[{{1.5, 0.7460982867674468}, {1.5, 0.7983435046148004}, {3.5,
0.7983435046148004}, {3.5, 0.7700959704430073}}],
LineBox[{{5, 0}, {5, 0.5946848355579317}, {6, 0.5946848355579317}, {6,
0}}], LineBox[{{5.5, 0.5946848355579317}, {5.5, 0.6605304558343643}, {
7, 0.6605304558343643}, {7, 0}}],
LineBox[{{6.25, 0.6605304558343643}, {6.25, 0.6641094357589171}, {
8, 0.6641094357589171}, {8, 0}}],
LineBox[{{7.125, 0.6641094357589171}, {7.125, 0.6704803482058661}, {
9, 0.6704803482058661}, {9, 0}}],
LineBox[{{8.0625, 0.6704803482058661}, {8.0625, 0.7377426589711186}, {
10, 0.7377426589711186}, {10, 0}}],
LineBox[{{2.5, 0.7983435046148004}, {2.5, 0.8330718492285702}, {9.03125,
0.8330718492285702}, {9.03125, 0.7377426589711186}}],
LineBox[{{12, 0}, {12, 0.7016544964672449}, {13, 0.7016544964672449}, {
13, 0}}],
LineBox[{{12.5, 0.7016544964672449}, {12.5, 0.7846254197163371}, {
14, 0.7846254197163371}, {14, 0}}],
LineBox[{{15, 0}, {15, 0.6686417854100298}, {16, 0.6686417854100298}, {
16, 0}}],
LineBox[{{13.25, 0.7846254197163371}, {13.25, 0.793747217962316}, {15.5,
0.793747217962316}, {15.5, 0.6686417854100298}}],
LineBox[{{11, 0}, {11, 0.8019413185113982}, {14.375,
0.8019413185113982}, {14.375, 0.793747217962316}}],
LineBox[{{5.765625, 0.8330718492285702}, {5.765625, 0.843856876105251}, {
12.6875, 0.843856876105251}, {12.6875, 0.8019413185113982}}],
LineBox[{{9.2265625, 0.843856876105251}, {9.2265625,
0.8503158652407526}, {17, 0.8503158652407526}, {17, 0}}],
LineBox[{{13.11328125, 0.8503158652407526}, {13.11328125,
0.8564151762497069}, {18, 0.8564151762497069}, {18, 0}}],
LineBox[{{19, 0}, {19, 0.7842134286543229}, {20, 0.7842134286543229}, {
20, 0}}],
LineBox[{{19.5, 0.7842134286543229}, {19.5, 0.8301116376485954}, {
21, 0.8301116376485954}, {21, 0}}],
LineBox[{{15.556640625, 0.8564151762497069}, {15.556640625,
0.902847796103475}, {20.25, 0.902847796103475}, {20.25,
0.8301116376485954}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{724., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJwVz1sog2EAxvEt5OxCo5yZU0n5jG8krV6nJsckMis2c2jkcPOp3Qy5c6Ec
cmyJxBYlouWwFRMtJRkp+yhc2KtYETdOzy6efnf/ehLUPTWtQoFAwGLMgkLv
P+YiBV6PbSxs49OapTB0IjJPCTXMiEwP3YzUOghHHb5pQ5D5jHpYgY7qZZER
HopO3CY4e2D82oJBPnbDNrTd8AE78GMmZegJShjrcfG0i2inNO298FBSG8xB
Z4dJs/HiIsPH5y1b0LKeaykVUNLP9a2e5lAiPuJNZhkl7ogA9R6sNEu/LdAQ
1ZBhhTu993qPP+ImzllFScRV7DMPT4S6ZJ9qSvbmUvL8oarbUBgIjdywLghG
J0ptHi8XZUoWLt5L/GqhfPz2VQGzUo2FjXD+LKbg0tPp8XU4oMi7KMQJtXds
3S9MOj/oXKqnhPsTKnUKSmzukpbQRkqyN69j46FYbn+TQ/P8WlwZ3K14vymH
+d2tmS6oFbEVYUpKJgfSw59U+Me3X3ir0WnO/9vvouQfdXXUBw==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<WeightedAverage\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431825550572604*^9, 3.431825555213567*^9}, {
3.431998717348991*^9, 3.431998721166292*^9}, {3.431998767817792*^9,
3.4319987804986258`*^9}, {3.432008499833523*^9, 3.432008606595348*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.7460982867674468}, {2, 0.7460982867674468}, {2,
0}}], LineBox[{{3, 0}, {3, 0.7700959704430073}, {
4, 0.7700959704430073}, {4, 0}}],
LineBox[{{1.5, 0.7460982867674468}, {1.5, 0.8937179565938216}, {3.5,
0.8937179565938216}, {3.5, 0.7700959704430073}}],
LineBox[{{5, 0}, {5, 0.8115993234194185}, {6, 0.8115993234194185}, {6,
0}}], LineBox[{{7, 0}, {7, 0.5946848355579317}, {
8, 0.5946848355579317}, {8, 0}}],
LineBox[{{7.5, 0.5946848355579317}, {7.5, 0.6957898682005917}, {
9, 0.6957898682005917}, {9, 0}}],
LineBox[{{8.25, 0.6957898682005917}, {8.25, 0.7773609746772501}, {
10, 0.7773609746772501}, {10, 0}}],
LineBox[{{5.5, 0.8115993234194185}, {5.5, 0.8600516308396791}, {9.125,
0.8600516308396791}, {9.125, 0.7773609746772501}}],
LineBox[{{7.3125, 0.8600516308396791}, {7.3125, 0.9242520726830643}, {
11, 0.9242520726830643}, {11, 0}}],
LineBox[{{2.5, 0.8937179565938216}, {2.5, 0.9485537104966646}, {9.15625,
0.9485537104966646}, {9.15625, 0.9242520726830643}}],
LineBox[{{12, 0}, {12, 0.7842134286543229}, {13, 0.7842134286543229}, {
13, 0}}],
LineBox[{{12.5, 0.7842134286543229}, {12.5, 0.8765482522196397}, {
14, 0.8765482522196397}, {14, 0}}],
LineBox[{{15, 0}, {15, 0.7016544964672449}, {16, 0.7016544964672449}, {
16, 0}}],
LineBox[{{15.5, 0.7016544964672449}, {15.5, 0.807912336588381}, {
17, 0.807912336588381}, {17, 0}}],
LineBox[{{18, 0}, {18, 0.6686417854100298}, {19, 0.6686417854100298}, {
19, 0}}],
LineBox[{{16.25, 0.807912336588381}, {16.25, 0.8652332021417212}, {18.5,
0.8652332021417212}, {18.5, 0.6686417854100298}}],
LineBox[{{17.375, 0.8652332021417212}, {17.375, 0.8944748134211316}, {
20, 0.8944748134211316}, {20, 0}}],
LineBox[{{13.25, 0.8765482522196397}, {13.25, 0.9466912463794732}, {
18.6875, 0.9466912463794732}, {18.6875, 0.8944748134211316}}],
LineBox[{{15.96875, 0.9466912463794732}, {15.96875,
0.9678553704429166}, {21, 0.9678553704429166}, {21, 0}}],
LineBox[{{5.828125, 0.9485537104966646}, {5.828125, 0.984363530978202}, {
18.484375, 0.984363530978202}, {18.484375, 0.9678553704429166}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{683., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->{
3.432008508869226*^9, {3.432008539833794*^9, 3.4320086076669693`*^9},
3.4320986164310837`*^9, 3.432100609400112*^9, 3.4321781290175247`*^9,
3.432249844412417*^9, 3.432254970925982*^9, 3.4322558243036547`*^9,
3.43233307312925*^9, 3.432335525295033*^9, 3.43233933427983*^9,
3.432357821435184*^9, 3.432361206655704*^9, 3.4323620711249027`*^9,
3.432457233289266*^9, 3.435277870161097*^9, 3.43536517931146*^9,
3.4353767467869883`*^9, 3.479012133492199*^9, 3.479018270546155*^9,
3.4898119538569927`*^9, 3.5189077156345043`*^9, 3.522544983001979*^9,
3.5225505443773746`*^9, 3.522557921775529*^9, 3.52255833085002*^9,
3.5225589750746803`*^9, 3.531531187038596*^9, 3.531534145029442*^9,
3.5316145078781443`*^9, 3.531622865273872*^9, 3.53162703702008*^9,
3.531629524206459*^9, 3.5316301137590303`*^9, 3.531713250025979*^9,
3.531776065663568*^9, 3.531790198932096*^9, 3.531790877354298*^9,
3.532036625000671*^9, 3.532039840299391*^9, 3.53205464219347*^9,
3.53212484974617*^9, 3.535608670052288*^9, 3.5370974401295643`*^9,
3.537408794274531*^9, 3.537436918773774*^9, 3.5375205103796883`*^9,
3.537524989538241*^9, 3.537528519661265*^9, 3.5378487152276487`*^9,
3.537939049718741*^9, 3.54098398545548*^9, 3.541051019305023*^9,
3.546671097950156*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431825550572604*^9, 3.431825555213567*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.7460982867674468}, {2, 0.7460982867674468}, {2,
0}}], LineBox[{{3, 0}, {3, 0.7700959704430073}, {
4, 0.7700959704430073}, {4, 0}}],
LineBox[{{1.5, 0.7460982867674468}, {1.5, 1.0293387845824162`}, {3.5,
1.0293387845824162`}, {3.5, 0.7700959704430073}}],
LineBox[{{6, 0}, {6, 0.6686417854100298}, {7, 0.6686417854100298}, {7,
0}}], LineBox[{{6.5, 0.6686417854100298}, {6.5, 0.9364683570715218}, {
8, 0.9364683570715218}, {8, 0}}],
LineBox[{{5, 0}, {5, 1.0058483886826384`}, {7.25, 1.0058483886826384`}, {
7.25, 0.9364683570715218}}],
LineBox[{{9, 0}, {9, 0.7016544964672449}, {10, 0.7016544964672449}, {10,
0}}], LineBox[{{9.5, 0.7016544964672449}, {9.5, 0.8433316166287597}, {
11, 0.8433316166287597}, {11, 0}}],
LineBox[{{10.25, 0.8433316166287597}, {10.25, 0.9140631393811574}, {
12, 0.9140631393811574}, {12, 0}}],
LineBox[{{6.125, 1.0058483886826384`}, {6.125, 1.149869805880529}, {
11.125, 1.149869805880529}, {11.125, 0.9140631393811574}}],
LineBox[{{14, 0}, {14, 0.7842134286543229}, {15, 0.7842134286543229}, {
15, 0}}],
LineBox[{{13, 0}, {13, 0.907326526741412}, {14.5, 0.907326526741412}, {
14.5, 0.7842134286543229}}],
LineBox[{{8.625, 1.149869805880529}, {8.625, 1.293880566231415}, {13.75,
1.293880566231415}, {13.75, 0.907326526741412}}],
LineBox[{{2.5, 1.0293387845824162`}, {2.5, 1.4118157345282052`}, {
11.1875, 1.4118157345282052`}, {11.1875, 1.293880566231415}}],
LineBox[{{16, 0}, {16, 0.8115993234194185}, {17, 0.8115993234194185}, {
17, 0}}],
LineBox[{{18, 0}, {18, 0.5946848355579317}, {19, 0.5946848355579317}, {
19, 0}}],
LineBox[{{18.5, 0.5946848355579317}, {18.5, 0.7294915457481451}, {
20, 0.7294915457481451}, {20, 0}}],
LineBox[{{19.25, 0.7294915457481451}, {19.25, 0.8023930293059063}, {
21, 0.8023930293059063}, {21, 0}}],
LineBox[{{16.5, 0.8115993234194185}, {16.5, 0.9430292318581035}, {20.125,
0.9430292318581035}, {20.125, 0.8023930293059063}}],
LineBox[{{6.84375, 1.4118157345282052`}, {6.84375,
1.7421857017518607`}, {18.3125, 1.7421857017518607`}, {18.3125,
0.9430292318581035}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{626., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwAuIVak1CGya+dHR4v+sAiDbxOxm8HUifTfdcfRlIT+hc
NoVl0ktHntsv7rABacsVAemmQFruvl6CGZDevVzNKgZIR+j129UD6WM5Lfsb
gfS9Rm6tJiB95p7Go+VAumLmWpGVQNpg+6kPq4D0onsbv28G0mxnbszbCqQv
2n3k2gakc91dmp4A6aDQx0ddZ7x03Omal14ApO0iYnnLgPTZM1tSNrx+6ZgW
dzl5M5C+4Oi4z5PhlePhj2UrTpi/AvIfrdph98rxVitf0m4gbffK6s8+IL3J
O1Z/P5BO7HlSD6IDDZLL7vi/cjzFp/ziLpC2MahTZQ145fhkp5YVJ5A+pbrU
mRtIKxzsqOIB0hIVVkdANA+7c4wpkE4TseQIAdKbRB68iwLSO5rXOkcDaREX
JafLQPpAJfeVK0BaLMeL7w6QjuKzCvsH0jf9cPbi8FeOL93ZYqqiXjlyzfNK
Fop+5ah1/ZacApCuZjn33gNI24ltlvcG0gms32/4AOkwxUzDl0C65K6Fr2jM
K8dfSw3EniS+cjRakX2RJemVY5Wrw/89Oa8cAcrO59k=
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Centroid\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{6, 0}, {6, 34384.605436154125`}, {7, 34384.605436154125`}, {7,
0}}], LineBox[{{5, 0}, {5, 30849.855475182856`}, {6.5,
30849.855475182856`}, {6.5, 34384.605436154125`}}],
LineBox[{{4, 0}, {4, 29256.706436169494`}, {5.75, 29256.706436169494`}, {
5.75, 30849.855475182856`}}],
LineBox[{{3, 0}, {3, 38592.68086147056}, {4.875, 38592.68086147056}, {
4.875, 29256.706436169494`}}],
LineBox[{{3.9375, 38592.68086147056}, {3.9375, 49072.0296789861}, {
8, 49072.0296789861}, {8, 0}}],
LineBox[{{5.96875, 49072.0296789861}, {5.96875, 56937.196313704335`}, {
9, 56937.196313704335`}, {9, 0}}],
LineBox[{{7.484375, 56937.196313704335`}, {7.484375,
63883.90160895238}, {10, 63883.90160895238}, {10, 0}}],
LineBox[{{2, 0}, {2, 68579.0603319671}, {8.7421875, 68579.0603319671}, {
8.7421875, 63883.90160895238}}],
LineBox[{{5.37109375, 68579.0603319671}, {5.37109375,
66829.59749338723}, {11, 66829.59749338723}, {11, 0}}],
LineBox[{{8.185546875, 66829.59749338723}, {8.185546875,
69095.58404984482}, {12, 69095.58404984482}, {12, 0}}],
LineBox[{{10.0927734375, 69095.58404984482}, {10.0927734375,
109858.86383915458`}, {13, 109858.86383915458`}, {13, 0}}],
LineBox[{{11.54638671875, 109858.86383915458`}, {11.54638671875,
118512.05537891069`}, {14, 118512.05537891069`}, {14, 0}}],
LineBox[{{1, 0}, {1, 154375.19123001109`}, {12.773193359375,
154375.19123001109`}, {12.773193359375, 118512.05537891069`}}],
LineBox[{{6.8865966796875, 154375.19123001109`}, {6.8865966796875,
203176.8991416238}, {15, 203176.8991416238}, {15, 0}}],
LineBox[{{10.94329833984375, 203176.8991416238}, {10.94329833984375,
203579.34809769495`}, {16, 203579.34809769495`}, {16, 0}}],
LineBox[{{13.471649169921875`, 203579.34809769495`}, {
13.471649169921875`, 299790.7387156335}, {17, 299790.7387156335}, {17,
0}}], LineBox[{{15.235824584960938`, 299790.7387156335}, {
15.235824584960938`, 342577.6031452158}, {18, 342577.6031452158}, {18,
0}}], LineBox[{{16.61791229248047, 342577.6031452158}, {
16.61791229248047, 364055.5597153207}, {19, 364055.5597153207}, {19,
0}}], LineBox[{{17.808956146240234`, 364055.5597153207}, {
17.808956146240234`, 485260.3803631387}, {20, 485260.3803631387}, {20,
0}}], LineBox[{{18.904478073120117`, 485260.3803631387}, {
18.904478073120117`, 1.5779956336996404`*^6}, {
21, 1.5779956336996404`*^6}, {21, 0}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
PlotRange->All]], "Output",
CellChangeTimes->{
3.4318239559700336`*^9, 3.4318240265839157`*^9, {3.431824118205386*^9,
3.43182413062274*^9}, {3.431824196492388*^9, 3.431824229934141*^9},
3.431826944593849*^9, 3.4318404121295958`*^9, 3.431898457539198*^9,
3.431998628222192*^9, 3.43200330345711*^9, 3.4320986201504593`*^9,
3.432100609522772*^9, 3.432178129392617*^9, 3.432249844530952*^9,
3.432254973348237*^9, 3.432255824416985*^9, 3.432333073430181*^9,
3.432335525560961*^9, 3.432339334391211*^9, 3.432357821684918*^9,
3.4323612068737307`*^9, 3.432362071738616*^9, 3.432457234243243*^9,
3.435277871236101*^9, 3.435365179581916*^9, 3.4353767470530787`*^9,
3.479012133783486*^9, 3.479018270664777*^9, 3.48981195429364*^9,
3.518907715881929*^9, 3.5225449831393423`*^9, 3.522550544530389*^9,
3.52255792190275*^9, 3.5225583309809637`*^9, 3.522558975204414*^9,
3.531531187165303*^9, 3.531534145162119*^9, 3.5316145080092793`*^9,
3.531622865403055*^9, 3.531627037229604*^9, 3.5316295243407803`*^9,
3.531630113889574*^9, 3.531713250157675*^9, 3.531776065856859*^9,
3.531790199071938*^9, 3.5317908774903173`*^9, 3.5320366251405687`*^9,
3.5320398404224987`*^9, 3.5320546423938427`*^9, 3.532124849882761*^9,
3.5356086701718597`*^9, 3.537097440263772*^9, 3.5374087943902397`*^9,
3.537436918903261*^9, 3.5375205104964437`*^9, 3.5375249896562757`*^9,
3.537528519777739*^9, 3.537848715343327*^9, 3.5379390498365593`*^9,
3.540983985584546*^9, 3.541051019479789*^9, 3.546671098070457*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{2, 0}, {2, 112973.435005757}, {3, 112973.435005757}, {3, 0}}],
LineBox[{{7, 0}, {7, 34384.605436154125`}, {8, 34384.605436154125`}, {8,
0}}], LineBox[{{6, 0}, {6, 41133.14063357714}, {7.5,
41133.14063357714}, {7.5, 34384.605436154125`}}],
LineBox[{{5, 0}, {5, 43885.05965425425}, {6.75, 43885.05965425425}, {
6.75, 41133.14063357714}}],
LineBox[{{4, 0}, {4, 61748.28937835291}, {5.875, 61748.28937835291}, {
5.875, 43885.05965425425}}],
LineBox[{{4.9375, 61748.28937835291}, {4.9375, 81786.7161316435}, {
9, 81786.7161316435}, {9, 0}}],
LineBox[{{6.96875, 81786.7161316435}, {6.96875, 97606.62225206457}, {
10, 97606.62225206457}, {10, 0}}],
LineBox[{{8.484375, 97606.62225206457}, {8.484375,
111796.82781566666`}, {11, 111796.82781566666`}, {11, 0}}],
LineBox[{{9.7421875, 111796.82781566666`}, {9.7421875,
125410.91456137534`}, {12, 125410.91456137534`}, {12, 0}}],
LineBox[{{2.5, 112973.435005757}, {2.5, 129455.59003609889`}, {
10.87109375, 129455.59003609889`}, {10.87109375, 125410.91456137534`}}],
LineBox[{{13, 0}, {13, 200285.59580259386`}, {
14, 200285.59580259386`}, {14, 0}}],
LineBox[{{6.685546875, 129455.59003609889`}, {6.685546875,
219913.8080892299}, {13.5, 219913.8080892299}, {13.5,
200285.59580259386`}}],
LineBox[{{1, 0}, {1, 286696.78371287766`}, {10.0927734375,
286696.78371287766`}, {10.0927734375, 219913.8080892299}}],
LineBox[{{15, 0}, {15, 347182.7708138755}, {16, 347182.7708138755}, {16,
0}}], LineBox[{{5.54638671875, 286696.78371287766`}, {5.54638671875,
413792.05193366687`}, {15.5, 413792.05193366687`}, {15.5,
347182.7708138755}}],
LineBox[{{17, 0}, {17, 500081.0522765285}, {18, 500081.0522765285}, {18,
0}}], LineBox[{{17.5, 500081.0522765285}, {17.5, 594703.8436136531}, {
19, 594703.8436136531}, {19, 0}}],
LineBox[{{18.25, 594703.8436136531}, {18.25, 737209.6840459703}, {
20, 737209.6840459703}, {20, 0}}],
LineBox[{{10.523193359375, 413792.05193366687`}, {10.523193359375,
991192.6312417078}, {19.125, 991192.6312417078}, {19.125,
737209.6840459703}}],
LineBox[{{14.8240966796875, 991192.6312417078}, {14.8240966796875,
3.0057059689516975`*^6}, {21, 3.0057059689516975`*^6}, {21, 0}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{509., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->{
3.4318242627984962`*^9, {3.431824325879291*^9, 3.4318243477932243`*^9},
3.431826947225177*^9, 3.431840413232346*^9, 3.431898458146806*^9,
3.431998629048091*^9, 3.432003303662959*^9, 3.432098621648844*^9,
3.432100609578868*^9, 3.432178129582405*^9, 3.4322498445893373`*^9,
3.4322549745807543`*^9, 3.432255824478467*^9, 3.432333073582281*^9,
3.432335525695197*^9, 3.432339334447262*^9, 3.4323578218129177`*^9,
3.432361206975133*^9, 3.432362071946826*^9, 3.4324572343443537`*^9,
3.43527787212619*^9, 3.435365179720949*^9, 3.43537674718909*^9,
3.479012133942671*^9, 3.479018270723439*^9, 3.489811954368258*^9,
3.5189077159631968`*^9, 3.5225449831974173`*^9, 3.5225505446058273`*^9,
3.522557921990142*^9, 3.5225583310636263`*^9, 3.5225589752720003`*^9,
3.531531187231028*^9, 3.531534145223567*^9, 3.531614508070581*^9,
3.531622865470236*^9, 3.5316270373028307`*^9, 3.5316295244026527`*^9,
3.5316301139569597`*^9, 3.5317132502260437`*^9, 3.5317760659299927`*^9,
3.531790199139619*^9, 3.531790877558189*^9, 3.5320366252044*^9,
3.5320398404861937`*^9, 3.532054642461784*^9, 3.532124849951064*^9,
3.535608670232209*^9, 3.537097440330155*^9, 3.5374087944481583`*^9,
3.5374369189686728`*^9, 3.537520510556201*^9, 3.537524989714563*^9,
3.537528519836953*^9, 3.537848715401009*^9, 3.537939049895203*^9,
3.540983985651676*^9, 3.5410510195394583`*^9, 3.546671098129944*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21Data", "]"}], "\[Rule]", "ClNames21"}],
",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Average\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824380963941*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{6, 0}, {6, 34384.605436154125`}, {7, 34384.605436154125`}, {7,
0}}], LineBox[{{5, 0}, {5, 39446.006834221385`}, {6.5,
39446.006834221385`}, {6.5, 34384.605436154125`}}],
LineBox[{{4, 0}, {4, 41842.99744779137}, {5.75, 41842.99744779137}, {
5.75, 39446.006834221385`}}],
LineBox[{{3, 0}, {3, 53518.031576968744`}, {4.875,
53518.031576968744`}, {4.875, 41842.99744779137}}],
LineBox[{{3.9375, 53518.031576968744`}, {3.9375, 67187.13918921995}, {
8, 67187.13918921995}, {8, 0}}],
LineBox[{{5.96875, 67187.13918921995}, {5.96875, 78848.68058320282}, {
9, 78848.68058320282}, {9, 0}}],
LineBox[{{7.484375, 78848.68058320282}, {7.484375, 89637.07542938428}, {
10, 89637.07542938428}, {10, 0}}],
LineBox[{{2, 0}, {2, 98100.3891633242}, {8.7421875, 98100.3891633242}, {
8.7421875, 89637.07542938428}}],
LineBox[{{5.37109375, 98100.3891633242}, {5.37109375,
99844.0192034298}, {11, 99844.0192034298}, {11, 0}}],
LineBox[{{8.185546875, 99844.0192034298}, {8.185546875,
104823.22736328797`}, {12, 104823.22736328797`}, {12, 0}}],
LineBox[{{10.0927734375, 104823.22736328797`}, {10.0927734375,
148048.91842574297`}, {13, 148048.91842574297`}, {13, 0}}],
LineBox[{{11.54638671875, 148048.91842574297`}, {11.54638671875,
161911.60195988545`}, {14, 161911.60195988545`}, {14, 0}}],
LineBox[{{1, 0}, {1, 202851.3683375791}, {12.773193359375,
202851.3683375791}, {12.773193359375, 161911.60195988545`}}],
LineBox[{{6.8865966796875, 202851.3683375791}, {6.8865966796875,
258429.66301696832`}, {15, 258429.66301696832`}, {15, 0}}],
LineBox[{{10.94329833984375, 258429.66301696832`}, {10.94329833984375,
267790.712550162}, {16, 267790.712550162}, {16, 0}}],
LineBox[{{13.471649169921875`, 267790.712550162}, {13.471649169921875`,
371917.3703174207}, {17, 371917.3703174207}, {17, 0}}],
LineBox[{{15.235824584960938`, 371917.3703174207}, {15.235824584960938`,
427058.9028515695}, {18, 427058.9028515695}, {18, 0}}],
LineBox[{{16.61791229248047, 427058.9028515695}, {16.61791229248047,
461818.20466474333`}, {19, 461818.20466474333`}, {19, 0}}],
LineBox[{{17.808956146240234`, 461818.20466474333`}, {
17.808956146240234`, 596029.9777248517}, {20, 596029.9777248517}, {20,
0}}], LineBox[{{18.904478073120117`, 596029.9777248517}, {
18.904478073120117`, 1.7062766192605172`*^6}, {
21, 1.7062766192605172`*^6}, {21, 0}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{503., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwAuJnG0/Ur5/40pGjxfjgBiCdM+Ve8HYg/crIb/VlIP04
YfUUlkkvHeed+X2HDUhzNTxNNwXSwjymCWZAetNuC6sYIJ23fIpdPZC+a/p1
fyOQjjgqptUEpC+EmT9aDqT9tHaJrATSnuEXPqwC0qxv9n7fDKSPLHs0byuQ
Vi1j4d4GpDlUMpqegMz7x3nMdcZLx7Q71ekFQDrPJZu3DEgLGR1K2fD6peOH
mFvJm4H0mf2++zwZXjnaFjWuOGH+yvFc5YtVO+xeOS4/LZq0G0hrnXb8sw/E
V0zR3w+kb918VQ+iOQ7klt3xf+Vo46354i6QPhXfosoa8MpxhZWhFSeQjnq8
2pkbSF/i76/iAdLVNx2OgGiVEs8YUyBdoOjAEQKkr3149i4KSLsLbnGOBtIm
pzScLgPpexMFr1wB0n2nA/juAGn2Koewf0D6S/DJ7MXhrxxz1vHEVEUB+cYB
yULRrxz3aj2UUwDSDpsuv/cA0l37d8h7A2mVlX9u+ADp6TvzDF8C6Wmddr6i
Ma8cr780E3uSCNSvUXyRJQnofz63/3tyXjkCAOMP7fU=
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["self-link-reduced cited matrix", "Subsection",
CellChangeTimes->{{3.431824441854018*^9, 3.431824445428808*^9}, {
3.4318249610285587`*^9, 3.431824964963443*^9}, {3.43182549807127*^9,
3.431825498399736*^9}, {3.431826775102911*^9, 3.4318268109015408`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21DataReduceSelf", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Average\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}], ",",
RowBox[{"Orientation", "\[Rule]", "Left"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431826842166206*^9, 3.431826843750149*^9}, {
3.431998967841776*^9, 3.4319989897693367`*^9}, {3.432335711296598*^9,
3.432335719119131*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{0,
1}, {-0.44888709310845765`, 1}, {-0.44888709310845765`, 2}, {0, 2}}],
LineBox[{{0,
3}, {-0.31009833536217524`, 3}, {-0.31009833536217524`, 4}, {0, 4}}],
LineBox[{{-0.44888709310845765`, 1.5}, {-0.6504380956836342,
1.5}, {-0.6504380956836342, 3.5}, {-0.31009833536217524`, 3.5}}],
LineBox[{{0, 5}, {-0.6681844847447829, 5}, {-0.6681844847447829, 6}, {0,
6}}], LineBox[{{-0.6504380956836342, 2.5}, {-0.7785120648323987,
2.5}, {-0.7785120648323987, 5.5}, {-0.6681844847447829, 5.5}}],
LineBox[{{0,
7}, {-0.25319455334526275`, 7}, {-0.25319455334526275`, 8}, {0, 8}}],
LineBox[{{-0.25319455334526275`, 7.5}, {-0.4261581197903738,
7.5}, {-0.4261581197903738, 9}, {0, 9}}],
LineBox[{{-0.4261581197903738, 8.25}, {-0.5475063582162348,
8.25}, {-0.5475063582162348, 10}, {0, 10}}],
LineBox[{{-0.5475063582162348, 9.125}, {-0.6631108764136316,
9.125}, {-0.6631108764136316, 11}, {0, 11}}],
LineBox[{{-0.7785120648323987, 4.}, {-0.828567966378868,
4.}, {-0.828567966378868, 10.0625}, {-0.6631108764136316, 10.0625}}],
LineBox[{{0, 13}, {-0.2986241375374695, 13}, {-0.2986241375374695, 14}, {
0, 14}}],
LineBox[{{-0.2986241375374695, 13.5}, {-0.4711612617259499,
13.5}, {-0.4711612617259499, 15}, {0, 15}}],
LineBox[{{-0.4711612617259499, 14.25}, {-0.6000319807815041,
14.25}, {-0.6000319807815041, 16}, {0, 16}}],
LineBox[{{0, 17}, {-0.5868791367876953, 17}, {-0.5868791367876953, 18}, {
0, 18}}],
LineBox[{{-0.6000319807815041, 15.125}, {-0.6385130139235278,
15.125}, {-0.6385130139235278, 17.5}, {-0.5868791367876953, 17.5}}],
LineBox[{{0, 12}, {-0.7976563472142187, 12}, {-0.7976563472142187,
16.3125}, {-0.6385130139235278, 16.3125}}],
LineBox[{{0,
19}, {-0.26273720912378784`, 19}, {-0.26273720912378784`, 20}, {0,
20}}], LineBox[{{-0.26273720912378784`, 19.5}, {-0.448580820966394,
19.5}, {-0.448580820966394, 21}, {0, 21}}],
LineBox[{{-0.7976563472142187, 14.15625}, {-0.8044757051663458,
14.15625}, {-0.8044757051663458, 20.25}, {-0.448580820966394, 20.25}}],
LineBox[{{-0.828567966378868, 7.03125}, {-0.8992516827463397,
7.03125}, {-0.8992516827463397, 17.203125}, {-0.8044757051663458,
17.203125}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{4, 0}, {0, 1}], {-1, 0}],
InsetBox["\<\"B-3\"\>", Offset[{4, 0}, {0, 2}], {-1, 0}],
InsetBox["\<\"G-1\"\>", Offset[{4, 0}, {0, 3}], {-1, 0}],
InsetBox["\<\"G-2\"\>", Offset[{4, 0}, {0, 4}], {-1, 0}],
InsetBox["\<\"B-2\"\>", Offset[{4, 0}, {0, 5}], {-1, 0}],
InsetBox["\<\"Ca\"\>", Offset[{4, 0}, {0, 6}], {-1, 0}],
InsetBox["\<\"Mo\"\>", Offset[{4, 0}, {0, 7}], {-1, 0}],
InsetBox["\<\"Me-2\"\>", Offset[{4, 0}, {0, 8}], {-1, 0}],
InsetBox["\<\"Me-1\"\>", Offset[{4, 0}, {0, 9}], {-1, 0}],
InsetBox["\<\"Me-3\"\>", Offset[{4, 0}, {0, 10}], {-1, 0}],
InsetBox["\<\"Me-4\"\>", Offset[{4, 0}, {0, 11}], {-1, 0}],
InsetBox["\<\"Q\"\>", Offset[{4, 0}, {0, 12}], {-1, 0}],
InsetBox["\<\"C-1\"\>", Offset[{4, 0}, {0, 13}], {-1, 0}],
InsetBox["\<\"C-2\"\>", Offset[{4, 0}, {0, 14}], {-1, 0}],
InsetBox["\<\"E-1\"\>", Offset[{4, 0}, {0, 15}], {-1, 0}],
InsetBox["\<\"Cp\"\>", Offset[{4, 0}, {0, 16}], {-1, 0}],
InsetBox["\<\"E-2\"\>", Offset[{4, 0}, {0, 17}], {-1, 0}],
InsetBox["\<\"E-3\"\>", Offset[{4, 0}, {0, 18}], {-1, 0}],
InsetBox["\<\"I-1\"\>", Offset[{4, 0}, {0, 19}], {-1, 0}],
InsetBox["\<\"I-2\"\>", Offset[{4, 0}, {0, 20}], {-1, 0}],
InsetBox["\<\"M\"\>", Offset[{4, 0}, {0, 21}], {-1, 0}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{783., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->{{3.431998982388061*^9, 3.4319989906141653`*^9},
3.432003304084828*^9, 3.43209862446609*^9, 3.432100609717168*^9,
3.432178129943272*^9, 3.4322498448856573`*^9, 3.4322549767223043`*^9,
3.432255824775392*^9, 3.432333073891602*^9, 3.4323355259548073`*^9,
3.43233572126152*^9, 3.432339334573052*^9, 3.432357822054537*^9,
3.432361207188171*^9, 3.432362072557345*^9, 3.432457235358306*^9,
3.4352778732528877`*^9, 3.4353651800154133`*^9, 3.4353767474954*^9,
3.479012134191571*^9, 3.479018270884943*^9, 3.489811954479*^9,
3.518907716126729*^9, 3.522544983332304*^9, 3.522550544752597*^9,
3.522557922123184*^9, 3.52255833119569*^9, 3.522558975403126*^9,
3.531531187492197*^9, 3.531534145357795*^9, 3.5316145082461977`*^9,
3.531622865601737*^9, 3.5316270374407787`*^9, 3.531629524539297*^9,
3.5316301140953407`*^9, 3.531713250366364*^9, 3.5317760660686893`*^9,
3.531790199286366*^9, 3.531790877696303*^9, 3.5320366253462877`*^9,
3.532039840612545*^9, 3.532054642594553*^9, 3.532124850084651*^9,
3.535608670352887*^9, 3.537097440462838*^9, 3.537408794670835*^9,
3.537436919102024*^9, 3.537520510674987*^9, 3.5375249898329897`*^9,
3.537528520025667*^9, 3.537848715519889*^9, 3.537939050013834*^9,
3.540983985784506*^9, 3.541051019659132*^9, 3.546671098252247*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21DataReduceSelf", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431826842166206*^9, 3.431826843750149*^9}, {
3.431998967841776*^9, 3.4319989897693367`*^9}, {3.43199903299513*^9,
3.4319990380225554`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.44888709310845765`}, {2, 0.44888709310845765`}, {
2, 0}}],
LineBox[{{3, 0}, {3, 0.31009833536217524`}, {4, 0.31009833536217524`}, {
4, 0}}],
LineBox[{{1.5, 0.44888709310845765`}, {1.5, 0.9213834771319519}, {3.5,
0.9213834771319519}, {3.5, 0.31009833536217524`}}],
LineBox[{{5, 0}, {5, 0.7263837377962705}, {6, 0.7263837377962705}, {6,
0}}], LineBox[{{7, 0}, {7, 0.25319455334526275`}, {
8, 0.25319455334526275`}, {8, 0}}],
LineBox[{{7.5, 0.25319455334526275`}, {7.5, 0.4838126419387441}, {
9, 0.4838126419387441}, {9, 0}}],
LineBox[{{8.25, 0.4838126419387441}, {8.25, 0.6370077385033506}, {
10, 0.6370077385033506}, {10, 0}}],
LineBox[{{5.5, 0.7263837377962705}, {5.5, 0.9436326449398774}, {9.125,
0.9436326449398774}, {9.125, 0.6370077385033506}}],
LineBox[{{2.5, 0.9213834771319519}, {2.5, 1.7871161966220412`}, {7.3125,
1.7871161966220412`}, {7.3125, 0.9436326449398774}}],
LineBox[{{11, 0}, {11, 0.26273720912378784`}, {
12, 0.26273720912378784`}, {12, 0}}],
LineBox[{{11.5, 0.26273720912378784`}, {11.5, 0.5105286915805961}, {
13, 0.5105286915805961}, {13, 0}}],
LineBox[{{14, 0}, {14, 0.4790434583528682}, {15, 0.4790434583528682}, {
15, 0}}],
LineBox[{{14.5, 0.4790434583528682}, {14.5, 0.927164409127446}, {
16, 0.927164409127446}, {16, 0}}],
LineBox[{{17, 0}, {17, 0.2986241375374695}, {18, 0.2986241375374695}, {
18, 0}}],
LineBox[{{17.5, 0.2986241375374695}, {17.5, 0.6108786131758205}, {
19, 0.6108786131758205}, {19, 0}}],
LineBox[{{18.25, 0.6108786131758205}, {18.25, 0.659743211167263}, {
20, 0.659743211167263}, {20, 0}}],
LineBox[{{19.125, 0.659743211167263}, {19.125, 0.6860514061220003}, {
21, 0.6860514061220003}, {21, 0}}],
LineBox[{{15.25, 0.927164409127446}, {15.25, 0.9886428974220922}, {
20.0625, 0.9886428974220922}, {20.0625, 0.6860514061220003}}],
LineBox[{{12.25, 0.5105286915805961}, {12.25, 1.7413014050632236`}, {
17.65625, 1.7413014050632236`}, {17.65625, 0.9886428974220922}}],
LineBox[{{4.90625, 1.7871161966220412`}, {4.90625,
2.6102508926408974`}, {14.953125, 2.6102508926408974`}, {14.953125,
1.7413014050632236`}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{631., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJwVyU0ow2EAx/GRl2lIi5HkJXFQCG3TQj0zsUzkbc3+B4YMK+ywsou3kuFE
aoWl5F1ZYa0wLwkpK0bLosTIHq8HhRJ+O3z7HL4JqrbyRh8WiyVA5jDXod+I
hyx9sq8DoMs3Rc2HwpvsWgG0KSQiBs4WmvK6YH9F7k4PtE9Gp/TCxyjx7RxU
GvfCF6COcb4vwmfJ8ecqlDmeTevwRRTLsUCLe7DXDZcF0oMCo4dMnBma2mFz
dGeIDgbO2BvMTx7ywbuvX4UaQ7lNyqJETgbmj4SUyJyvi9Y8SsqGYlQbkHtc
+GODbG5L+jbMHH/v8qpJ1OquSilZGEt9vIZnmsEk/zJKXE18URCMEZvzObBd
PaoPhnZOwb5X11YJw4fcAQm70vsVT6818EtrzVdCoyFN7IChUxHn5zBTWBV6
BSPvJNW/3p980jotp6TDHcboayi56JfXc5WUNN4+xMZDtd75VgRNhs24Yri2
4nspg7vd2gwPHK4Sl0QwlMRn5fDcdZT0fetO/VSU0B/p36aGkn8i39os
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21DataReduceSelf", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431826842166206*^9, 3.431826843750149*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{4, 0}, {4, 22930.13436506642}, {5, 22930.13436506642}, {5,
0}}], LineBox[{{3, 0}, {3, 27529.528207060084`}, {4.5,
27529.528207060084`}, {4.5, 22930.13436506642}}],
LineBox[{{3.75, 27529.528207060084`}, {3.75, 44011.72874013117}, {
6, 44011.72874013117}, {6, 0}}],
LineBox[{{8, 0}, {8, 7519.731378181005}, {9, 7519.731378181005}, {9,
0}}], LineBox[{{8.5, 7519.731378181005}, {8.5, 8759.631906215263}, {
10, 8759.631906215263}, {10, 0}}],
LineBox[{{7, 0}, {7, 10658.258256237097`}, {9.25, 10658.258256237097`}, {
9.25, 8759.631906215263}}],
LineBox[{{8.125, 10658.258256237097`}, {8.125, 20821.11231974356}, {
11, 20821.11231974356}, {11, 0}}],
LineBox[{{4.875, 44011.72874013117}, {4.875, 51452.764452860814`}, {
9.5625, 51452.764452860814`}, {9.5625, 20821.11231974356}}],
LineBox[{{12, 0}, {12, 59054.89817957525}, {13, 59054.89817957525}, {13,
0}}], LineBox[{{12.5, 59054.89817957525}, {12.5, 67710.59910586606}, {
14, 67710.59910586606}, {14, 0}}],
LineBox[{{7.21875, 51452.764452860814`}, {7.21875, 83537.54636742883}, {
13.25, 83537.54636742883}, {13.25, 67710.59910586606}}],
LineBox[{{2, 0}, {2, 91393.45761727955}, {10.234375,
91393.45761727955}, {10.234375, 83537.54636742883}}],
LineBox[{{1, 0}, {1, 135093.32460477535`}, {6.1171875,
135093.32460477535`}, {6.1171875, 91393.45761727955}}],
LineBox[{{15, 0}, {15, 97804.82920592418}, {16, 97804.82920592418}, {16,
0}}], LineBox[{{17, 0}, {17, 165415.0121603236}, {
18, 165415.0121603236}, {18, 0}}],
LineBox[{{15.5, 97804.82920592418}, {15.5, 216814.95260163036`}, {17.5,
216814.95260163036`}, {17.5, 165415.0121603236}}],
LineBox[{{3.55859375, 135093.32460477535`}, {3.55859375,
282889.0849967842}, {16.5, 282889.0849967842}, {16.5,
216814.95260163036`}}],
LineBox[{{19, 0}, {19, 249701.69821809384`}, {20, 249701.69821809384`}, {
20, 0}}],
LineBox[{{19.5, 249701.69821809384`}, {19.5, 312240.8578384536}, {
21, 312240.8578384536}, {21, 0}}],
LineBox[{{10.029296875, 282889.0849967842}, {10.029296875,
887186.466322575}, {20.25, 887186.466322575}, {20.25,
312240.8578384536}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{554., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBGKjl6s3b5j40vFYfHbwdiD9JVF89WUQrZU+hWXSS8dD
3/jvsgFpnWC9DFMgzfTMKsEMSAe3elnFAOl9/Avs6oH04f8JBxqBdEW+jFYT
kF5zze3RciCdInBcZCWQtnz0/MMqIP3I79z3zUB6mtK3eVuBdFypCvc2IK3p
09f0BEh/4fY/5jrjpaNKUV96AZCWnVDHWwakZdQup2x4/dJx/7FnyZuB9KTq
kH2eDK8cFV92rThh/srRwvjjqh12rxztXsol7QbSNx55/tkHpL+p5OjvB9Id
ez/Vg2iVupKyO/6vHO/06r+4C6R1nveosga8crTuM7fiBNIflmxy5gbSRTlT
q3iA9C1r9yMgOvmdf4wpkL50z40jBEh/inz7LgpIu8/b5RwNpK8dM3C6DKTv
bha/cgVIm8WG890B0kwC7mH/gPRJ5vPZi8NfOSo9Fompinrl6DApMlko+pWj
gdArOQUgPTvs5nsPID0hfZ+8N5B26WS56QOkj0SXGL4E0i+MXHxFY145pjnZ
iT1JBPrzQcVFlqRXjlpPvP/vyXnlCACyN+eu
"]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["self-link-reduced citing matrix", "Subsection",
CellChangeTimes->{{3.431824441854018*^9, 3.431824445428808*^9}, {
3.4318249610285587`*^9, 3.431824964963443*^9}, {3.43182549807127*^9,
3.431825498399736*^9}, {3.431826775102911*^9, 3.4318268109015408`*^9}, {
3.4318269045209703`*^9, 3.4318269064570923`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citingcited21DataReduceSelf", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824257430478*^9, 3.4318242617316217`*^9}, {3.43182429729176*^9,
3.431824346800791*^9}, {3.431826842166206*^9, 3.431826843750149*^9}, {
3.431826910210877*^9, 3.431826915848668*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 95233.85213777714}, {2, 95233.85213777714}, {2,
0}}], LineBox[{{1.5, 95233.85213777714}, {1.5, 140043.5541017263}, {
3, 140043.5541017263}, {3, 0}}],
LineBox[{{2.25, 140043.5541017263}, {2.25, 186246.640749772}, {
4, 186246.640749772}, {4, 0}}],
LineBox[{{5, 0}, {5, 111845.98231049697`}, {6, 111845.98231049697`}, {6,
0}}], LineBox[{{3.125, 186246.640749772}, {3.125,
206922.44990108398`}, {5.5, 206922.44990108398`}, {5.5,
111845.98231049697`}}],
LineBox[{{8, 0}, {8, 22548.68716799273}, {9, 22548.68716799273}, {9,
0}}], LineBox[{{7, 0}, {7, 27915.8428239075}, {8.5,
27915.8428239075}, {8.5, 22548.68716799273}}],
LineBox[{{7.75, 27915.8428239075}, {7.75, 46041.132456555744`}, {
10, 46041.132456555744`}, {10, 0}}],
LineBox[{{11, 0}, {11, 9177.354411811717}, {12, 9177.354411811717}, {12,
0}}], LineBox[{{13, 0}, {13, 9536.054058152145}, {
14, 9536.054058152145}, {14, 0}}],
LineBox[{{11.5, 9177.354411811717}, {11.5, 10529.75435740925}, {13.5,
10529.75435740925}, {13.5, 9536.054058152145}}],
LineBox[{{12.5, 10529.75435740925}, {12.5, 22031.075637880585`}, {
15, 22031.075637880585`}, {15, 0}}],
LineBox[{{8.875, 46041.132456555744`}, {8.875, 62059.012749707355`}, {
13.75, 62059.012749707355`}, {13.75, 22031.075637880585`}}],
LineBox[{{17, 0}, {17, 61425.561723113286`}, {18, 61425.561723113286`}, {
18, 0}}],
LineBox[{{16, 0}, {16, 68805.02737485273}, {17.5, 68805.02737485273}, {
17.5, 61425.561723113286`}}],
LineBox[{{11.3125, 62059.012749707355`}, {11.3125, 88144.3583850395}, {
16.75, 88144.3583850395}, {16.75, 68805.02737485273}}],
LineBox[{{4.3125, 206922.44990108398`}, {4.3125, 324772.2431806262}, {
14.03125, 324772.2431806262}, {14.03125, 88144.3583850395}}],
LineBox[{{19, 0}, {19, 213814.37937613082`}, {20, 213814.37937613082`}, {
20, 0}}],
LineBox[{{19.5, 213814.37937613082`}, {19.5, 294003.94154422096`}, {
21, 294003.94154422096`}, {21, 0}}],
LineBox[{{9.171875, 324772.2431806262}, {9.171875, 842749.259395284}, {
20.25, 842749.259395284}, {20.25, 294003.94154422096`}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{554., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwAmKjl6s3b5j40tFq9co9IFqDoSB4O5DeZyWz+jKQfhGb
M4Vl0ktHL2Oxu2xAumejUYYpkJbYZpNgBqQL0wKsYoC02t2FdvVAetPTpgON
QFq1RU6rCUg7HPJ+tBxIh2mdFlkJpNef//RhFZA+UH7p+2Ygrfj157ytQHrB
Ni3ubUB6W8GqpidAOiks+5jrjJeOTIKT0wuAdOWGBt4yID0n6nrKhtdA9Yde
JG8G0jHpYfs8GV45inX2rjhh/srxz5/Pq3bYvXLsnaGYtBtIb2P1+bMPSC9y
yNPfD6SnvfxSD6K/nSkru+P/yvHUFsMXd4F0S0a/KmvAK8cDhy2tOIF0w9st
ztxA+tr86VU8QLq72vMIiLbRD4oxBdJOLp4cIUBaYOr7d1FA+tf5Pc7RQHoD
v7HTZSD9drXUlStA2iUjku8OkK6S9wz7B6TfvLmQvTj8leMsXvGYqqhXjs1L
opOFol856v78IKcApPssb7/3ANI8/gfkvYF0bB7bTR8gLWJfZvgSSCtIuPmK
xrxynBLlIPYk8ZXjllNVF1mSXjnuu+P7f0/OK0cArFjtzA==
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["self-link-reduced symmetric linkage", "Subsection",
CellChangeTimes->{{3.431824602921352*^9, 3.4318246144577*^9}, {
3.431824713767918*^9, 3.431824714432879*^9}, {3.4318247994573307`*^9,
3.431824813914632*^9}, {3.431999154184267*^9, 3.431999171083694*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "symmetricDataReduceSelf21", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Centroid\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824665295789*^9, 3.43182467982123*^9}, {3.431824827960742*^9,
3.431824848218976*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{4, 0}, {4, 28137.5089871154}, {5, 28137.5089871154}, {5, 0}}],
LineBox[{{3, 0}, {3, 23254.20365158017}, {4.5, 23254.20365158017}, {4.5,
28137.5089871154}}],
LineBox[{{8, 0}, {8, 8897.597653299457}, {9, 8897.597653299457}, {9,
0}}], LineBox[{{7, 0}, {7, 9143.501316296388}, {8.5,
9143.501316296388}, {8.5, 8897.597653299457}}],
LineBox[{{6, 0}, {6, 8734.318634026942}, {7.75, 8734.318634026942}, {
7.75, 9143.501316296388}}],
LineBox[{{6.875, 8734.318634026942}, {6.875, 17665.31929039502}, {
10, 17665.31929039502}, {10, 0}}],
LineBox[{{3.75, 23254.20365158017}, {3.75, 21219.262997559075`}, {8.4375,
21219.262997559075`}, {8.4375, 17665.31929039502}}],
LineBox[{{6.09375, 21219.262997559075`}, {6.09375,
37230.342066382305`}, {11, 37230.342066382305`}, {11, 0}}],
LineBox[{{8.546875, 37230.342066382305`}, {8.546875,
49280.84185005346}, {12, 49280.84185005346}, {12, 0}}],
LineBox[{{10.2734375, 49280.84185005346}, {10.2734375,
46567.26431706234}, {13, 46567.26431706234}, {13, 0}}],
LineBox[{{11.63671875, 46567.26431706234}, {11.63671875,
46914.89320758745}, {14, 46914.89320758745}, {14, 0}}],
LineBox[{{2, 0}, {2, 63217.39887830481}, {12.818359375,
63217.39887830481}, {12.818359375, 46914.89320758745}}],
LineBox[{{1, 0}, {1, 92462.04927213954}, {7.4091796875,
92462.04927213954}, {7.4091796875, 63217.39887830481}}],
LineBox[{{4.20458984375, 92462.04927213954}, {4.20458984375,
106572.33002024236`}, {15, 106572.33002024236`}, {15, 0}}],
LineBox[{{9.602294921875, 106572.33002024236`}, {9.602294921875,
124394.55878440413`}, {16, 124394.55878440413`}, {16, 0}}],
LineBox[{{12.8011474609375, 124394.55878440413`}, {12.8011474609375,
141965.28421412295`}, {17, 141965.28421412295`}, {17, 0}}],
LineBox[{{14.90057373046875, 141965.28421412295`}, {14.90057373046875,
159622.6845750837}, {18, 159622.6845750837}, {18, 0}}],
LineBox[{{16.450286865234375`, 159622.6845750837}, {16.450286865234375`,
248440.59388714348`}, {19, 248440.59388714348`}, {19, 0}}],
LineBox[{{20, 0}, {20, 235569.9188202942}, {21, 235569.9188202942}, {21,
0}}], LineBox[{{17.725143432617188`, 248440.59388714348`}, {
17.725143432617188`, 304761.35009574797`}, {20.5,
304761.35009574797`}, {20.5, 235569.9188202942}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{532., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBGJtdqdd6ye+dJyT/Dh4O5COXBy0+jKQzpi2YQrLpJeO
LDqyd9mAtMcd7wxTIL39r12CGZC+/yvUKgZIP7i62K4eSK+Yt/xAI5BuzVbQ
agLSNU0Bj5YD6cULz4usBNKSTF8/rALSVdeufd8MpA94/p23FUizCVlwbwPS
mnZrm54AaTOLwmOuM4DuuDM9vQBI239o5S0D0jaxt1M2vH7p6HbwVfJmID3j
d/g+T4ZXjpOu9a84Yf7KsU3/26oddq8cXexVknYD6Rd6fn/2AelDCQX6+4F0
nvT3ehC9/0NF2R1/oPgD4xd3gbRz/0RV1oBXjvOOWltxAun9WtuduYF08qWZ
VTxAWuuF7xEQnVAaEmMKpKXDvDlCgPSlws/vooB0A89+52ggvTTa1OkykH71
WebKFSBtsSaa7w6Q/hHvHfYPSF++cyl7cfgrx52mkjFVUa8c3Xpjk4WiXznu
EP4spwCkr2jcfe8BpFuNDsl7A+kVQRw3fYB0pEqF4UsgzcDg4Ssa88rRf5GL
2JPEV448O2susiS9cuy54v9/T84rRwAGGei7
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "symmetricDataReduceSelf21", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Average\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824665295789*^9, 3.43182467982123*^9}, {3.431824827960742*^9,
3.4318248903786087`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{4, 0}, {4, 28137.5089871154}, {5, 28137.5089871154}, {5, 0}}],
LineBox[{{3, 0}, {3, 30288.58089835902}, {4.5, 30288.58089835902}, {4.5,
28137.5089871154}}],
LineBox[{{8, 0}, {8, 8897.597653299457}, {9, 8897.597653299457}, {9,
0}}], LineBox[{{7, 0}, {7, 11367.900729621251`}, {8.5,
11367.900729621251`}, {8.5, 8897.597653299457}}],
LineBox[{{6, 0}, {6, 12249.140757642715`}, {7.75, 12249.140757642715`}, {
7.75, 11367.900729621251`}}],
LineBox[{{6.875, 12249.140757642715`}, {6.875, 21939.1206269869}, {
10, 21939.1206269869}, {10, 0}}],
LineBox[{{3.75, 30288.58089835902}, {3.75, 37321.94079594395}, {8.4375,
37321.94079594395}, {8.4375, 21939.1206269869}}],
LineBox[{{6.09375, 37321.94079594395}, {6.09375, 49803.48404476372}, {
11, 49803.48404476372}, {11, 0}}],
LineBox[{{8.546875, 49803.48404476372}, {8.546875, 64134.03887443026}, {
12, 64134.03887443026}, {12, 0}}],
LineBox[{{10.2734375, 64134.03887443026}, {10.2734375,
64370.41740550627}, {13, 64370.41740550627}, {13, 0}}],
LineBox[{{11.63671875, 64370.41740550627}, {11.63671875,
66948.11207452511}, {14, 66948.11207452511}, {14, 0}}],
LineBox[{{2, 0}, {2, 85164.95940413281}, {12.818359375,
85164.95940413281}, {12.818359375, 66948.11207452511}}],
LineBox[{{1, 0}, {1, 117210.145299174}, {7.4091796875,
117210.145299174}, {7.4091796875, 85164.95940413281}}],
LineBox[{{4.20458984375, 117210.145299174}, {4.20458984375,
155329.19540295217`}, {15, 155329.19540295217`}, {15, 0}}],
LineBox[{{16, 0}, {16, 111753.85988412212`}, {17, 111753.85988412212`}, {
17, 0}}],
LineBox[{{9.602294921875, 155329.19540295217`}, {9.602294921875,
162710.54884820987`}, {16.5, 162710.54884820987`}, {16.5,
111753.85988412212`}}],
LineBox[{{13.0511474609375, 162710.54884820987`}, {13.0511474609375,
204168.84090183052`}, {18, 204168.84090183052`}, {18, 0}}],
LineBox[{{19, 0}, {19, 235569.9188202942}, {20, 235569.9188202942}, {20,
0}}], LineBox[{{19.5, 235569.9188202942}, {19.5,
298269.53752635384`}, {21, 298269.53752635384`}, {21, 0}}],
LineBox[{{15.52557373046875, 204168.84090183052`}, {15.52557373046875,
386834.9062830815}, {20.25, 386834.9062830815}, {20.25,
298269.53752635384`}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{588., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->{{3.431824883215906*^9, 3.4318248912685432`*^9},
3.431840415243976*^9, 3.4318984594773684`*^9, 3.431998629950058*^9,
3.4320033051061687`*^9, 3.432098626508836*^9, 3.4321006100243807`*^9,
3.43217813087464*^9, 3.432249845180588*^9, 3.43225498223354*^9,
3.432255825072934*^9, 3.432333074668541*^9, 3.432335526614901*^9,
3.4323393357190447`*^9, 3.4323578228452578`*^9, 3.432361208021473*^9,
3.432362073956546*^9, 3.432457237500312*^9, 3.435277876474909*^9,
3.435365180904331*^9, 3.435376748328506*^9, 3.479012135018119*^9,
3.4790182713978357`*^9, 3.489811954810033*^9, 3.518907716579109*^9,
3.522544983755274*^9, 3.522550545201123*^9, 3.5225579225093203`*^9,
3.5225583315728683`*^9, 3.52255897578925*^9, 3.53153118784514*^9,
3.531534145731971*^9, 3.531614508610273*^9, 3.5316228659347763`*^9,
3.531627037793199*^9, 3.531629524884035*^9, 3.531630114501913*^9,
3.531713250702639*^9, 3.5317760664274893`*^9, 3.531790199669992*^9,
3.5317908780427027`*^9, 3.5320366257311974`*^9, 3.5320398409803123`*^9,
3.532054642932708*^9, 3.5321248504234743`*^9, 3.535608670648408*^9,
3.537097440855691*^9, 3.537408794982025*^9, 3.537436919661626*^9,
3.537520510969162*^9, 3.537524990127639*^9, 3.537528520318471*^9,
3.53784871581251*^9, 3.5379390503942013`*^9, 3.540983986209414*^9,
3.541051019956698*^9, 3.546671098617345*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "symmetricDataReduceSelf21", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824665295789*^9, 3.43182467982123*^9}, {3.431824827960742*^9,
3.431824921139798*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 142079.14276205358`}, {2, 142079.14276205358`}, {2,
0}}], LineBox[{{1.5, 142079.14276205358`}, {1.5,
190764.39183696778`}, {3, 190764.39183696778`}, {3, 0}}],
LineBox[{{4, 0}, {4, 111753.85988412212`}, {5, 111753.85988412212`}, {5,
0}}], LineBox[{{2.25, 190764.39183696778`}, {2.25, 284207.119389885}, {
4.5, 284207.119389885}, {4.5, 111753.85988412212`}}],
LineBox[{{7, 0}, {7, 52150.51784977787}, {8, 52150.51784977787}, {8,
0}}], LineBox[{{6, 0}, {6, 86900.64685390092}, {7.5,
86900.64685390092}, {7.5, 52150.51784977787}}],
LineBox[{{9, 0}, {9, 66309.61484581252}, {10, 66309.61484581252}, {10,
0}}], LineBox[{{6.75, 86900.64685390092}, {6.75,
106399.21562176838`}, {9.5, 106399.21562176838`}, {9.5,
66309.61484581252}}],
LineBox[{{12, 0}, {12, 28137.5089871154}, {13, 28137.5089871154}, {13,
0}}], LineBox[{{11, 0}, {11, 31005.60486877356}, {12.5,
31005.60486877356}, {12.5, 28137.5089871154}}],
LineBox[{{16, 0}, {16, 8897.597653299457}, {17, 8897.597653299457}, {17,
0}}], LineBox[{{15, 0}, {15, 12191.335088395184`}, {16.5,
12191.335088395184`}, {16.5, 8897.597653299457}}],
LineBox[{{14, 0}, {14, 13101.477951040415`}, {15.75,
13101.477951040415`}, {15.75, 12191.335088395184`}}],
LineBox[{{14.875, 13101.477951040415`}, {14.875, 28264.510864632037`}, {
18, 28264.510864632037`}, {18, 0}}],
LineBox[{{11.75, 31005.60486877356}, {11.75, 79572.23624084654}, {
16.4375, 79572.23624084654}, {16.4375, 28264.510864632037`}}],
LineBox[{{8.125, 106399.21562176838`}, {8.125, 130520.22987753383`}, {
14.09375, 130520.22987753383`}, {14.09375, 79572.23624084654}}],
LineBox[{{3.375, 284207.119389885}, {3.375, 443823.8198419591}, {
11.109375, 443823.8198419591}, {11.109375, 130520.22987753383`}}],
LineBox[{{19, 0}, {19, 235569.9188202942}, {20, 235569.9188202942}, {20,
0}}], LineBox[{{19.5, 235569.9188202942}, {19.5, 319169.4104283737}, {
21, 319169.4104283737}, {21, 0}}],
LineBox[{{7.2421875, 443823.8198419591}, {7.2421875,
1.2545059743258636`*^6}, {20.25, 1.2545059743258636`*^6}, {20.25,
319169.4104283737}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{595., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBGLVTNvD6ye+dGTteBO8HUgvKaldfRlIuwQensIy6aXj
YiGtu2xA+sv54AxTIM2zxyfBDEh/W5JoFQOkLR8st6sH0hNOnzjQCKQbnFW0
moB0j37Uo+VAeon4DZGVQFrsyI8Pq4D0UpH73zcD6WcmLPO3Auk1ga7c24C0
HNeZpidAep/H5GOuM1467nm+ML0ASD+q6OctA9Iumk9TNrx+6Xgi413yZiD9
92b0Pk+GV456z6esOGH+ypHF69eqHXavHG+t1EjaDaTXpQT92QekmTJK9PcD
aYbU3/Ug2kSptuyOP1B9n+WLu0Cabd5UVdaAV45ZYg5WnEDabfZuZ24gbeQ6
r4oHSN8wCzoCovPWRcSYAmlmzgCOECCttuv7uygQP/6wczSQnjvP0ukykN7V
pHjlCsg81gS+O0B6xmn/sH9AmmHZtezF4a8cX/fKxlRFvXI85ZaYLBT9yjHR
9LucApAuuf/gvQeQNn93VN4bSHdy8tz0AdL6b6oNXwJpp2o/X9GYV47shz3E
niS+cvxQ13CRJemV46cVof/35LxyBABWTOWT
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["symmetric linkage", "Subsection",
CellChangeTimes->{{3.431824602921352*^9, 3.4318246144577*^9}, {
3.431824713767918*^9, 3.431824714432879*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "symmetricData21", "]"}], "\[Rule]", "ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Centroid\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824665295789*^9, 3.43182467982123*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{6, 0}, {6, 68777.06401119489}, {7, 68777.06401119489}, {7,
0}}], LineBox[{{5, 0}, {5, 62035.442187938046`}, {6.5,
62035.442187938046`}, {6.5, 68777.06401119489}}],
LineBox[{{4, 0}, {4, 58475.480528962114`}, {5.75, 58475.480528962114`}, {
5.75, 62035.442187938046`}}],
LineBox[{{3, 0}, {3, 78272.775444103}, {4.875, 78272.775444103}, {4.875,
58475.480528962114`}}],
LineBox[{{3.9375, 78272.775444103}, {3.9375, 98424.19900739947}, {
8, 98424.19900739947}, {8, 0}}],
LineBox[{{5.96875, 98424.19900739947}, {5.96875, 115046.47850212366`}, {
9, 115046.47850212366`}, {9, 0}}],
LineBox[{{7.484375, 115046.47850212366`}, {7.484375,
128772.0558889841}, {10, 128772.0558889841}, {10, 0}}],
LineBox[{{8.7421875, 128772.0558889841}, {8.7421875,
138318.9958203248}, {11, 138318.9958203248}, {11, 0}}],
LineBox[{{2, 0}, {2, 136746.85245036436`}, {9.87109375,
136746.85245036436`}, {9.87109375, 138318.9958203248}}],
LineBox[{{5.935546875, 136746.85245036436`}, {5.935546875,
138195.0757849056}, {12, 138195.0757849056}, {12, 0}}],
LineBox[{{8.9677734375, 138195.0757849056}, {8.9677734375,
219201.9307372677}, {13, 219201.9307372677}, {13, 0}}],
LineBox[{{10.98388671875, 219201.9307372677}, {10.98388671875,
243257.5025781754}, {14, 243257.5025781754}, {14, 0}}],
LineBox[{{1, 0}, {1, 311662.9621247665}, {12.491943359375,
311662.9621247665}, {12.491943359375, 243257.5025781754}}],
LineBox[{{6.7459716796875, 311662.9621247665}, {6.7459716796875,
406340.8494479073}, {15, 406340.8494479073}, {15, 0}}],
LineBox[{{10.87298583984375, 406340.8494479073}, {10.87298583984375,
412121.4684473995}, {16, 412121.4684473995}, {16, 0}}],
LineBox[{{13.436492919921875`, 412121.4684473995}, {13.436492919921875`,
603605.2673746197}, {17, 603605.2673746197}, {17, 0}}],
LineBox[{{15.218246459960938`, 603605.2673746197}, {15.218246459960938`,
681648.1530452187}, {18, 681648.1530452187}, {18, 0}}],
LineBox[{{16.60912322998047, 681648.1530452187}, {16.60912322998047,
718593.4975197534}, {19, 718593.4975197534}, {19, 0}}],
LineBox[{{17.804561614990234`, 718593.4975197534}, {17.804561614990234`,
972478.9903533215}, {20, 972478.9903533215}, {20, 0}}],
LineBox[{{18.902280807495117`, 972478.9903533215}, {18.902280807495117`,
3.1369325978748477`*^6}, {21, 3.1369325978748477`*^6}, {21, 0}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{623., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBOL9DBtXrp/40tHjx7/g7UD6mfzE1ZeBNEfhiSksk146
GskY3GUD0hWvQjNMgXSdp3+CGZCepp5hFQOkdx9daVcPpJdseXGgEUgbSKlp
NYHUc8c/Wg6kXcPuiKwE0jWBbB9XAek8nsffNwPpw2vY528F0ne3eHNvA9LL
Pp5regKk561cf8x1xkvHWReWpRcAabe6ibxlQDon52XKhtcvHUUOfUjeDKQv
HIvd58nwyjHNefqKE+avHEPK/qzaYffKcccTraTdQPpMV8iffUA6oLtMfz+Q
fjjrbz2IjlGsL7vj/8oxaJf1i7tAeueR6aqsAa8c3dycrDiBtMmtvc7cQNqr
akEVD5AuyQw5AqLFvkTFmAJpnaIgjhAgbej8610UkL6me8w5GkjX/Ld2ugyk
/bYpX7kCpD3UkvjuAOmiu4Fh/4D0ugk3sheHv3JUOCofUxX1yrHAIDlZKPqV
Y5/XTzkFIO118NF7DyB94NxxeW8gXfOa96YPkA66XGv4EqQuK8BXNOaV46vb
XmJPEl85ZlQ0XWRJeuVotyb8/56cV44ARifrDw==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "symmetricData21", "]"}], "\[Rule]", "ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Average\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824665295789*^9, 3.43182467982123*^9}, {3.4318247352578*^9,
3.4318247411395073`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{6, 0}, {6, 68777.06401119489}, {7, 68777.06401119489}, {7,
0}}], LineBox[{{5, 0}, {5, 79229.70819073677}, {6.5,
79229.70819073677}, {6.5, 68777.06401119489}}],
LineBox[{{4, 0}, {4, 83723.97835036971}, {5.75, 83723.97835036971}, {
5.75, 79229.70819073677}}],
LineBox[{{3, 0}, {3, 108173.30140933908`}, {4.875,
108173.30140933908`}, {4.875, 83723.97835036971}}],
LineBox[{{3.9375, 108173.30140933908`}, {3.9375, 134868.26385064478`}, {
8, 134868.26385064478`}, {8, 0}}],
LineBox[{{5.96875, 134868.26385064478`}, {5.96875,
159086.56017807804`}, {9, 159086.56017807804`}, {9, 0}}],
LineBox[{{7.484375, 159086.56017807804`}, {7.484375,
180608.0212237357}, {10, 180608.0212237357}, {10, 0}}],
LineBox[{{8.7421875, 180608.0212237357}, {8.7421875,
197759.90910109004`}, {11, 197759.90910109004`}, {11, 0}}],
LineBox[{{2, 0}, {2, 203244.3552007063}, {9.87109375,
203244.3552007063}, {9.87109375, 197759.90910109004`}}],
LineBox[{{5.935546875, 203244.3552007063}, {5.935546875,
210350.04498074617`}, {12, 210350.04498074617`}, {12, 0}}],
LineBox[{{8.9677734375, 210350.04498074617`}, {8.9677734375,
296218.43792232155`}, {13, 296218.43792232155`}, {13, 0}}],
LineBox[{{10.98388671875, 296218.43792232155`}, {10.98388671875,
330600.55942912714`}, {14, 330600.55942912714`}, {14, 0}}],
LineBox[{{1, 0}, {1, 409560.04437143257`}, {12.491943359375,
409560.04437143257`}, {12.491943359375, 330600.55942912714`}}],
LineBox[{{6.7459716796875, 409560.04437143257`}, {6.7459716796875,
517916.80596074}, {15, 517916.80596074}, {15, 0}}],
LineBox[{{10.87298583984375, 517916.80596074}, {10.87298583984375,
541542.458491691}, {16, 541542.458491691}, {16, 0}}],
LineBox[{{13.436492919921875`, 541542.458491691}, {13.436492919921875`,
749085.1878329827}, {17, 749085.1878329827}, {17, 0}}],
LineBox[{{15.218246459960938`, 749085.1878329827}, {15.218246459960938`,
851988.0237810964}, {18, 851988.0237810964}, {18, 0}}],
LineBox[{{16.60912322998047, 851988.0237810964}, {16.60912322998047,
915235.5316152698}, {19, 915235.5316152698}, {19, 0}}],
LineBox[{{17.804561614990234`, 915235.5316152698}, {17.804561614990234`,
1.194601590397704*^6}, {20, 1.194601590397704*^6}, {20, 0}}],
LineBox[{{18.902280807495117`, 1.194601590397704*^6}, {
18.902280807495117`, 3.3941418199587925`*^6}, {
21, 3.3941418199587925`*^6}, {21, 0}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{630., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBOKkvQfXrJ/40vFdGXPIdiAteGzq6stAet26s1NYJr10
LDM0u8sGpHW25WeYAukZYoEJZkCawSbPKgZIn+lebVcPpAMkXh9oBNKPXTS0
moD0OtOUR8uB9LWJD0RWAmmtEo6Pq4D0We/n3zcD6QY57vlbgfR+3kjubSD+
1otNT4D0i5qtx1xnvHT8lbU6vQBIN/+YylsGpJ9UvU3Z8Pql49I9n5I3A+kT
++P3eTK8cnz3e9aKE+avHIsX/Fu1w+6V42wB3aTdQPpcfdiffUBabGmF/n4g
XTD9fz2IPhbYWHbH/5Vj7W3bF3eB9KX7M1VZA145bl7iYsUJpD8IHXDmBtIG
8xdV8QBpo7SwIyD6TUVsjCmQ3lESwhECkt/w510UkHZafsI5GkgnWNk5XQbS
q7apXrkCpJUjU/juAGneupCwf0D6185b2YvDXzlyfVOMqYp65RglmJosFP3K
kSn8t5wCkH5W9vS9B5C+se6kvDeQ3nSM/6YPkOb5UW/4Ekgrewf5isa8cux/
7yP2JPGVY0pMy0WWJKC/FkX+35PzyhEAYtTteA==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "symmetricData21", "]"}], "\[Rule]", "ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "EuclideanDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Ward\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.431823931095072*^9, 3.431823954579802*^9}, {
3.4318240112063704`*^9, 3.431824025714778*^9}, {3.43182410569075*^9,
3.4318241551825323`*^9}, {3.431824208106986*^9, 3.4318242261534977`*^9}, {
3.431824665295789*^9, 3.43182467982123*^9}, {3.4318247617031107`*^9,
3.431824767875107*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{3, 0}, {3, 224879.68081176208`}, {4, 224879.68081176208`}, {4,
0}}], LineBox[{{2, 0}, {2, 229535.60400231453`}, {3.5,
229535.60400231453`}, {3.5, 224879.68081176208`}}],
LineBox[{{8, 0}, {8, 68777.06401119489}, {9, 68777.06401119489}, {9,
0}}], LineBox[{{7, 0}, {7, 82713.92291725073}, {8.5,
82713.92291725073}, {8.5, 68777.06401119489}}],
LineBox[{{6, 0}, {6, 87713.22079344315}, {7.75, 87713.22079344315}, {
7.75, 82713.92291725073}}],
LineBox[{{5, 0}, {5, 125236.4407105648}, {6.875, 125236.4407105648}, {
6.875, 87713.22079344315}}],
LineBox[{{5.9375, 125236.4407105648}, {5.9375, 164040.3316789991}, {
10, 164040.3316789991}, {10, 0}}],
LineBox[{{7.96875, 164040.3316789991}, {7.96875, 197222.5345750691}, {
11, 197222.5345750691}, {11, 0}}],
LineBox[{{9.484375, 197222.5345750691}, {9.484375,
250272.70682643788`}, {12, 250272.70682643788`}, {12, 0}}],
LineBox[{{2.75, 229535.60400231453`}, {2.75, 263971.6517441483}, {
10.7421875, 263971.6517441483}, {10.7421875, 250272.70682643788`}}],
LineBox[{{6.74609375, 263971.6517441483}, {6.74609375,
401870.20635165746`}, {13, 401870.20635165746`}, {13, 0}}],
LineBox[{{9.873046875, 401870.20635165746`}, {9.873046875,
449090.7739904778}, {14, 449090.7739904778}, {14, 0}}],
LineBox[{{1, 0}, {1, 578802.6439459947}, {11.9365234375,
578802.6439459947}, {11.9365234375, 449090.7739904778}}],
LineBox[{{15, 0}, {15, 700517.6190560806}, {16, 700517.6190560806}, {16,
0}}], LineBox[{{6.46826171875, 578802.6439459947}, {6.46826171875,
830713.0532522206}, {15.5, 830713.0532522206}, {15.5,
700517.6190560806}}],
LineBox[{{17, 0}, {17, 994936.4281902638}, {18, 994936.4281902638}, {18,
0}}], LineBox[{{17.5, 994936.4281902638}, {17.5,
1.1842023075712903`*^6}, {19, 1.1842023075712903`*^6}, {19, 0}}],
LineBox[{{18.25, 1.1842023075712903`*^6}, {18.25,
1.4742650839228146`*^6}, {20, 1.4742650839228146`*^6}, {20, 0}}],
LineBox[{{10.984130859375, 830713.0532522206}, {10.984130859375,
1.979607609005868*^6}, {19.125, 1.979607609005868*^6}, {19.125,
1.4742650839228146`*^6}}],
LineBox[{{15.0545654296875, 1.979607609005868*^6}, {15.0545654296875,
5.975109710237801*^6}, {21, 5.975109710237801*^6}, {21, 0}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{632., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBGK56Uob1k986cj1jT1kO5DOEpu1+jKQDlt3aQrLpJeO
W9ps7rIB6bOnizJMgTQfW3CCGZBO7yuxigHS23PX2tUD6a2bJQ42AumGBC2t
JiB9TD3z0XIgrbfnichKIL2hlevjKiB9I/71981AWm0i3/ytQPqpWzz3NiD9
b/fbpidAOuf9xWOuM146Jp1cn14ApMWMZ/GWAemcDR9TNrx+6fh4y5fkzUBa
IDJxnyfDK0e9sPkrTpi/cuycwbB6h90rxwoj/aTdQFpudsSffUDaYm6V/n4g
XSLG1ACiNfKay+74v3L88df+xV0gnXN7tiprwCvH8lNuVpxA+p77IWduIC16
fEkVD5B26Y44AqK31MfHmALpV2fCOEKA9JdH/95FAWmWR6eco4H0NScHp8tA
+sdV9StXgLR/SxrfHSA9c01Y2D8g/Szibvbi8FeOwUoqMVVRrxxF3qUlC0W/
cvye9ldOAUjbhD1/7wGku/pPy3sDablFgjd9gPS5y42GL4H0IY0QX9GYV467
mP3FniS+cqy3b7vIkvTK8UB79P89Oa8cAU8p6h4=
"]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["field-power-reduced cited matrix", "Subsection",
CellChangeTimes->{{3.431824441854018*^9, 3.431824445428808*^9}, {
3.4318249610285587`*^9, 3.431824964963443*^9}, {3.43182549807127*^9,
3.431825498399736*^9}, {3.431826775102911*^9, 3.4318268109015408`*^9}, {
3.522558042138959*^9, 3.522558049404479*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"DendrogramPlot", "[",
RowBox[{
RowBox[{
RowBox[{"N", "[", "citedciting21DataReducedFieldPower", "]"}], "\[Rule]",
"ClNames21"}], ",",
RowBox[{"DistanceFunction", "\[Rule]", "CosineDistance"}], ",",
RowBox[{"Linkage", "\[Rule]", "\"\<Average\>\""}], ",",
RowBox[{"LeafLabels", "\[Rule]", "ClNames21"}]}], "]"}]], "Input",
CellChangeTimes->{{3.5225589885338917`*^9, 3.522559134201127*^9}, {
3.522559175245468*^9, 3.5225592145036583`*^9}}],
Cell[BoxData[
GraphicsBox[{
{RGBColor[
0, 1, 0]}, {{}, {
LineBox[{{1, 0}, {1, 0.4480993067900314}, {2, 0.4480993067900314}, {2,
0}}], LineBox[{{5, 0}, {5, 0.05945426629733053}, {
6, 0.05945426629733053}, {6, 0}}],
LineBox[{{4, 0}, {4, 0.1226528927371151}, {5.5, 0.1226528927371151}, {
5.5, 0.05945426629733053}}],
LineBox[{{4.75, 0.1226528927371151}, {4.75, 0.2669633970910132}, {
7, 0.2669633970910132}, {7, 0}}],
LineBox[{{3, 0}, {3, 0.39481204099439293`}, {5.875,
0.39481204099439293`}, {5.875, 0.2669633970910132}}],
LineBox[{{4.4375, 0.39481204099439293`}, {4.4375, 0.5320537014096153}, {
8, 0.5320537014096153}, {8, 0}}],
LineBox[{{1.5, 0.4480993067900314}, {1.5, 0.6049876393385568}, {6.21875,
0.6049876393385568}, {6.21875, 0.5320537014096153}}],
LineBox[{{9, 0}, {9, 0.30623156108038974`}, {10, 0.30623156108038974`}, {
10, 0}}],
LineBox[{{3.859375, 0.6049876393385568}, {3.859375,
0.7081412026481188}, {9.5, 0.7081412026481188}, {9.5,
0.30623156108038974`}}],
LineBox[{{12, 0}, {12, 0.13502698656459944`}, {
13, 0.13502698656459944`}, {13, 0}}],
LineBox[{{11, 0}, {11, 0.6855530060735558}, {12.5, 0.6855530060735558}, {
12.5, 0.13502698656459944`}}],
LineBox[{{14, 0}, {14, 0.2211428200206611}, {15, 0.2211428200206611}, {
15, 0}}],
LineBox[{{16, 0}, {16, 0.3971288717654895}, {17, 0.3971288717654895}, {
17, 0}}],
LineBox[{{14.5, 0.2211428200206611}, {14.5, 0.49497003785528176`}, {16.5,
0.49497003785528176`}, {16.5, 0.3971288717654895}}],
LineBox[{{19, 0}, {19, 0.15880393468537946`}, {
20, 0.15880393468537946`}, {20, 0}}],
LineBox[{{19.5, 0.15880393468537946`}, {19.5, 0.25598357286028295`}, {
21, 0.25598357286028295`}, {21, 0}}],
LineBox[{{18, 0}, {18, 0.3411426424649851}, {20.25,
0.3411426424649851}, {20.25, 0.25598357286028295`}}],
LineBox[{{15.5, 0.49497003785528176`}, {15.5, 0.5733549691879849}, {
19.125, 0.5733549691879849}, {19.125, 0.3411426424649851}}],
LineBox[{{11.75, 0.6855530060735558}, {11.75, 0.7157029649206855}, {
17.3125, 0.7157029649206855}, {17.3125, 0.5733549691879849}}],
LineBox[{{6.6796875, 0.7081412026481188}, {6.6796875,
0.7930005642889988}, {14.53125, 0.7930005642889988}, {14.53125,
0.7157029649206855}}]}}, {
InsetBox["\<\"B-1\"\>", Offset[{0, -4}, {1, 0}], {0, 1}],
InsetBox["\<\"G-1\"\>", Offset[{0, -4}, {2, 0}], {0, 1}],
InsetBox["\<\"B-2\"\>", Offset[{0, -4}, {3, 0}], {0, 1}],
InsetBox["\<\"Me-1\"\>", Offset[{0, -4}, {4, 0}], {0, 1}],
InsetBox["\<\"Me-3\"\>", Offset[{0, -4}, {5, 0}], {0, 1}],
InsetBox["\<\"Me-4\"\>", Offset[{0, -4}, {6, 0}], {0, 1}],
InsetBox["\<\"Me-2\"\>", Offset[{0, -4}, {7, 0}], {0, 1}],
InsetBox["\<\"Mo\"\>", Offset[{0, -4}, {8, 0}], {0, 1}],
InsetBox["\<\"B-3\"\>", Offset[{0, -4}, {9, 0}], {0, 1}],
InsetBox["\<\"G-2\"\>", Offset[{0, -4}, {10, 0}], {0, 1}],
InsetBox["\<\"I-1\"\>", Offset[{0, -4}, {11, 0}], {0, 1}],
InsetBox["\<\"M\"\>", Offset[{0, -4}, {12, 0}], {0, 1}],
InsetBox["\<\"I-2\"\>", Offset[{0, -4}, {13, 0}], {0, 1}],
InsetBox["\<\"E-1\"\>", Offset[{0, -4}, {14, 0}], {0, 1}],
InsetBox["\<\"Q\"\>", Offset[{0, -4}, {15, 0}], {0, 1}],
InsetBox["\<\"C-1\"\>", Offset[{0, -4}, {16, 0}], {0, 1}],
InsetBox["\<\"E-2\"\>", Offset[{0, -4}, {17, 0}], {0, 1}],
InsetBox["\<\"C-2\"\>", Offset[{0, -4}, {18, 0}], {0, 1}],
InsetBox["\<\"Ca\"\>", Offset[{0, -4}, {19, 0}], {0, 1}],
InsetBox["\<\"Cp\"\>", Offset[{0, -4}, {20, 0}], {0, 1}],
InsetBox["\<\"E-3\"\>", Offset[{0, -4}, {21, 0}], {0, 1}]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
ImageSize->{641., Automatic},
PlotRange->All]], "Output",
CellChangeTimes->{3.5225591354822197`*^9, 3.522559179800889*^9,
3.522559215472989*^9, 3.5315311881694603`*^9, 3.531534146067565*^9,
3.531614508937418*^9, 3.5316228662823067`*^9, 3.531627038154128*^9,
3.5316295252124367`*^9, 3.531630114835341*^9, 3.531713251054487*^9,
3.5317760667989197`*^9, 3.5317902000330467`*^9, 3.531790878403748*^9,
3.5320366260780573`*^9, 3.532039841308003*^9, 3.5320546432843513`*^9,
3.5321248507778587`*^9, 3.5356086709846153`*^9, 3.537097441195868*^9,
3.537408795276243*^9, 3.5374369199841957`*^9, 3.537520511288216*^9,
3.537524990420373*^9, 3.537528520609655*^9, 3.5378487161159163`*^9,
3.53793905068904*^9, 3.5409839865348473`*^9, 3.541051020254964*^9,
3.546671098923325*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"PCcitedciting21DataReducedFieldPower", "=",
RowBox[{"PrincipalComponents", "[",
RowBox[{"N", "[", "citedciting21DataReducedFieldPower", "]"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.522559758127391*^9, 3.522559791017948*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"PCPoint", "=",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], ",",
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}]}], "}"}], "]"}], "&"}], ",",
"PCcitedciting21DataReducedFieldPower"}], "]"}]}]], "Input",
CellChangeTimes->{{3.5225598017004833`*^9, 3.522559835987825*^9}, {
3.52255989901374*^9, 3.522559915399253*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
"0.03164538556476118`", ",", "0.03282466512218879`", ",",
"0.044462167102194916`"}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
"0.007390264271511557`", ",", "0.009033879811928353`", ",",
"0.0117497477082754`"}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.04003941714876096`", ",",
RowBox[{"-", "0.03166253848200748`"}], ",", "0.057436838748523275`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.04545876912737385`", ",", "0.002170638118299567`", ",",
RowBox[{"-", "0.0791711351405743`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.04827557716889321`", ",",
RowBox[{"-", "0.07840227473096288`"}], ",",
RowBox[{"-", "0.1476109130443434`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.03854275926596155`", ",",
RowBox[{"-", "0.0261235157669702`"}], ",",
RowBox[{"-", "0.022655199500647913`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.04297725974341057`", ",",
RowBox[{"-", "0.04619835926764382`"}], ",",
RowBox[{"-", "0.05634016533333354`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.07057943718811165`", ",",
RowBox[{"-", "0.052723424278432705`"}], ",",
RowBox[{"-", "0.020596058111300674`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.08112461574298788`", ",",
RowBox[{"-", "0.033390323481322856`"}], ",", "0.009408204869333015`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.07209039636638254`", ",",
RowBox[{"-", "0.043170316699847555`"}], ",",
RowBox[{"-", "0.002073337690542778`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.03217514803837114`", ",",
RowBox[{"-", "0.0438351953399591`"}], ",", "0.016839973459945055`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.07151526882606025`", ",",
RowBox[{"-", "0.032649416214732135`"}], ",", "0.039831302258886356`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.07569378681241168`", ",",
RowBox[{"-", "0.0264088939329274`"}], ",", "0.025041459757959003`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.07932904241204845`", ",",
RowBox[{"-", "0.027545037163189817`"}], ",", "0.03133590847267485`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.08513304728668132`", ",",
RowBox[{"-", "0.028789066986371917`"}], ",", "0.026369339008168985`"}],
"}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.05512655287829339`"}], ",", "0.07130320225412577`", ",",
"0.04105377133706765`"}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.1954899923363417`"}], ",", "0.2900323599101714`", ",",
RowBox[{"-", "0.05735947404978532`"}]}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.06532790016165675`"}], ",", "0.20650440536382123`", ",",
"0.013886582782221`"}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.02138655739222983`"}], ",", "0.08349637195511991`", ",",
"0.037463333773523004`"}], "}"}], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.5646753998584537`"}], ",",
RowBox[{"-", "0.1871133248073245`"}], ",", "0.0134443645797884`"}], "}"}
], "]"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0.08003622766324792`", ",",
RowBox[{"-", "0.03735383538396267`"}], ",", "0.01748328901196705`"}],
"}"}], "]"}]}], "}"}]], "Output",
CellChangeTimes->{{3.52255982749704*^9, 3.522559836424921*^9},
3.522559917312767*^9, 3.531531188820571*^9, 3.5315341460980463`*^9,
3.531614508978386*^9, 3.531622866316107*^9, 3.5316270382031307`*^9,
3.531629525244213*^9, 3.5316301148667*^9, 3.5317132510908117`*^9,
3.531776066842889*^9, 3.531790200064522*^9, 3.531790878435981*^9,
3.532036626709024*^9, 3.532039841847355*^9, 3.532054643317545*^9,
3.5321248508092403`*^9, 3.535608671030757*^9, 3.5370974412569637`*^9,
3.537408795354409*^9, 3.537436920053863*^9, 3.53752051135226*^9,
3.537524990502694*^9, 3.537528520649466*^9, 3.537848716176703*^9,
3.537939050752261*^9, 3.5409839866363564`*^9, 3.541051020313879*^9,
3.546671098983787*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Graphics3D", "[",
RowBox[{"{",
RowBox[{"PCPoint", ",",
RowBox[{"PointSize", "\[Rule]", "0.05"}], ",",
RowBox[{"Point", "[",
RowBox[{"{",
RowBox[{"0", ",", "0", ",", "0"}], "}"}], "]"}]}], "}"}],
"]"}]], "Input",
CellChangeTimes->{{3.5225599223008823`*^9, 3.522559966795985*^9}}],
Cell[BoxData[
Graphics3DBox[{{
Point3DBox[{0.03164538556476118, 0.03282466512218879,
0.044462167102194916`}],
Point3DBox[{0.007390264271511557, 0.009033879811928353,
0.0117497477082754}],
Point3DBox[{0.04003941714876096, -0.03166253848200748,
0.057436838748523275`}],
Point3DBox[{0.04545876912737385,
0.002170638118299567, -0.0791711351405743}],
Point3DBox[{
0.04827557716889321, -0.07840227473096288, -0.1476109130443434}],
Point3DBox[{
0.03854275926596155, -0.0261235157669702, -0.022655199500647913`}],
Point3DBox[{
0.04297725974341057, -0.04619835926764382, -0.05634016533333354}],
Point3DBox[{
0.07057943718811165, -0.052723424278432705`, -0.020596058111300674`}],
Point3DBox[{0.08112461574298788, -0.033390323481322856`,
0.009408204869333015}],
Point3DBox[{
0.07209039636638254, -0.043170316699847555`, -0.002073337690542778}],
Point3DBox[{0.03217514803837114, -0.0438351953399591,
0.016839973459945055`}],
Point3DBox[{0.07151526882606025, -0.032649416214732135`,
0.039831302258886356`}],
Point3DBox[{0.07569378681241168, -0.0264088939329274,
0.025041459757959003`}],
Point3DBox[{0.07932904241204845, -0.027545037163189817`,
0.03133590847267485}],
Point3DBox[{0.08513304728668132, -0.028789066986371917`,
0.026369339008168985`}],
Point3DBox[{-0.05512655287829339, 0.07130320225412577,
0.04105377133706765}],
Point3DBox[{-0.1954899923363417,
0.2900323599101714, -0.05735947404978532}],
Point3DBox[{-0.06532790016165675, 0.20650440536382123`,
0.013886582782221}],
Point3DBox[{-0.02138655739222983, 0.08349637195511991,
0.037463333773523004`}],
Point3DBox[{-0.5646753998584537, -0.1871133248073245,
0.0134443645797884}],
Point3DBox[{0.08003622766324792, -0.03735383538396267,
0.01748328901196705}]},
{PointSize[0.05], Point3DBox[{0, 0, 0}]}},
ImageSize->{360., 264.5209339467907},
ViewPoint->{-0.8858125589875818, -2.116161911311172, 2.487407259669337},
ViewVertical->{-0.7212012517573301, 0.20613340899010568`,
2.1422431710402727`}]], "Output",
CellChangeTimes->{{3.5225599471036997`*^9, 3.5225599672202063`*^9},
3.531531188879266*^9, 3.531534146134439*^9, 3.5316145090170107`*^9,
3.531622866361764*^9, 3.531627038271901*^9, 3.531629525298503*^9,
3.5316301149214897`*^9, 3.531713251161688*^9, 3.5317760668808117`*^9,
3.5317902001045303`*^9, 3.53179087847679*^9, 3.5320366267603607`*^9,
3.5320398418825407`*^9, 3.532054643398785*^9, 3.532124850843391*^9,
3.535608673242091*^9, 3.537097443432619*^9, 3.53740879759643*^9,
3.5374369222692347`*^9, 3.537520513560367*^9, 3.537524992671485*^9,
3.537528522820395*^9, 3.537848718374428*^9, 3.537939052931759*^9,
3.540983988851365*^9, 3.541051022523741*^9, 3.546671101171529*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Google score and ranking", "Section",
CellChangeTimes->{{3.5316429672611217`*^9, 3.531642981085814*^9}, {
3.531801401883176*^9, 3.531801404074361*^9}}],
Cell[CellGroupData[{
Cell["citingcited21Data", "Subsection",
CellChangeTimes->{3.531615401329467*^9}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21Data", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21Data", "]"}]}]], "Input",
CellChangeTimes->{{3.5316146296837254`*^9, 3.531614646226108*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531614647176957*^9, 3.531616611034141*^9,
3.531617375797697*^9, 3.5316228663773413`*^9, 3.531627038286014*^9,
3.5316295253163157`*^9, 3.531630114933654*^9, 3.531713251182173*^9,
3.531776066893901*^9, 3.531790200120755*^9, 3.531790878494813*^9,
3.5320366267777357`*^9, 3.5320398418977537`*^9, 3.532054643415813*^9,
3.5321248508617067`*^9, 3.535608673400668*^9, 3.537097443538046*^9,
3.537408797737571*^9, 3.537436922394503*^9, 3.5375205136869164`*^9,
3.537524992787388*^9, 3.537528522937648*^9, 3.53784871842386*^9,
3.5379390530500793`*^9, 3.540983988904808*^9, 3.541051022590144*^9,
3.5466711012726173`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"googlePageScore", "[",
RowBox[{"citingcited21Data", ",", "0.9", ",", "50"}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614775157372*^9}, {3.531614843076782*^9,
3.531614843581339*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.6051220119467492`"},
{"0.027502673484830528`"},
{"0.03154116964898292`"},
{"0.0069606768670136925`"},
{"0.005832694067427463`"},
{"0.006661999731348607`"},
{"0.005740548993658447`"},
{"0.004803211174283974`"},
{"0.005047872232222396`"},
{"0.005445049274330224`"},
{"0.030788121977146476`"},
{"0.009496255103830063`"},
{"0.0057755005733639364`"},
{"0.005940726222880792`"},
{"0.0056039200911733545`"},
{"0.005435517025319636`"},
{"0.006779564135812524`"},
{"0.010856189296007264`"},
{"0.013452138443224024`"},
{"0.19641730336878424`"},
{"0.004796856341610249`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05238276099254343`"},
{"0.44895083571985284`"},
{"0.014231597235763258`"},
{"0.03107194713428319`"},
{"0.005776705421821915`"},
{"0.027851290303072436`"},
{"0.015347877961672128`"},
{"0.005077027072089561`"},
{"0.0049862291183075`"},
{"0.011000258292342847`"},
{"0.030372268784550842`"},
{"0.006118533012530851`"},
{"0.005194530306395758`"},
{"0.005044980735460598`"},
{"0.004831338491267513`"},
{"0.011721300866494509`"},
{"0.05133057293989249`"},
{"0.011999035783945518`"},
{"0.041262682182293356`"},
{"0.2106489354907809`"},
{"0.00479929215463855`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.11548646269902804`"},
{"0.030974295027767752`"},
{"0.4981603491007488`"},
{"0.007778186681720683`"},
{"0.006213771805398245`"},
{"0.007226702300858817`"},
{"0.005549739591707427`"},
{"0.004874452594733713`"},
{"0.0076543840656088345`"},
{"0.0052796247929179415`"},
{"0.07630856209126974`"},
{"0.013630673988826203`"},
{"0.005358408275898207`"},
{"0.0056960517743850645`"},
{"0.004896962161299504`"},
{"0.006641453570148264`"},
{"0.008881155443444415`"},
{"0.024153896358333246`"},
{"0.018672816899563266`"},
{"0.14177763644787134`"},
{"0.004784414328470551`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005824393939202428`"},
{"0.01207419644463432`"},
{"0.005142990280528656`"},
{"0.6549347520079142`"},
{"0.06239682357109784`"},
{"0.02081868713616234`"},
{"0.027641824272598543`"},
{"0.018273945926724565`"},
{"0.0051134134940085925`"},
{"0.01157707891735479`"},
{"0.010043636293160725`"},
{"0.006148601022210817`"},
{"0.00533978966775831`"},
{"0.004869973789574223`"},
{"0.004887037320258875`"},
{"0.007645641447610957`"},
{"0.008694479800360904`"},
{"0.009601122064072081`"},
{"0.00700291512515573`"},
{"0.10557438161554138`"},
{"0.006394315864069806`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005698524597579644`"},
{"0.00500522592917973`"},
{"0.004913563845617241`"},
{"0.07061694534320903`"},
{"0.6776665928608332`"},
{"0.010748272110204012`"},
{"0.01212486994697884`"},
{"0.035083722004375976`"},
{"0.010166634525416586`"},
{"0.007791753269479382`"},
{"0.009928313108154115`"},
{"0.006798469600329506`"},
{"0.011288245111553945`"},
{"0.007810085686191879`"},
{"0.008113403853616842`"},
{"0.007076789017691971`"},
{"0.005210215679692204`"},
{"0.0060368410150921014`"},
{"0.005386873513467182`"},
{"0.0548194018870485`"},
{"0.03771525709428814`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010743602698978272`"},
{"0.04152775142953562`"},
{"0.0072232166727085`"},
{"0.09680077034955613`"},
{"0.033333239418806816`"},
{"0.5092598470946289`"},
{"0.02085509802485229`"},
{"0.010583854089382836`"},
{"0.005957061026285423`"},
{"0.011625178359338264`"},
{"0.041681583423960854`"},
{"0.009690445198682441`"},
{"0.00608130994485965`"},
{"0.005264817051371871`"},
{"0.004785571222585566`"},
{"0.01005135872406472`"},
{"0.022381584738764226`"},
{"0.011814510044784707`"},
{"0.009430114131193584`"},
{"0.12488694256250168`"},
{"0.0060221437931576366`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0072706954342408505`"},
{"0.0196427265924871`"},
{"0.005194894014998299`"},
{"0.16026872151264587`"},
{"0.049582659946102066`"},
{"0.019158797427264913`"},
{"0.49942028897619195`"},
{"0.02402355903555114`"},
{"0.011339520915516895`"},
{"0.020807977082430013`"},
{"0.010314355183927783`"},
{"0.005844377894638607`"},
{"0.005455961064657638`"},
{"0.0050866467017249145`"},
{"0.004882887053210308`"},
{"0.03424337890636186`"},
{"0.012829513345279955`"},
{"0.008754320374987828`"},
{"0.009804956062641267`"},
{"0.08049681911917748`"},
{"0.005576943355963186`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004938551545141237`"},
{"0.00538400865069409`"},
{"0.004854068300984661`"},
{"0.09576571930838335`"},
{"0.18944227648817905`"},
{"0.01197370169490699`"},
{"0.03461521112886925`"},
{"0.522897641174183`"},
{"0.02853241754959581`"},
{"0.01605961859411592`"},
{"0.007703457717538257`"},
{"0.007019911469362327`"},
{"0.008755658122033789`"},
{"0.008218037477401036`"},
{"0.005099837738531063`"},
{"0.011389999280734284`"},
{"0.004900150070524612`"},
{"0.004846388006061336`"},
{"0.004831027416214686`"},
{"0.01701965545953155`"},
{"0.005752662807013692`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.006096253215182529`"},
{"0.005176634686572175`"},
{"0.008764950121738068`"},
{"0.013903994840442987`"},
{"0.06516821987650646`"},
{"0.008169902838519602`"},
{"0.023406719636083317`"},
{"0.049678958776971274`"},
{"0.6121789587769713`"},
{"0.03271109533731749`"},
{"0.03206195284653371`"},
{"0.00616838015860295`"},
{"0.03651579160274464`"},
{"0.01181231348125081`"},
{"0.021874022088399392`"},
{"0.01586945404864943`"},
{"0.006529014875705049`"},
{"0.013705645746036834`"},
{"0.004960253856310916`"},
{"0.015238343293720757`"},
{"0.010009139895740312`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00741288600445057`"},
{"0.03107655292410795`"},
{"0.005103442222600846`"},
{"0.1280406643845872`"},
{"0.04337190150916704`"},
{"0.02551437142134312`"},
{"0.05002375014843843`"},
{"0.029954358410392234`"},
{"0.03530511196129758`"},
{"0.49358332946102657`"},
{"0.061115585776758935`"},
{"0.007933324039796987`"},
{"0.0201473541818332`"},
{"0.009901230360950624`"},
{"0.006632228951430945`"},
{"0.005819044521202169`"},
{"0.006274427802130284`"},
{"0.0053311338630649035`"},
{"0.0049245416479505155`"},
{"0.016666924820454038`"},
{"0.005867835587015896`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.039173971856320544`"},
{"0.025688451227262793`"},
{"0.03173722985757713`"},
{"0.02070634814861154`"},
{"0.020213706829570355`"},
{"0.017420644742484698`"},
{"0.007323639620918906`"},
{"0.0060856105669806326`"},
{"0.012061563958828014`"},
{"0.015253022938703497`"},
{"0.5950575847497197`"},
{"0.04330787509870959`"},
{"0.0076449274376848946`"},
{"0.007092312392847395`"},
{"0.005087476416227628`"},
{"0.007722036513708732`"},
{"0.024107715168774135`"},
{"0.00945270688668819`"},
{"0.007674914300583055`"},
{"0.07774992905602353`"},
{"0.0194383322317751`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02547582254189884`"},
{"0.010887306162560154`"},
{"0.015513414466758833`"},
{"0.020672166371014503`"},
{"0.049543422248177676`"},
{"0.010956352555160134`"},
{"0.006310516710218604`"},
{"0.008441091110446566`"},
{"0.007819673577046745`"},
{"0.007563215547389675`"},
{"0.10881481841007502`"},
{"0.5851165621054818`"},
{"0.0060639224509329605`"},
{"0.005235365739733197`"},
{"0.005925829665733`"},
{"0.0058469195027615935`"},
{"0.005590461473104524`"},
{"0.006468337036161416`"},
{"0.00599487605833298`"},
{"0.08887027471905215`"},
{"0.012889651547959582`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.007327456008726713`"},
{"0.005362844693592786`"},
{"0.004962218072467436`"},
{"0.008452292291117118`"},
{"0.04118040549381878`"},
{"0.006934533745699928`"},
{"0.005285801112607141`"},
{"0.007681856481260676`"},
{"0.019793107412203945`"},
{"0.009030119148509451`"},
{"0.009037823506608015`"},
{"0.004962218072467436`"},
{"0.6885390947256943`"},
{"0.0321894195927941`"},
{"0.03377651736109837`"},
{"0.01862974933932072`"},
{"0.012936228704481611`"},
{"0.02652671639034925`"},
{"0.005463001348874123`"},
{"0.04434689667232876`"},
{"0.0075816998259793395`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008323624022718967`"},
{"0.0060627065788977745`"},
{"0.005071619480236431`"},
{"0.006403392769062612`"},
{"0.06125386938560137`"},
{"0.006620193071894781`"},
{"0.005474248614067602`"},
{"0.013650717178023691`"},
{"0.010708427353872826`"},
{"0.00922179670588081`"},
{"0.013124202156859853`"},
{"0.004761904761904761`"},
{"0.10774204860718506`"},
{"0.6289919195593857`"},
{"0.021145813361650105`"},
{"0.011080085015870829`"},
{"0.02919839603827353`"},
{"0.010274826748208489`"},
{"0.006279506881729944`"},
{"0.027680793918448347`"},
{"0.006929907790226451`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009875274582076769`"},
{"0.0050668304851260275`"},
{"0.004832272236494284`"},
{"0.007013663948769499`"},
{"0.06091514948434417`"},
{"0.00497300718567333`"},
{"0.005324844558620945`"},
{"0.005277932908894597`"},
{"0.027795524777541977`"},
{"0.007248222197401242`"},
{"0.009687627983171375`"},
{"0.006450724152053314`"},
{"0.08176737778770617`"},
{"0.01925760452734651`"},
{"0.6801020142224208`"},
{"0.005442123682936817`"},
{"0.00497300718567333`"},
{"0.0062630775531479195`"},
{"0.005277932908894597`"},
{"0.01419114635690085`"},
{"0.028264641274805463`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0050844540962734375`"},
{"0.006932392991093982`"},
{"0.005023976096079311`"},
{"0.006909993731762824`"},
{"0.007328859881255481`"},
{"0.00569819380194717`"},
{"0.009447829813983039`"},
{"0.005368924689779146`"},
{"0.005852748691332161`"},
{"0.0048806208363598984`"},
{"0.005622036320221232`"},
{"0.004983657429283226`"},
{"0.007517013659637209`"},
{"0.0053442855045148716`"},
{"0.004855981651095625`"},
{"0.5420954969311237`"},
{"0.1287910835303935`"},
{"0.035836397232020416`"},
{"0.016353521465779085`"},
{"0.1808066435492089`"},
{"0.005265888096855818`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005170426554381267`"},
{"0.010928771274271956`"},
{"0.004852532463307398`"},
{"0.005350287684857272`"},
{"0.004899937722502625`"},
{"0.0066706635806772436`"},
{"0.0053544705018450855`"},
{"0.004777241757526745`"},
{"0.00484416682933177`"},
{"0.004796761570136545`"},
{"0.007866949239192064`"},
{"0.0047814245745145595`"},
{"0.005588708253162673`"},
{"0.005944247697126868`"},
{"0.0047925787531487305`"},
{"0.05756996923305727`"},
{"0.5832148201853453`"},
{"0.04462554492810202`"},
{"0.029574375133617763`"},
{"0.19361609176170957`"},
{"0.004780030302185288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0077651086354372685`"},
{"0.006502942087221443`"},
{"0.006716723684141467`"},
{"0.006588454725989452`"},
{"0.0060463045962002695`"},
{"0.006232722148714532`"},
{"0.005379306013809792`"},
{"0.0047790072896583624`"},
{"0.005517836488613969`"},
{"0.004790979059085884`"},
{"0.005488762191432845`"},
{"0.004802950828513406`"},
{"0.007537645016314362`"},
{"0.005074881019795677`"},
{"0.004816632850716287`"},
{"0.02746208984926067`"},
{"0.06106855688508857`"},
{"0.5914863526353005`"},
{"0.010831591861658104`"},
{"0.2163287243378381`"},
{"0.004782427795209083`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.014604961344744998`"},
{"0.027121141078472806`"},
{"0.0086207712559876`"},
{"0.007736664377289376`"},
{"0.005694550841786418`"},
{"0.006370632572555648`"},
{"0.006367165486756832`"},
{"0.004775773105100027`"},
{"0.004817378134685826`"},
{"0.00480350979149056`"},
{"0.0067381436672302045`"},
{"0.00489365402225979`"},
{"0.004969929909833755`"},
{"0.004976864081431388`"},
{"0.0048208452204846425`"},
{"0.023640186936460972`"},
{"0.10212807525007045`"},
{"0.02119242436249648`"},
{"0.4928443751761059`"},
{"0.23811064736545506`"},
{"0.00477230601930121`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01518056171156541`"},
{"0.012994375094558195`"},
{"0.0065175614353517805`"},
{"0.0184135187950476`"},
{"0.006881856002979637`"},
{"0.00823632751967193`"},
{"0.006779987671640663`"},
{"0.004845747009920378`"},
{"0.004849939122321159`"},
{"0.004805502730872882`"},
{"0.007943718074097427`"},
{"0.005393236889462357`"},
{"0.005396171368142903`"},
{"0.0049832482966659895`"},
{"0.00482772092659702`"},
{"0.02700609158292811`"},
{"0.06445674692654392`"},
{"0.044213036143173186`"},
{"0.022140725930581855`"},
{"0.718911308853127`"},
{"0.005222617914750576`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004817017851803936`"},
{"0.004807292012409964`"},
{"0.004810533958874622`"},
{"0.007173912931609851`"},
{"0.08721432919753593`"},
{"0.005163906123522276`"},
{"0.004940211817460917`"},
{"0.004904550406349685`"},
{"0.005757182326554576`"},
{"0.00498559906796612`"},
{"0.012737093064961916`"},
{"0.0067232823730224755`"},
{"0.005384358483118978`"},
{"0.004836469530591881`"},
{"0.008953741540706755`"},
{"0.00540705210837158`"},
{"0.0048137759053392785`"},
{"0.004949937656854889`"},
{"0.004761904761904761`"},
{"0.018102514463969883`"},
{"0.7887553344170697`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03346181057594935`", "0.02273037707683358`", "0.01572396825592219`",
"0.07168762097653392`", "0.07743191979156863`", "0.019931864724323352`",
"0.020533570103990786`", "0.02144463375877508`", "0.020319425406997625`",
"0.014988188845142855`", "0.03494899505614237`",
"0.017320009144582402`", "0.033556562522162804`",
"0.018419292280655808`", "0.021445099473287856`", "0.04386823220991111`",
"0.08867177357501299`", "0.05884649259960971`", "0.02904575340471716`",
"0.29362376557196895`", "0.042000644645911606`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9l2k41WsXxgnJKWWIJBXSSOUUosF9TqLBkDmklKSSqP7/Pdibvc12hpDh
FDtT5mMKZdiFipLtKDIeRFSGMiaN9O4P73U+PNe1Pt3ruZ51P2v9loqzp+XZ
BUJCQnL/P9Jt7u2bTgyicS5fI2czF2nu+xZt2ZACk2hxeqO/Ny7ZGb0Ve0vD
OC9ignuYif3BYoOuATQoJYdv4+QRyC6+NCCbTyJefOJQuCkVUYvmBj8EJ2Pt
cEd93dUAjOCIimQ2DTI9tAhTGzqOz9p0qs5Q4StS5xNhQEWOwciZwVompk4N
LKvbEwwxXVcKPzwMO39Xf7JT7TnKp+osXmcQWJyS1zDSnIt6jz2Hubwe7HCK
zSDXR8BZbZmsVXMyTBmdEeY5NKhqiJBLgrjQO3Hg6D2PSNAf1Mpm8knE2L8r
vOxOYveToTzTkGCMa4WSwyuTIWYnsrN6mRcK6WFKPUYUFJQdKl2cS2LVmGTE
wgYCMt8UnWyFOXiQulZX6FAu1M5oWX66wcFVc4ne08oZED3laRc22wDL4eit
7tkEZk3crYOiHiL3WXpNRVkynM0Gp7rf9MFdvEJerIeNNqWFf3MJLxhZpCtX
3/JB96kn/ZY8Kt7vKxza84UAN6FCVsuBDaMKFR/5FAoad8Xv/swpwc5VEgqu
o2HYENpdWzxNQWri2T+rrGnoXWxp2L6UhIbrqiRpLSZ69K74HdL0R6NNeVgj
7yayE1NDvqyJgW7gR5G69Y8hsVDtSstNAosuNnVYdNOQ4dahc7ySg8mCicmX
UhScuMCt0Pv8Fg4X9b55TRdidDb2CssiDgOZCy6tM+PCVpVdc+7+DZxISWf+
M0VinJW7u+JeCMp6jRc/jg6Ed9JQoNF2L2z4s6tPo4+C60nX0q5NE4j95bnC
Q5SEsuFfkLBgo71gu9WFJj+0b9jcUJMTgOvzC8vkC71xMdxG6+NCHhYxDBTG
NBk4YhqwxPYYDd+pjYqOviQ+6Zyu0Vcm4fGmoeqTbDFiKx92XSl8h6rjt3M0
RYLR3LiW/bGVg7Kp/SdYs6lYfvxUvH5LIDRfczr0R9nQH29NMbYJBNc09PD9
Tibi7+dyj6wJgYtF0ghtjo3YjYWpj2/7YpvFAfmIn96ozNdMNjtGQdmyYnX5
SjoaM+W7wqSoWCcT9/awdB4sqJHibkfvIKG7d+qhUDDeW3OUlA0ycNxtJXVF
vA/6FrzxmHhWjoftdqOS0qlY/SvCrNu4Hz/HByYkjsdhbZFn18+8INg6cF08
XOkoYA8vnGoKgXGQaffhYxnYrVt8La4zABcqD2qXDdPxe/ibqMgoCqxCTOYX
JRAIIYU4TXGBmDSZqtjxIR7FD+SKtXZwYCtqzVIwD8COXiGdv75W4yBpPJqX
SweVqL7S/8wHjtlG0nqrYxHZd75q30EKzL7xGIUBtRhJaJt755wDw/EglRNJ
MShQEw/0ne2DWWLUo9RbN/FhUz9PQy8E5wP2lxaaxWHpxwiLu2uDwHeo1Tea
pEE2nDw7Z0dF0ecCqwdtJLZM/ymyXIhEda2Iij0nFU0Px1UcjUIRlZA3Vz/m
h8wssbGk5YFwCgwPupxYCnUjbZuuDiqkpERtr+4W1PnRruZQSSooeoUSPW8I
uL/326QYWI6xiF/z6aiHyQ2OxN9BHLzS866Wq0iF6Gd2WwyvH08dhVUSdt2G
ZsBfj8evRCFX7/z2nAg2ljgMq47UeMNtmXmo97gfftNJtkhq9YXPjdYD0YMk
buiavLpjFYKNu5+KbpMhkb+03ampi4BSxbolJc8JqPy0r7p1KRrfn07kKEbR
sNvxl7/zVzrSNo4eUdCiwKhlruj4Jz+ot/+8WewVjuiCVaa9BUUQE1vYeJrn
i5RepxPjX/7CfnWWfpBnDkoHhqy+xg/iu+1pPf/qFJCTHbfd3VLQ9KppUuSA
FzysrmTsKE6DRdSDfsnfOThVLPxUzVVQ5+cxi+T+iELh5h459SoGHkX/Si2V
DsdwDVNYy4LEH8O8lwe1I5Gkt0o0jx2IiGPWnt8cWRAVGdvMaUmG+Ef5Drsh
Eqb+i6fSztTAQl0hqEMrE9aZ1szLygl4YtsSdJ+bA83tP2Yd8pJQ8Nj/u79s
GlKK6ZzX8X1If+pUG3qkENedzlbawRcOZyDpnxoL2z0V6QoHA6H7QPXc2S1M
uFXeen2vjQZxm9ODOiVesKlg2K9sp8BDVyfukToJXY/VLqrS0VBuVVrbt4iO
y2dmnLhL00GvTH4mY5aAIG5ieQ9SkFdK912sFYdThkuH3hfH4mvv0/yy9mho
UiNCXX75YHx7fYbeGB0pmyfu8Uo4sL/Hkvu+NxItMbu07v82KPCb2wZCIxMa
L3fGHTZno0DeW6l1iQ8m/t0tmdhOYsHkdRe1VDbMyz6eult4E5XfWB2TxwNg
21S5hufJxunuSIeLQyWIuvPOJX0oBspDyf428gnQXneQLWcSjBv5hvrsukiQ
QsIJcupxgrkQ4/LoRA6YxgbVhy4Hgx+532NplxfqLyrIRB32g4XwnpbHIr4Y
KO7WSfzOgoqOy/3D3TwQI5YnjSoGcKCC/5zZTkfR9MaG/CsUqCt0Py8wpMPV
rNp3cpqGzHk12YXvqbBZxxAKYzFQdv7VYbnrdDTp+/F31tzHppKOqsGzobDm
V8y7iLBgPr8px/4LBd4vzhgaWJF4fp1H8zzqh4Vfc1bfksuAVdqFSudz3pCt
jfeIyqRAp6MmYwGNDa8N8jPpB2KhMeIk68zyh5y74jp3f///dJyyeesCFr2H
v1F3kQozBTRu/78bjVORFhprni8bA2LrI72jrFCMJ9H+ad6cCNEjivudTlGh
I/J0LK00E/5hL5bMSbKRUn536NtiP+TllZ7TbqPj4T8D3t/rSBxtds++spsB
d2YIP9exELKVDWFPVzNhJnXIfYs7FU+q6/SHZ8LQqavTYDIehPRmhYT+AX+E
C7ne7OkPhYyun6yuH4F6YY3kH7E8rI5n5ZQov8XJnGMByIpD+o197RvvBkNn
1kJz+/vbWG7e+f7Lb0G4EidjHFruhddJl9Ic7LioOqrxmePsDVX+p1FvvUAs
6c74NFNDgsi7tlOYT2BHbeRyx0pvvGDz9hlqFkI7LoGIOUlCsbtW1u8FBdt1
q63Mkyhw1Ihd4UHlgj/9d+vRIh+YBA27reoIwBYVk+Wy7gwI2zI+l46XglMW
M2tQHoPasRSTs0/ewXW65RPjCPU/XZ847eXmWV7/6bpLf7kIqQhkG6R9OTfF
xdWJHzWer0gUW/fLqJ31htQYaS4WSyLwA8siy9QbT3yVOntFWVg/f/6POVsa
Jusj/nC2D0CSpEV1xZyAg5SvGUh+o2ENW6ygZI7AA/7qARVxGtTi6xyqLpCQ
emQ2t6mBhfL3Z8sGBynQs1PM7B0kMKXQmtVp9wZttYMjet41CLmwd2a9fRqC
2xj4XhWFyhr60jy1Z7g5GyVTGE3BfI7Fi7itFBwaz+1qOR0MT5mKJ+gnsGXT
itFtoxRQLKxFP0uT+PajKqnYkokOvhwvelyQL6pZ2jSawHI+T4XRQWBZuPKb
WgEnzn/gSoYr+WJo58uBwjgCrbeeX93+lgrWtE3HvB0dp4dVpJxTCcwMaSS9
8MrH5bRzysU5AyiJkXq5qSsTS33my6oOJaHccAn7Qn097ObW39aLJVB6X49h
1sTGeSpDrzWNgZUOM/Xz/kwwmw90sX4yIBklwVlQS0eCbQmXGeKFzOd0KncR
FYePGAhtjBH444TOzOtbVEgcm88oTSawW7/itDOTioYzFcb7BRx9ufbYVn4f
C25BW4Vcn5NwvKoikVhJwHGLSpbYWi4cjho+PHWgEP5bYp6TYwM4+cArs29b
MIiSVa+zi/gYN729/WE8AQmVgkqtkQjssO36kl6XCLHOAevaLME/ZxaJM4vY
yF6h4KBuRcOsSK8gZMCBG/qVXM5AUHtD6+NIAj13sxTO8Ai4yZ481im4V/Po
j1zyFhOWtx7g5GIS9b7NrvbHSQibU58lOZPwWvm9XqyaQEq15ApV7Zsobdv5
TGp9JdTM9wXTSgR8wLFXfRLaBzt+6pvzjCYMe9DVlMMJuJoU+f6Uj4TTDj9f
PjcUN5M8YjYVMyB0b7X1/L834GfC3rhB0xsT54q2aL/2xVV7GTmbOiaU7o6a
qQrm8eYvhUkhvQREaGssJgoIVMzcbeAf8IW3+Gch3RVUlH/glxsrUsGluYSY
C/wqv2uItucpAdV/o5S9sxJxy35p7V7fIqi4xpmvuJOJbWbKX5bmxSPjs/gR
S+EhaPxu3HLUhYK92lrOCwTvkb+Bm/yiiECvr1e/dikBf8sX8S7OPhhxyriT
b3Uf64fKWdUbBBx1c5mI5l4S+8vD9fjypGBPmenpiKVhJHhL5LOLJIY/Hrw7
JBeKDIfkk33XmGjsDqwYFvCNg6XL0LkXBGx7azptbf2haHWDXbqeKugztirc
MkHezKw6ZyPyv342TXfZRrt2AyYPea+Y+0bwP92Eg4o=
"], {0.03346181057594935,
0.02273037707683358, 0.01572396825592219, 0.07168762097653392,
0.07743191979156863, 0.019931864724323352`, 0.020533570103990786`,
0.02144463375877508, 0.020319425406997625`, 0.014988188845142855`,
0.03494899505614237, 0.017320009144582402`, 0.033556562522162804`,
0.018419292280655808`, 0.021445099473287856`, 0.04386823220991111,
0.08867177357501299, 0.05884649259960971, 0.02904575340471716,
0.29362376557196895`, 0.042000644645911606`}}]]], "Output",
CellChangeTimes->{3.53161477551545*^9, 3.531614844737278*^9,
3.531616611164926*^9, 3.5316173759290323`*^9, 3.531622866449615*^9,
3.5316270383948936`*^9, 3.531629525401903*^9, 3.53163011501847*^9,
3.531713251275462*^9, 3.531776066980771*^9, 3.5317902002079887`*^9,
3.531790878609565*^9, 3.5320366268534813`*^9, 3.5320398419704847`*^9,
3.532054643543684*^9, 3.532124850950123*^9, 3.5356086735187902`*^9,
3.537097443625086*^9, 3.5374087978440742`*^9, 3.537436922481653*^9,
3.5375205137697906`*^9, 3.537524992868335*^9, 3.5375285230186853`*^9,
3.537848718518716*^9, 3.537939053141158*^9, 3.540983988979106*^9,
3.541051022667272*^9, 3.546671101354122*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"googlePageScore", "[",
RowBox[{"citingcited21Data", ",", "0.9", ",", "100"}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.6051220119467492`"},
{"0.027502673484830528`"},
{"0.03154116964898292`"},
{"0.0069606768670136925`"},
{"0.005832694067427463`"},
{"0.006661999731348607`"},
{"0.005740548993658447`"},
{"0.004803211174283974`"},
{"0.005047872232222396`"},
{"0.005445049274330224`"},
{"0.030788121977146476`"},
{"0.009496255103830063`"},
{"0.0057755005733639364`"},
{"0.005940726222880792`"},
{"0.0056039200911733545`"},
{"0.005435517025319636`"},
{"0.006779564135812524`"},
{"0.010856189296007264`"},
{"0.013452138443224024`"},
{"0.19641730336878424`"},
{"0.004796856341610249`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05238276099254343`"},
{"0.44895083571985284`"},
{"0.014231597235763258`"},
{"0.03107194713428319`"},
{"0.005776705421821915`"},
{"0.027851290303072436`"},
{"0.015347877961672128`"},
{"0.005077027072089561`"},
{"0.0049862291183075`"},
{"0.011000258292342847`"},
{"0.030372268784550842`"},
{"0.006118533012530851`"},
{"0.005194530306395758`"},
{"0.005044980735460598`"},
{"0.004831338491267513`"},
{"0.011721300866494509`"},
{"0.05133057293989249`"},
{"0.011999035783945518`"},
{"0.041262682182293356`"},
{"0.2106489354907809`"},
{"0.00479929215463855`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.11548646269902804`"},
{"0.030974295027767752`"},
{"0.4981603491007488`"},
{"0.007778186681720683`"},
{"0.006213771805398245`"},
{"0.007226702300858817`"},
{"0.005549739591707427`"},
{"0.004874452594733713`"},
{"0.0076543840656088345`"},
{"0.0052796247929179415`"},
{"0.07630856209126974`"},
{"0.013630673988826203`"},
{"0.005358408275898207`"},
{"0.0056960517743850645`"},
{"0.004896962161299504`"},
{"0.006641453570148264`"},
{"0.008881155443444415`"},
{"0.024153896358333246`"},
{"0.018672816899563266`"},
{"0.14177763644787134`"},
{"0.004784414328470551`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005824393939202428`"},
{"0.01207419644463432`"},
{"0.005142990280528656`"},
{"0.6549347520079142`"},
{"0.06239682357109784`"},
{"0.02081868713616234`"},
{"0.027641824272598543`"},
{"0.018273945926724565`"},
{"0.0051134134940085925`"},
{"0.01157707891735479`"},
{"0.010043636293160725`"},
{"0.006148601022210817`"},
{"0.00533978966775831`"},
{"0.004869973789574223`"},
{"0.004887037320258875`"},
{"0.007645641447610957`"},
{"0.008694479800360904`"},
{"0.009601122064072081`"},
{"0.00700291512515573`"},
{"0.10557438161554138`"},
{"0.006394315864069806`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005698524597579644`"},
{"0.00500522592917973`"},
{"0.004913563845617241`"},
{"0.07061694534320903`"},
{"0.6776665928608332`"},
{"0.010748272110204012`"},
{"0.01212486994697884`"},
{"0.035083722004375976`"},
{"0.010166634525416586`"},
{"0.007791753269479382`"},
{"0.009928313108154115`"},
{"0.006798469600329506`"},
{"0.011288245111553945`"},
{"0.007810085686191879`"},
{"0.008113403853616842`"},
{"0.007076789017691971`"},
{"0.005210215679692204`"},
{"0.0060368410150921014`"},
{"0.005386873513467182`"},
{"0.0548194018870485`"},
{"0.03771525709428814`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010743602698978272`"},
{"0.04152775142953562`"},
{"0.0072232166727085`"},
{"0.09680077034955613`"},
{"0.033333239418806816`"},
{"0.5092598470946289`"},
{"0.02085509802485229`"},
{"0.010583854089382836`"},
{"0.005957061026285423`"},
{"0.011625178359338264`"},
{"0.041681583423960854`"},
{"0.009690445198682441`"},
{"0.00608130994485965`"},
{"0.005264817051371871`"},
{"0.004785571222585566`"},
{"0.01005135872406472`"},
{"0.022381584738764226`"},
{"0.011814510044784707`"},
{"0.009430114131193584`"},
{"0.12488694256250168`"},
{"0.0060221437931576366`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0072706954342408505`"},
{"0.0196427265924871`"},
{"0.005194894014998299`"},
{"0.16026872151264587`"},
{"0.049582659946102066`"},
{"0.019158797427264913`"},
{"0.49942028897619195`"},
{"0.02402355903555114`"},
{"0.011339520915516895`"},
{"0.020807977082430013`"},
{"0.010314355183927783`"},
{"0.005844377894638607`"},
{"0.005455961064657638`"},
{"0.0050866467017249145`"},
{"0.004882887053210308`"},
{"0.03424337890636186`"},
{"0.012829513345279955`"},
{"0.008754320374987828`"},
{"0.009804956062641267`"},
{"0.08049681911917748`"},
{"0.005576943355963186`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004938551545141237`"},
{"0.00538400865069409`"},
{"0.004854068300984661`"},
{"0.09576571930838335`"},
{"0.18944227648817905`"},
{"0.01197370169490699`"},
{"0.03461521112886925`"},
{"0.522897641174183`"},
{"0.02853241754959581`"},
{"0.01605961859411592`"},
{"0.007703457717538257`"},
{"0.007019911469362327`"},
{"0.008755658122033789`"},
{"0.008218037477401036`"},
{"0.005099837738531063`"},
{"0.011389999280734284`"},
{"0.004900150070524612`"},
{"0.004846388006061336`"},
{"0.004831027416214686`"},
{"0.01701965545953155`"},
{"0.005752662807013692`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.006096253215182529`"},
{"0.005176634686572175`"},
{"0.008764950121738068`"},
{"0.013903994840442987`"},
{"0.06516821987650646`"},
{"0.008169902838519602`"},
{"0.023406719636083317`"},
{"0.049678958776971274`"},
{"0.6121789587769713`"},
{"0.03271109533731749`"},
{"0.03206195284653371`"},
{"0.00616838015860295`"},
{"0.03651579160274464`"},
{"0.01181231348125081`"},
{"0.021874022088399392`"},
{"0.01586945404864943`"},
{"0.006529014875705049`"},
{"0.013705645746036834`"},
{"0.004960253856310916`"},
{"0.015238343293720757`"},
{"0.010009139895740312`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00741288600445057`"},
{"0.03107655292410795`"},
{"0.005103442222600846`"},
{"0.1280406643845872`"},
{"0.04337190150916704`"},
{"0.02551437142134312`"},
{"0.05002375014843843`"},
{"0.029954358410392234`"},
{"0.03530511196129758`"},
{"0.49358332946102657`"},
{"0.061115585776758935`"},
{"0.007933324039796987`"},
{"0.0201473541818332`"},
{"0.009901230360950624`"},
{"0.006632228951430945`"},
{"0.005819044521202169`"},
{"0.006274427802130284`"},
{"0.0053311338630649035`"},
{"0.0049245416479505155`"},
{"0.016666924820454038`"},
{"0.005867835587015896`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.039173971856320544`"},
{"0.025688451227262793`"},
{"0.03173722985757713`"},
{"0.02070634814861154`"},
{"0.020213706829570355`"},
{"0.017420644742484698`"},
{"0.007323639620918906`"},
{"0.0060856105669806326`"},
{"0.012061563958828014`"},
{"0.015253022938703497`"},
{"0.5950575847497197`"},
{"0.04330787509870959`"},
{"0.0076449274376848946`"},
{"0.007092312392847395`"},
{"0.005087476416227628`"},
{"0.007722036513708732`"},
{"0.024107715168774135`"},
{"0.00945270688668819`"},
{"0.007674914300583055`"},
{"0.07774992905602353`"},
{"0.0194383322317751`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02547582254189884`"},
{"0.010887306162560154`"},
{"0.015513414466758833`"},
{"0.020672166371014503`"},
{"0.049543422248177676`"},
{"0.010956352555160134`"},
{"0.006310516710218604`"},
{"0.008441091110446566`"},
{"0.007819673577046745`"},
{"0.007563215547389675`"},
{"0.10881481841007502`"},
{"0.5851165621054818`"},
{"0.0060639224509329605`"},
{"0.005235365739733197`"},
{"0.005925829665733`"},
{"0.0058469195027615935`"},
{"0.005590461473104524`"},
{"0.006468337036161416`"},
{"0.00599487605833298`"},
{"0.08887027471905215`"},
{"0.012889651547959582`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.007327456008726713`"},
{"0.005362844693592786`"},
{"0.004962218072467436`"},
{"0.008452292291117118`"},
{"0.04118040549381878`"},
{"0.006934533745699928`"},
{"0.005285801112607141`"},
{"0.007681856481260676`"},
{"0.019793107412203945`"},
{"0.009030119148509451`"},
{"0.009037823506608015`"},
{"0.004962218072467436`"},
{"0.6885390947256943`"},
{"0.0321894195927941`"},
{"0.03377651736109837`"},
{"0.01862974933932072`"},
{"0.012936228704481611`"},
{"0.02652671639034925`"},
{"0.005463001348874123`"},
{"0.04434689667232876`"},
{"0.0075816998259793395`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008323624022718967`"},
{"0.0060627065788977745`"},
{"0.005071619480236431`"},
{"0.006403392769062612`"},
{"0.06125386938560137`"},
{"0.006620193071894781`"},
{"0.005474248614067602`"},
{"0.013650717178023691`"},
{"0.010708427353872826`"},
{"0.00922179670588081`"},
{"0.013124202156859853`"},
{"0.004761904761904761`"},
{"0.10774204860718506`"},
{"0.6289919195593857`"},
{"0.021145813361650105`"},
{"0.011080085015870829`"},
{"0.02919839603827353`"},
{"0.010274826748208489`"},
{"0.006279506881729944`"},
{"0.027680793918448347`"},
{"0.006929907790226451`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009875274582076769`"},
{"0.0050668304851260275`"},
{"0.004832272236494284`"},
{"0.007013663948769499`"},
{"0.06091514948434417`"},
{"0.00497300718567333`"},
{"0.005324844558620945`"},
{"0.005277932908894597`"},
{"0.027795524777541977`"},
{"0.007248222197401242`"},
{"0.009687627983171375`"},
{"0.006450724152053314`"},
{"0.08176737778770617`"},
{"0.01925760452734651`"},
{"0.6801020142224208`"},
{"0.005442123682936817`"},
{"0.00497300718567333`"},
{"0.0062630775531479195`"},
{"0.005277932908894597`"},
{"0.01419114635690085`"},
{"0.028264641274805463`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0050844540962734375`"},
{"0.006932392991093982`"},
{"0.005023976096079311`"},
{"0.006909993731762824`"},
{"0.007328859881255481`"},
{"0.00569819380194717`"},
{"0.009447829813983039`"},
{"0.005368924689779146`"},
{"0.005852748691332161`"},
{"0.0048806208363598984`"},
{"0.005622036320221232`"},
{"0.004983657429283226`"},
{"0.007517013659637209`"},
{"0.0053442855045148716`"},
{"0.004855981651095625`"},
{"0.5420954969311237`"},
{"0.1287910835303935`"},
{"0.035836397232020416`"},
{"0.016353521465779085`"},
{"0.1808066435492089`"},
{"0.005265888096855818`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005170426554381267`"},
{"0.010928771274271956`"},
{"0.004852532463307398`"},
{"0.005350287684857272`"},
{"0.004899937722502625`"},
{"0.0066706635806772436`"},
{"0.0053544705018450855`"},
{"0.004777241757526745`"},
{"0.00484416682933177`"},
{"0.004796761570136545`"},
{"0.007866949239192064`"},
{"0.0047814245745145595`"},
{"0.005588708253162673`"},
{"0.005944247697126868`"},
{"0.0047925787531487305`"},
{"0.05756996923305727`"},
{"0.5832148201853453`"},
{"0.04462554492810202`"},
{"0.029574375133617763`"},
{"0.19361609176170957`"},
{"0.004780030302185288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0077651086354372685`"},
{"0.006502942087221443`"},
{"0.006716723684141467`"},
{"0.006588454725989452`"},
{"0.0060463045962002695`"},
{"0.006232722148714532`"},
{"0.005379306013809792`"},
{"0.0047790072896583624`"},
{"0.005517836488613969`"},
{"0.004790979059085884`"},
{"0.005488762191432845`"},
{"0.004802950828513406`"},
{"0.007537645016314362`"},
{"0.005074881019795677`"},
{"0.004816632850716287`"},
{"0.02746208984926067`"},
{"0.06106855688508857`"},
{"0.5914863526353005`"},
{"0.010831591861658104`"},
{"0.2163287243378381`"},
{"0.004782427795209083`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.014604961344744998`"},
{"0.027121141078472806`"},
{"0.0086207712559876`"},
{"0.007736664377289376`"},
{"0.005694550841786418`"},
{"0.006370632572555648`"},
{"0.006367165486756832`"},
{"0.004775773105100027`"},
{"0.004817378134685826`"},
{"0.00480350979149056`"},
{"0.0067381436672302045`"},
{"0.00489365402225979`"},
{"0.004969929909833755`"},
{"0.004976864081431388`"},
{"0.0048208452204846425`"},
{"0.023640186936460972`"},
{"0.10212807525007045`"},
{"0.02119242436249648`"},
{"0.4928443751761059`"},
{"0.23811064736545506`"},
{"0.00477230601930121`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01518056171156541`"},
{"0.012994375094558195`"},
{"0.0065175614353517805`"},
{"0.0184135187950476`"},
{"0.006881856002979637`"},
{"0.00823632751967193`"},
{"0.006779987671640663`"},
{"0.004845747009920378`"},
{"0.004849939122321159`"},
{"0.004805502730872882`"},
{"0.007943718074097427`"},
{"0.005393236889462357`"},
{"0.005396171368142903`"},
{"0.0049832482966659895`"},
{"0.00482772092659702`"},
{"0.02700609158292811`"},
{"0.06445674692654392`"},
{"0.044213036143173186`"},
{"0.022140725930581855`"},
{"0.718911308853127`"},
{"0.005222617914750576`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004817017851803936`"},
{"0.004807292012409964`"},
{"0.004810533958874622`"},
{"0.007173912931609851`"},
{"0.08721432919753593`"},
{"0.005163906123522276`"},
{"0.004940211817460917`"},
{"0.004904550406349685`"},
{"0.005757182326554576`"},
{"0.00498559906796612`"},
{"0.012737093064961916`"},
{"0.0067232823730224755`"},
{"0.005384358483118978`"},
{"0.004836469530591881`"},
{"0.008953741540706755`"},
{"0.00540705210837158`"},
{"0.0048137759053392785`"},
{"0.004949937656854889`"},
{"0.004761904761904761`"},
{"0.018102514463969883`"},
{"0.7887553344170697`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.0334619941536152`", "0.022730473425328836`", "0.015723996825127567`",
"0.07168654394058456`", "0.0774295017879288`", "0.019931795670712224`",
"0.020533420308152923`", "0.02144429176985136`", "0.020319245323144837`",
"0.01498809801169736`", "0.034948853741861`", "0.01731994819295199`",
"0.03355620531987523`", "0.01841918580439204`", "0.02144487070571196`",
"0.04386882259824232`", "0.08867330767068173`", "0.058847411543289325`",
"0.029046100326431085`", "0.29362755203985436`", "0.04199838084056588`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9l2k41WsXxgnJKWWIJBXSSOUUosF9TqLBkDmklKSSqP7/Pdibvc12hpDh
FDtT5mMKZdiFipLtKDIeRFSGMiaN9O4P73U+PNe1Pt3ruZ51P2v9loqzp+XZ
BUJCQnL/P9Jt7u2bTgyicS5fI2czF2nu+xZt2ZACk2hxeqO/Ny7ZGb0Ve0vD
OC9ignuYif3BYoOuATQoJYdv4+QRyC6+NCCbTyJefOJQuCkVUYvmBj8EJ2Pt
cEd93dUAjOCIimQ2DTI9tAhTGzqOz9p0qs5Q4StS5xNhQEWOwciZwVompk4N
LKvbEwwxXVcKPzwMO39Xf7JT7TnKp+osXmcQWJyS1zDSnIt6jz2Hubwe7HCK
zSDXR8BZbZmsVXMyTBmdEeY5NKhqiJBLgrjQO3Hg6D2PSNAf1Mpm8knE2L8r
vOxOYveToTzTkGCMa4WSwyuTIWYnsrN6mRcK6WFKPUYUFJQdKl2cS2LVmGTE
wgYCMt8UnWyFOXiQulZX6FAu1M5oWX66wcFVc4ne08oZED3laRc22wDL4eit
7tkEZk3crYOiHiL3WXpNRVkynM0Gp7rf9MFdvEJerIeNNqWFf3MJLxhZpCtX
3/JB96kn/ZY8Kt7vKxza84UAN6FCVsuBDaMKFR/5FAoad8Xv/swpwc5VEgqu
o2HYENpdWzxNQWri2T+rrGnoXWxp2L6UhIbrqiRpLSZ69K74HdL0R6NNeVgj
7yayE1NDvqyJgW7gR5G69Y8hsVDtSstNAosuNnVYdNOQ4dahc7ySg8mCicmX
UhScuMCt0Pv8Fg4X9b55TRdidDb2CssiDgOZCy6tM+PCVpVdc+7+DZxISWf+
M0VinJW7u+JeCMp6jRc/jg6Ed9JQoNF2L2z4s6tPo4+C60nX0q5NE4j95bnC
Q5SEsuFfkLBgo71gu9WFJj+0b9jcUJMTgOvzC8vkC71xMdxG6+NCHhYxDBTG
NBk4YhqwxPYYDd+pjYqOviQ+6Zyu0Vcm4fGmoeqTbDFiKx92XSl8h6rjt3M0
RYLR3LiW/bGVg7Kp/SdYs6lYfvxUvH5LIDRfczr0R9nQH29NMbYJBNc09PD9
Tibi7+dyj6wJgYtF0ghtjo3YjYWpj2/7YpvFAfmIn96ozNdMNjtGQdmyYnX5
SjoaM+W7wqSoWCcT9/awdB4sqJHibkfvIKG7d+qhUDDeW3OUlA0ycNxtJXVF
vA/6FrzxmHhWjoftdqOS0qlY/SvCrNu4Hz/HByYkjsdhbZFn18+8INg6cF08
XOkoYA8vnGoKgXGQaffhYxnYrVt8La4zABcqD2qXDdPxe/ibqMgoCqxCTOYX
JRAIIYU4TXGBmDSZqtjxIR7FD+SKtXZwYCtqzVIwD8COXiGdv75W4yBpPJqX
SweVqL7S/8wHjtlG0nqrYxHZd75q30EKzL7xGIUBtRhJaJt755wDw/EglRNJ
MShQEw/0ne2DWWLUo9RbN/FhUz9PQy8E5wP2lxaaxWHpxwiLu2uDwHeo1Tea
pEE2nDw7Z0dF0ecCqwdtJLZM/ymyXIhEda2Iij0nFU0Px1UcjUIRlZA3Vz/m
h8wssbGk5YFwCgwPupxYCnUjbZuuDiqkpERtr+4W1PnRruZQSSooeoUSPW8I
uL/326QYWI6xiF/z6aiHyQ2OxN9BHLzS866Wq0iF6Gd2WwyvH08dhVUSdt2G
ZsBfj8evRCFX7/z2nAg2ljgMq47UeMNtmXmo97gfftNJtkhq9YXPjdYD0YMk
buiavLpjFYKNu5+KbpMhkb+03ampi4BSxbolJc8JqPy0r7p1KRrfn07kKEbR
sNvxl7/zVzrSNo4eUdCiwKhlruj4Jz+ot/+8WewVjuiCVaa9BUUQE1vYeJrn
i5RepxPjX/7CfnWWfpBnDkoHhqy+xg/iu+1pPf/qFJCTHbfd3VLQ9KppUuSA
FzysrmTsKE6DRdSDfsnfOThVLPxUzVVQ5+cxi+T+iELh5h459SoGHkX/Si2V
DsdwDVNYy4LEH8O8lwe1I5Gkt0o0jx2IiGPWnt8cWRAVGdvMaUmG+Ef5Drsh
Eqb+i6fSztTAQl0hqEMrE9aZ1szLygl4YtsSdJ+bA83tP2Yd8pJQ8Nj/u79s
GlKK6ZzX8X1If+pUG3qkENedzlbawRcOZyDpnxoL2z0V6QoHA6H7QPXc2S1M
uFXeen2vjQZxm9ODOiVesKlg2K9sp8BDVyfukToJXY/VLqrS0VBuVVrbt4iO
y2dmnLhL00GvTH4mY5aAIG5ieQ9SkFdK912sFYdThkuH3hfH4mvv0/yy9mho
UiNCXX75YHx7fYbeGB0pmyfu8Uo4sL/Hkvu+NxItMbu07v82KPCb2wZCIxMa
L3fGHTZno0DeW6l1iQ8m/t0tmdhOYsHkdRe1VDbMyz6eult4E5XfWB2TxwNg
21S5hufJxunuSIeLQyWIuvPOJX0oBspDyf428gnQXneQLWcSjBv5hvrsukiQ
QsIJcupxgrkQ4/LoRA6YxgbVhy4Hgx+532NplxfqLyrIRB32g4XwnpbHIr4Y
KO7WSfzOgoqOy/3D3TwQI5YnjSoGcKCC/5zZTkfR9MaG/CsUqCt0Py8wpMPV
rNp3cpqGzHk12YXvqbBZxxAKYzFQdv7VYbnrdDTp+/F31tzHppKOqsGzobDm
V8y7iLBgPr8px/4LBd4vzhgaWJF4fp1H8zzqh4Vfc1bfksuAVdqFSudz3pCt
jfeIyqRAp6MmYwGNDa8N8jPpB2KhMeIk68zyh5y74jp3f///dJyyeesCFr2H
v1F3kQozBTRu/78bjVORFhprni8bA2LrI72jrFCMJ9H+ad6cCNEjivudTlGh
I/J0LK00E/5hL5bMSbKRUn536NtiP+TllZ7TbqPj4T8D3t/rSBxtds++spsB
d2YIP9exELKVDWFPVzNhJnXIfYs7FU+q6/SHZ8LQqavTYDIehPRmhYT+AX+E
C7ne7OkPhYyun6yuH4F6YY3kH7E8rI5n5ZQov8XJnGMByIpD+o197RvvBkNn
1kJz+/vbWG7e+f7Lb0G4EidjHFruhddJl9Ic7LioOqrxmePsDVX+p1FvvUAs
6c74NFNDgsi7tlOYT2BHbeRyx0pvvGDz9hlqFkI7LoGIOUlCsbtW1u8FBdt1
q63Mkyhw1Ihd4UHlgj/9d+vRIh+YBA27reoIwBYVk+Wy7gwI2zI+l46XglMW
M2tQHoPasRSTs0/ewXW65RPjCPU/XZ847eXmWV7/6bpLf7kIqQhkG6R9OTfF
xdWJHzWer0gUW/fLqJ31htQYaS4WSyLwA8siy9QbT3yVOntFWVg/f/6POVsa
Jusj/nC2D0CSpEV1xZyAg5SvGUh+o2ENW6ygZI7AA/7qARVxGtTi6xyqLpCQ
emQ2t6mBhfL3Z8sGBynQs1PM7B0kMKXQmtVp9wZttYMjet41CLmwd2a9fRqC
2xj4XhWFyhr60jy1Z7g5GyVTGE3BfI7Fi7itFBwaz+1qOR0MT5mKJ+gnsGXT
itFtoxRQLKxFP0uT+PajKqnYkokOvhwvelyQL6pZ2jSawHI+T4XRQWBZuPKb
WgEnzn/gSoYr+WJo58uBwjgCrbeeX93+lgrWtE3HvB0dp4dVpJxTCcwMaSS9
8MrH5bRzysU5AyiJkXq5qSsTS33my6oOJaHccAn7Qn097ObW39aLJVB6X49h
1sTGeSpDrzWNgZUOM/Xz/kwwmw90sX4yIBklwVlQS0eCbQmXGeKFzOd0KncR
FYePGAhtjBH444TOzOtbVEgcm88oTSawW7/itDOTioYzFcb7BRx9ufbYVn4f
C25BW4Vcn5NwvKoikVhJwHGLSpbYWi4cjho+PHWgEP5bYp6TYwM4+cArs29b
MIiSVa+zi/gYN729/WE8AQmVgkqtkQjssO36kl6XCLHOAevaLME/ZxaJM4vY
yF6h4KBuRcOsSK8gZMCBG/qVXM5AUHtD6+NIAj13sxTO8Ai4yZ481im4V/Po
j1zyFhOWtx7g5GIS9b7NrvbHSQibU58lOZPwWvm9XqyaQEq15ApV7Zsobdv5
TGp9JdTM9wXTSgR8wLFXfRLaBzt+6pvzjCYMe9DVlMMJuJoU+f6Uj4TTDj9f
PjcUN5M8YjYVMyB0b7X1/L834GfC3rhB0xsT54q2aL/2xVV7GTmbOiaU7o6a
qQrm8eYvhUkhvQREaGssJgoIVMzcbeAf8IW3+Gch3RVUlH/glxsrUsGluYSY
C/wqv2uItucpAdV/o5S9sxJxy35p7V7fIqi4xpmvuJOJbWbKX5bmxSPjs/gR
S+EhaPxu3HLUhYK92lrOCwTvkb+Bm/yiiECvr1e/dikBf8sX8S7OPhhxyriT
b3Uf64fKWdUbBBx1c5mI5l4S+8vD9fjypGBPmenpiKVhJHhL5LOLJIY/Hrw7
JBeKDIfkk33XmGjsDqwYFvCNg6XL0LkXBGx7azptbf2haHWDXbqeKugztirc
MkHezKw6ZyPyv342TXfZRrt2AyYPea+Y+0bwP92Eg4o=
"], {0.0334619941536152,
0.022730473425328836`, 0.015723996825127567`, 0.07168654394058456,
0.0774295017879288, 0.019931795670712224`, 0.020533420308152923`,
0.02144429176985136, 0.020319245323144837`, 0.01498809801169736,
0.034948853741861, 0.01731994819295199, 0.03355620531987523,
0.01841918580439204, 0.02144487070571196, 0.04386882259824232,
0.08867330767068173, 0.058847411543289325`, 0.029046100326431085`,
0.29362755203985436`, 0.04199838084056588}}]]], "Output",
CellChangeTimes->{3.5316147892594643`*^9, 3.531614848354909*^9,
3.531616611284047*^9, 3.5316173760450373`*^9, 3.531622866587873*^9,
3.5316270385236273`*^9, 3.5316295255429277`*^9, 3.53163011515897*^9,
3.5317132514244432`*^9, 3.531776067107152*^9, 3.531790200308999*^9,
3.531790878735016*^9, 3.5320366269852333`*^9, 3.532039842062174*^9,
3.5320546437052803`*^9, 3.532124851070908*^9, 3.5356086736263227`*^9,
3.537097443724185*^9, 3.537408797957262*^9, 3.537436922595622*^9,
3.537520513863812*^9, 3.537524992962627*^9, 3.537528523113391*^9,
3.5378487186122026`*^9, 3.537939053236199*^9, 3.540983989062402*^9,
3.541051022772862*^9, 3.5466711014502487`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "=",
RowBox[{"googlePageScore", "[",
RowBox[{"citingcited21Data", ",", "0.9", ",", "200"}], "]"}]}], ")"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614803398451*^9}, {3.531614879893703*^9,
3.5316149023127337`*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.6051220119467492`"},
{"0.027502673484830528`"},
{"0.03154116964898292`"},
{"0.0069606768670136925`"},
{"0.005832694067427463`"},
{"0.006661999731348607`"},
{"0.005740548993658447`"},
{"0.004803211174283974`"},
{"0.005047872232222396`"},
{"0.005445049274330224`"},
{"0.030788121977146476`"},
{"0.009496255103830063`"},
{"0.0057755005733639364`"},
{"0.005940726222880792`"},
{"0.0056039200911733545`"},
{"0.005435517025319636`"},
{"0.006779564135812524`"},
{"0.010856189296007264`"},
{"0.013452138443224024`"},
{"0.19641730336878424`"},
{"0.004796856341610249`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05238276099254343`"},
{"0.44895083571985284`"},
{"0.014231597235763258`"},
{"0.03107194713428319`"},
{"0.005776705421821915`"},
{"0.027851290303072436`"},
{"0.015347877961672128`"},
{"0.005077027072089561`"},
{"0.0049862291183075`"},
{"0.011000258292342847`"},
{"0.030372268784550842`"},
{"0.006118533012530851`"},
{"0.005194530306395758`"},
{"0.005044980735460598`"},
{"0.004831338491267513`"},
{"0.011721300866494509`"},
{"0.05133057293989249`"},
{"0.011999035783945518`"},
{"0.041262682182293356`"},
{"0.2106489354907809`"},
{"0.00479929215463855`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.11548646269902804`"},
{"0.030974295027767752`"},
{"0.4981603491007488`"},
{"0.007778186681720683`"},
{"0.006213771805398245`"},
{"0.007226702300858817`"},
{"0.005549739591707427`"},
{"0.004874452594733713`"},
{"0.0076543840656088345`"},
{"0.0052796247929179415`"},
{"0.07630856209126974`"},
{"0.013630673988826203`"},
{"0.005358408275898207`"},
{"0.0056960517743850645`"},
{"0.004896962161299504`"},
{"0.006641453570148264`"},
{"0.008881155443444415`"},
{"0.024153896358333246`"},
{"0.018672816899563266`"},
{"0.14177763644787134`"},
{"0.004784414328470551`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005824393939202428`"},
{"0.01207419644463432`"},
{"0.005142990280528656`"},
{"0.6549347520079142`"},
{"0.06239682357109784`"},
{"0.02081868713616234`"},
{"0.027641824272598543`"},
{"0.018273945926724565`"},
{"0.0051134134940085925`"},
{"0.01157707891735479`"},
{"0.010043636293160725`"},
{"0.006148601022210817`"},
{"0.00533978966775831`"},
{"0.004869973789574223`"},
{"0.004887037320258875`"},
{"0.007645641447610957`"},
{"0.008694479800360904`"},
{"0.009601122064072081`"},
{"0.00700291512515573`"},
{"0.10557438161554138`"},
{"0.006394315864069806`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005698524597579644`"},
{"0.00500522592917973`"},
{"0.004913563845617241`"},
{"0.07061694534320903`"},
{"0.6776665928608332`"},
{"0.010748272110204012`"},
{"0.01212486994697884`"},
{"0.035083722004375976`"},
{"0.010166634525416586`"},
{"0.007791753269479382`"},
{"0.009928313108154115`"},
{"0.006798469600329506`"},
{"0.011288245111553945`"},
{"0.007810085686191879`"},
{"0.008113403853616842`"},
{"0.007076789017691971`"},
{"0.005210215679692204`"},
{"0.0060368410150921014`"},
{"0.005386873513467182`"},
{"0.0548194018870485`"},
{"0.03771525709428814`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010743602698978272`"},
{"0.04152775142953562`"},
{"0.0072232166727085`"},
{"0.09680077034955613`"},
{"0.033333239418806816`"},
{"0.5092598470946289`"},
{"0.02085509802485229`"},
{"0.010583854089382836`"},
{"0.005957061026285423`"},
{"0.011625178359338264`"},
{"0.041681583423960854`"},
{"0.009690445198682441`"},
{"0.00608130994485965`"},
{"0.005264817051371871`"},
{"0.004785571222585566`"},
{"0.01005135872406472`"},
{"0.022381584738764226`"},
{"0.011814510044784707`"},
{"0.009430114131193584`"},
{"0.12488694256250168`"},
{"0.0060221437931576366`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0072706954342408505`"},
{"0.0196427265924871`"},
{"0.005194894014998299`"},
{"0.16026872151264587`"},
{"0.049582659946102066`"},
{"0.019158797427264913`"},
{"0.49942028897619195`"},
{"0.02402355903555114`"},
{"0.011339520915516895`"},
{"0.020807977082430013`"},
{"0.010314355183927783`"},
{"0.005844377894638607`"},
{"0.005455961064657638`"},
{"0.0050866467017249145`"},
{"0.004882887053210308`"},
{"0.03424337890636186`"},
{"0.012829513345279955`"},
{"0.008754320374987828`"},
{"0.009804956062641267`"},
{"0.08049681911917748`"},
{"0.005576943355963186`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004938551545141237`"},
{"0.00538400865069409`"},
{"0.004854068300984661`"},
{"0.09576571930838335`"},
{"0.18944227648817905`"},
{"0.01197370169490699`"},
{"0.03461521112886925`"},
{"0.522897641174183`"},
{"0.02853241754959581`"},
{"0.01605961859411592`"},
{"0.007703457717538257`"},
{"0.007019911469362327`"},
{"0.008755658122033789`"},
{"0.008218037477401036`"},
{"0.005099837738531063`"},
{"0.011389999280734284`"},
{"0.004900150070524612`"},
{"0.004846388006061336`"},
{"0.004831027416214686`"},
{"0.01701965545953155`"},
{"0.005752662807013692`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.006096253215182529`"},
{"0.005176634686572175`"},
{"0.008764950121738068`"},
{"0.013903994840442987`"},
{"0.06516821987650646`"},
{"0.008169902838519602`"},
{"0.023406719636083317`"},
{"0.049678958776971274`"},
{"0.6121789587769713`"},
{"0.03271109533731749`"},
{"0.03206195284653371`"},
{"0.00616838015860295`"},
{"0.03651579160274464`"},
{"0.01181231348125081`"},
{"0.021874022088399392`"},
{"0.01586945404864943`"},
{"0.006529014875705049`"},
{"0.013705645746036834`"},
{"0.004960253856310916`"},
{"0.015238343293720757`"},
{"0.010009139895740312`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00741288600445057`"},
{"0.03107655292410795`"},
{"0.005103442222600846`"},
{"0.1280406643845872`"},
{"0.04337190150916704`"},
{"0.02551437142134312`"},
{"0.05002375014843843`"},
{"0.029954358410392234`"},
{"0.03530511196129758`"},
{"0.49358332946102657`"},
{"0.061115585776758935`"},
{"0.007933324039796987`"},
{"0.0201473541818332`"},
{"0.009901230360950624`"},
{"0.006632228951430945`"},
{"0.005819044521202169`"},
{"0.006274427802130284`"},
{"0.0053311338630649035`"},
{"0.0049245416479505155`"},
{"0.016666924820454038`"},
{"0.005867835587015896`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.039173971856320544`"},
{"0.025688451227262793`"},
{"0.03173722985757713`"},
{"0.02070634814861154`"},
{"0.020213706829570355`"},
{"0.017420644742484698`"},
{"0.007323639620918906`"},
{"0.0060856105669806326`"},
{"0.012061563958828014`"},
{"0.015253022938703497`"},
{"0.5950575847497197`"},
{"0.04330787509870959`"},
{"0.0076449274376848946`"},
{"0.007092312392847395`"},
{"0.005087476416227628`"},
{"0.007722036513708732`"},
{"0.024107715168774135`"},
{"0.00945270688668819`"},
{"0.007674914300583055`"},
{"0.07774992905602353`"},
{"0.0194383322317751`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02547582254189884`"},
{"0.010887306162560154`"},
{"0.015513414466758833`"},
{"0.020672166371014503`"},
{"0.049543422248177676`"},
{"0.010956352555160134`"},
{"0.006310516710218604`"},
{"0.008441091110446566`"},
{"0.007819673577046745`"},
{"0.007563215547389675`"},
{"0.10881481841007502`"},
{"0.5851165621054818`"},
{"0.0060639224509329605`"},
{"0.005235365739733197`"},
{"0.005925829665733`"},
{"0.0058469195027615935`"},
{"0.005590461473104524`"},
{"0.006468337036161416`"},
{"0.00599487605833298`"},
{"0.08887027471905215`"},
{"0.012889651547959582`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.007327456008726713`"},
{"0.005362844693592786`"},
{"0.004962218072467436`"},
{"0.008452292291117118`"},
{"0.04118040549381878`"},
{"0.006934533745699928`"},
{"0.005285801112607141`"},
{"0.007681856481260676`"},
{"0.019793107412203945`"},
{"0.009030119148509451`"},
{"0.009037823506608015`"},
{"0.004962218072467436`"},
{"0.6885390947256943`"},
{"0.0321894195927941`"},
{"0.03377651736109837`"},
{"0.01862974933932072`"},
{"0.012936228704481611`"},
{"0.02652671639034925`"},
{"0.005463001348874123`"},
{"0.04434689667232876`"},
{"0.0075816998259793395`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008323624022718967`"},
{"0.0060627065788977745`"},
{"0.005071619480236431`"},
{"0.006403392769062612`"},
{"0.06125386938560137`"},
{"0.006620193071894781`"},
{"0.005474248614067602`"},
{"0.013650717178023691`"},
{"0.010708427353872826`"},
{"0.00922179670588081`"},
{"0.013124202156859853`"},
{"0.004761904761904761`"},
{"0.10774204860718506`"},
{"0.6289919195593857`"},
{"0.021145813361650105`"},
{"0.011080085015870829`"},
{"0.02919839603827353`"},
{"0.010274826748208489`"},
{"0.006279506881729944`"},
{"0.027680793918448347`"},
{"0.006929907790226451`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009875274582076769`"},
{"0.0050668304851260275`"},
{"0.004832272236494284`"},
{"0.007013663948769499`"},
{"0.06091514948434417`"},
{"0.00497300718567333`"},
{"0.005324844558620945`"},
{"0.005277932908894597`"},
{"0.027795524777541977`"},
{"0.007248222197401242`"},
{"0.009687627983171375`"},
{"0.006450724152053314`"},
{"0.08176737778770617`"},
{"0.01925760452734651`"},
{"0.6801020142224208`"},
{"0.005442123682936817`"},
{"0.00497300718567333`"},
{"0.0062630775531479195`"},
{"0.005277932908894597`"},
{"0.01419114635690085`"},
{"0.028264641274805463`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0050844540962734375`"},
{"0.006932392991093982`"},
{"0.005023976096079311`"},
{"0.006909993731762824`"},
{"0.007328859881255481`"},
{"0.00569819380194717`"},
{"0.009447829813983039`"},
{"0.005368924689779146`"},
{"0.005852748691332161`"},
{"0.0048806208363598984`"},
{"0.005622036320221232`"},
{"0.004983657429283226`"},
{"0.007517013659637209`"},
{"0.0053442855045148716`"},
{"0.004855981651095625`"},
{"0.5420954969311237`"},
{"0.1287910835303935`"},
{"0.035836397232020416`"},
{"0.016353521465779085`"},
{"0.1808066435492089`"},
{"0.005265888096855818`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005170426554381267`"},
{"0.010928771274271956`"},
{"0.004852532463307398`"},
{"0.005350287684857272`"},
{"0.004899937722502625`"},
{"0.0066706635806772436`"},
{"0.0053544705018450855`"},
{"0.004777241757526745`"},
{"0.00484416682933177`"},
{"0.004796761570136545`"},
{"0.007866949239192064`"},
{"0.0047814245745145595`"},
{"0.005588708253162673`"},
{"0.005944247697126868`"},
{"0.0047925787531487305`"},
{"0.05756996923305727`"},
{"0.5832148201853453`"},
{"0.04462554492810202`"},
{"0.029574375133617763`"},
{"0.19361609176170957`"},
{"0.004780030302185288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0077651086354372685`"},
{"0.006502942087221443`"},
{"0.006716723684141467`"},
{"0.006588454725989452`"},
{"0.0060463045962002695`"},
{"0.006232722148714532`"},
{"0.005379306013809792`"},
{"0.0047790072896583624`"},
{"0.005517836488613969`"},
{"0.004790979059085884`"},
{"0.005488762191432845`"},
{"0.004802950828513406`"},
{"0.007537645016314362`"},
{"0.005074881019795677`"},
{"0.004816632850716287`"},
{"0.02746208984926067`"},
{"0.06106855688508857`"},
{"0.5914863526353005`"},
{"0.010831591861658104`"},
{"0.2163287243378381`"},
{"0.004782427795209083`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.014604961344744998`"},
{"0.027121141078472806`"},
{"0.0086207712559876`"},
{"0.007736664377289376`"},
{"0.005694550841786418`"},
{"0.006370632572555648`"},
{"0.006367165486756832`"},
{"0.004775773105100027`"},
{"0.004817378134685826`"},
{"0.00480350979149056`"},
{"0.0067381436672302045`"},
{"0.00489365402225979`"},
{"0.004969929909833755`"},
{"0.004976864081431388`"},
{"0.0048208452204846425`"},
{"0.023640186936460972`"},
{"0.10212807525007045`"},
{"0.02119242436249648`"},
{"0.4928443751761059`"},
{"0.23811064736545506`"},
{"0.00477230601930121`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01518056171156541`"},
{"0.012994375094558195`"},
{"0.0065175614353517805`"},
{"0.0184135187950476`"},
{"0.006881856002979637`"},
{"0.00823632751967193`"},
{"0.006779987671640663`"},
{"0.004845747009920378`"},
{"0.004849939122321159`"},
{"0.004805502730872882`"},
{"0.007943718074097427`"},
{"0.005393236889462357`"},
{"0.005396171368142903`"},
{"0.0049832482966659895`"},
{"0.00482772092659702`"},
{"0.02700609158292811`"},
{"0.06445674692654392`"},
{"0.044213036143173186`"},
{"0.022140725930581855`"},
{"0.718911308853127`"},
{"0.005222617914750576`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004817017851803936`"},
{"0.004807292012409964`"},
{"0.004810533958874622`"},
{"0.007173912931609851`"},
{"0.08721432919753593`"},
{"0.005163906123522276`"},
{"0.004940211817460917`"},
{"0.004904550406349685`"},
{"0.005757182326554576`"},
{"0.00498559906796612`"},
{"0.012737093064961916`"},
{"0.0067232823730224755`"},
{"0.005384358483118978`"},
{"0.004836469530591881`"},
{"0.008953741540706755`"},
{"0.00540705210837158`"},
{"0.0048137759053392785`"},
{"0.004949937656854889`"},
{"0.004761904761904761`"},
{"0.018102514463969883`"},
{"0.7887553344170697`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03346199416399495`", "0.02273047343078459`", "0.015723996826755456`",
"0.07168654388094363`", "0.07742950165199784`", "0.01993179566693772`",
"0.02053342029990574`", "0.021444291750851545`", "0.020319245313387944`",
"0.014988098006725206`", "0.034948853734028396`",
"0.01731994818954596`", "0.03355620530142517`", "0.01841918579886483`",
"0.021444870693491037`", "0.043868822631392565`", "0.08867330775662671`",
"0.058847411594883`", "0.029046100345864675`", "0.2936275522522333`",
"0.041998380709361106`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9l2k41WsXxgnJKWWIJBXSSOUUosF9TqLBkDmklKSSqP7/Pdibvc12hpDh
FDtT5mMKZdiFipLtKDIeRFSGMiaN9O4P73U+PNe1Pt3ruZ51P2v9loqzp+XZ
BUJCQnL/P9Jt7u2bTgyicS5fI2czF2nu+xZt2ZACk2hxeqO/Ny7ZGb0Ve0vD
OC9ignuYif3BYoOuATQoJYdv4+QRyC6+NCCbTyJefOJQuCkVUYvmBj8EJ2Pt
cEd93dUAjOCIimQ2DTI9tAhTGzqOz9p0qs5Q4StS5xNhQEWOwciZwVompk4N
LKvbEwwxXVcKPzwMO39Xf7JT7TnKp+osXmcQWJyS1zDSnIt6jz2Hubwe7HCK
zSDXR8BZbZmsVXMyTBmdEeY5NKhqiJBLgrjQO3Hg6D2PSNAf1Mpm8knE2L8r
vOxOYveToTzTkGCMa4WSwyuTIWYnsrN6mRcK6WFKPUYUFJQdKl2cS2LVmGTE
wgYCMt8UnWyFOXiQulZX6FAu1M5oWX66wcFVc4ne08oZED3laRc22wDL4eit
7tkEZk3crYOiHiL3WXpNRVkynM0Gp7rf9MFdvEJerIeNNqWFf3MJLxhZpCtX
3/JB96kn/ZY8Kt7vKxza84UAN6FCVsuBDaMKFR/5FAoad8Xv/swpwc5VEgqu
o2HYENpdWzxNQWri2T+rrGnoXWxp2L6UhIbrqiRpLSZ69K74HdL0R6NNeVgj
7yayE1NDvqyJgW7gR5G69Y8hsVDtSstNAosuNnVYdNOQ4dahc7ySg8mCicmX
UhScuMCt0Pv8Fg4X9b55TRdidDb2CssiDgOZCy6tM+PCVpVdc+7+DZxISWf+
M0VinJW7u+JeCMp6jRc/jg6Ed9JQoNF2L2z4s6tPo4+C60nX0q5NE4j95bnC
Q5SEsuFfkLBgo71gu9WFJj+0b9jcUJMTgOvzC8vkC71xMdxG6+NCHhYxDBTG
NBk4YhqwxPYYDd+pjYqOviQ+6Zyu0Vcm4fGmoeqTbDFiKx92XSl8h6rjt3M0
RYLR3LiW/bGVg7Kp/SdYs6lYfvxUvH5LIDRfczr0R9nQH29NMbYJBNc09PD9
Tibi7+dyj6wJgYtF0ghtjo3YjYWpj2/7YpvFAfmIn96ozNdMNjtGQdmyYnX5
SjoaM+W7wqSoWCcT9/awdB4sqJHibkfvIKG7d+qhUDDeW3OUlA0ycNxtJXVF
vA/6FrzxmHhWjoftdqOS0qlY/SvCrNu4Hz/HByYkjsdhbZFn18+8INg6cF08
XOkoYA8vnGoKgXGQaffhYxnYrVt8La4zABcqD2qXDdPxe/ibqMgoCqxCTOYX
JRAIIYU4TXGBmDSZqtjxIR7FD+SKtXZwYCtqzVIwD8COXiGdv75W4yBpPJqX
SweVqL7S/8wHjtlG0nqrYxHZd75q30EKzL7xGIUBtRhJaJt755wDw/EglRNJ
MShQEw/0ne2DWWLUo9RbN/FhUz9PQy8E5wP2lxaaxWHpxwiLu2uDwHeo1Tea
pEE2nDw7Z0dF0ecCqwdtJLZM/ymyXIhEda2Iij0nFU0Px1UcjUIRlZA3Vz/m
h8wssbGk5YFwCgwPupxYCnUjbZuuDiqkpERtr+4W1PnRruZQSSooeoUSPW8I
uL/326QYWI6xiF/z6aiHyQ2OxN9BHLzS866Wq0iF6Gd2WwyvH08dhVUSdt2G
ZsBfj8evRCFX7/z2nAg2ljgMq47UeMNtmXmo97gfftNJtkhq9YXPjdYD0YMk
buiavLpjFYKNu5+KbpMhkb+03ampi4BSxbolJc8JqPy0r7p1KRrfn07kKEbR
sNvxl7/zVzrSNo4eUdCiwKhlruj4Jz+ot/+8WewVjuiCVaa9BUUQE1vYeJrn
i5RepxPjX/7CfnWWfpBnDkoHhqy+xg/iu+1pPf/qFJCTHbfd3VLQ9KppUuSA
FzysrmTsKE6DRdSDfsnfOThVLPxUzVVQ5+cxi+T+iELh5h459SoGHkX/Si2V
DsdwDVNYy4LEH8O8lwe1I5Gkt0o0jx2IiGPWnt8cWRAVGdvMaUmG+Ef5Drsh
Eqb+i6fSztTAQl0hqEMrE9aZ1szLygl4YtsSdJ+bA83tP2Yd8pJQ8Nj/u79s
GlKK6ZzX8X1If+pUG3qkENedzlbawRcOZyDpnxoL2z0V6QoHA6H7QPXc2S1M
uFXeen2vjQZxm9ODOiVesKlg2K9sp8BDVyfukToJXY/VLqrS0VBuVVrbt4iO
y2dmnLhL00GvTH4mY5aAIG5ieQ9SkFdK912sFYdThkuH3hfH4mvv0/yy9mho
UiNCXX75YHx7fYbeGB0pmyfu8Uo4sL/Hkvu+NxItMbu07v82KPCb2wZCIxMa
L3fGHTZno0DeW6l1iQ8m/t0tmdhOYsHkdRe1VDbMyz6eult4E5XfWB2TxwNg
21S5hufJxunuSIeLQyWIuvPOJX0oBspDyf428gnQXneQLWcSjBv5hvrsukiQ
QsIJcupxgrkQ4/LoRA6YxgbVhy4Hgx+532NplxfqLyrIRB32g4XwnpbHIr4Y
KO7WSfzOgoqOy/3D3TwQI5YnjSoGcKCC/5zZTkfR9MaG/CsUqCt0Py8wpMPV
rNp3cpqGzHk12YXvqbBZxxAKYzFQdv7VYbnrdDTp+/F31tzHppKOqsGzobDm
V8y7iLBgPr8px/4LBd4vzhgaWJF4fp1H8zzqh4Vfc1bfksuAVdqFSudz3pCt
jfeIyqRAp6MmYwGNDa8N8jPpB2KhMeIk68zyh5y74jp3f///dJyyeesCFr2H
v1F3kQozBTRu/78bjVORFhprni8bA2LrI72jrFCMJ9H+ad6cCNEjivudTlGh
I/J0LK00E/5hL5bMSbKRUn536NtiP+TllZ7TbqPj4T8D3t/rSBxtds++spsB
d2YIP9exELKVDWFPVzNhJnXIfYs7FU+q6/SHZ8LQqavTYDIehPRmhYT+AX+E
C7ne7OkPhYyun6yuH4F6YY3kH7E8rI5n5ZQov8XJnGMByIpD+o197RvvBkNn
1kJz+/vbWG7e+f7Lb0G4EidjHFruhddJl9Ic7LioOqrxmePsDVX+p1FvvUAs
6c74NFNDgsi7tlOYT2BHbeRyx0pvvGDz9hlqFkI7LoGIOUlCsbtW1u8FBdt1
q63Mkyhw1Ihd4UHlgj/9d+vRIh+YBA27reoIwBYVk+Wy7gwI2zI+l46XglMW
M2tQHoPasRSTs0/ewXW65RPjCPU/XZ847eXmWV7/6bpLf7kIqQhkG6R9OTfF
xdWJHzWer0gUW/fLqJ31htQYaS4WSyLwA8siy9QbT3yVOntFWVg/f/6POVsa
Jusj/nC2D0CSpEV1xZyAg5SvGUh+o2ENW6ygZI7AA/7qARVxGtTi6xyqLpCQ
emQ2t6mBhfL3Z8sGBynQs1PM7B0kMKXQmtVp9wZttYMjet41CLmwd2a9fRqC
2xj4XhWFyhr60jy1Z7g5GyVTGE3BfI7Fi7itFBwaz+1qOR0MT5mKJ+gnsGXT
itFtoxRQLKxFP0uT+PajKqnYkokOvhwvelyQL6pZ2jSawHI+T4XRQWBZuPKb
WgEnzn/gSoYr+WJo58uBwjgCrbeeX93+lgrWtE3HvB0dp4dVpJxTCcwMaSS9
8MrH5bRzysU5AyiJkXq5qSsTS33my6oOJaHccAn7Qn097ObW39aLJVB6X49h
1sTGeSpDrzWNgZUOM/Xz/kwwmw90sX4yIBklwVlQS0eCbQmXGeKFzOd0KncR
FYePGAhtjBH444TOzOtbVEgcm88oTSawW7/itDOTioYzFcb7BRx9ufbYVn4f
C25BW4Vcn5NwvKoikVhJwHGLSpbYWi4cjho+PHWgEP5bYp6TYwM4+cArs29b
MIiSVa+zi/gYN729/WE8AQmVgkqtkQjssO36kl6XCLHOAevaLME/ZxaJM4vY
yF6h4KBuRcOsSK8gZMCBG/qVXM5AUHtD6+NIAj13sxTO8Ai4yZ481im4V/Po
j1zyFhOWtx7g5GIS9b7NrvbHSQibU58lOZPwWvm9XqyaQEq15ApV7Zsobdv5
TGp9JdTM9wXTSgR8wLFXfRLaBzt+6pvzjCYMe9DVlMMJuJoU+f6Uj4TTDj9f
PjcUN5M8YjYVMyB0b7X1/L834GfC3rhB0xsT54q2aL/2xVV7GTmbOiaU7o6a
qQrm8eYvhUkhvQREaGssJgoIVMzcbeAf8IW3+Gch3RVUlH/glxsrUsGluYSY
C/wqv2uItucpAdV/o5S9sxJxy35p7V7fIqi4xpmvuJOJbWbKX5bmxSPjs/gR
S+EhaPxu3HLUhYK92lrOCwTvkb+Bm/yiiECvr1e/dikBf8sX8S7OPhhxyriT
b3Uf64fKWdUbBBx1c5mI5l4S+8vD9fjypGBPmenpiKVhJHhL5LOLJIY/Hrw7
JBeKDIfkk33XmGjsDqwYFvCNg6XL0LkXBGx7azptbf2haHWDXbqeKugztirc
MkHezKw6ZyPyv342TXfZRrt2AyYPea+Y+0bwP92Eg4o=
"], {0.03346199416399495,
0.02273047343078459, 0.015723996826755456`, 0.07168654388094363,
0.07742950165199784, 0.01993179566693772, 0.02053342029990574,
0.021444291750851545`, 0.020319245313387944`, 0.014988098006725206`,
0.034948853734028396`, 0.01731994818954596, 0.03355620530142517,
0.01841918579886483, 0.021444870693491037`, 0.043868822631392565`,
0.08867330775662671, 0.058847411594883, 0.029046100345864675`,
0.2936275522522333, 0.041998380709361106`}}]]], "Output",
CellChangeTimes->{3.5316148042403507`*^9, 3.531614852072456*^9,
3.531614903710799*^9, 3.531616611468856*^9, 3.5316173761917877`*^9,
3.531622866778933*^9, 3.5316270386532393`*^9, 3.5316295257242117`*^9,
3.5316301153402443`*^9, 3.53171325161267*^9, 3.53177606724746*^9,
3.531790200483659*^9, 3.53179087890131*^9, 3.532036627133198*^9,
3.532039842194292*^9, 3.5320546439045153`*^9, 3.532124851212632*^9,
3.5356086737581263`*^9, 3.537097443860054*^9, 3.53740879810534*^9,
3.537436922749291*^9, 3.537520513995833*^9, 3.5375249930920486`*^9,
3.537528523282893*^9, 3.5378487187480297`*^9, 3.537939053367425*^9,
3.540983989187842*^9, 3.541051022915393*^9, 3.5466711015820417`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "//", "Tr"}]], "Input",
CellChangeTimes->{{3.5320366793032627`*^9, 3.532036680121861*^9}}],
Cell[BoxData["1.0000000000000013`"], "Output",
CellChangeTimes->{{3.532036677256579*^9, 3.5320366806282787`*^9},
3.532039842204443*^9, 3.532054643929215*^9, 3.532124851240919*^9,
3.535608673838419*^9, 3.537097443901547*^9, 3.5374087981968613`*^9,
3.537436922805429*^9, 3.5375205140447607`*^9, 3.537524993128354*^9,
3.5375285233789167`*^9, 3.537848718781896*^9, 3.537939053403652*^9,
3.5409839892227297`*^9, 3.5410510229680157`*^9, 3.546671101620349*^9}]
}, Open ]],
Cell["OK.", "Text",
CellChangeTimes->{{3.532037016730644*^9, 3.532037027551414*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ".",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "1", "]"}], "]"}]}], "-",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}]], "Input",
CellChangeTimes->{{3.5320367054519987`*^9, 3.532036794791675*^9}, {
3.5320369246943893`*^9, 3.532037003236044*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"6.938893903907228`*^-18", ",", "6.938893903907228`*^-18", ",", "0.`", ",",
RowBox[{"-", "1.3877787807814457`*^-17"}], ",", "1.3877787807814457`*^-17",
",", "0.`", ",",
RowBox[{"-", "3.469446951953614`*^-18"}], ",",
RowBox[{"-", "1.0408340855860843`*^-17"}], ",", "0.`", ",",
"1.734723475976807`*^-18", ",", "6.938893903907228`*^-18", ",", "0.`", ",",
RowBox[{"-", "6.938893903907228`*^-18"}], ",", "3.469446951953614`*^-18",
",", "0.`", ",", "0.`", ",", "0.`", ",", "6.938893903907228`*^-18", ",",
RowBox[{"-", "3.469446951953614`*^-18"}], ",", "0.`", ",", "0.`"}],
"}"}]], "Output",
CellChangeTimes->{{3.532036742513674*^9, 3.532036799777247*^9}, {
3.5320369374443502`*^9, 3.532037003657713*^9}, 3.532039842227066*^9,
3.532054643944459*^9, 3.532124851254739*^9, 3.535608673922901*^9,
3.537097443954187*^9, 3.537408798279889*^9, 3.537436922856168*^9,
3.537520514092741*^9, 3.537524993162333*^9, 3.537528523478047*^9,
3.537848718814352*^9, 3.537939053462358*^9, 3.540983989259471*^9,
3.5410510230131187`*^9, 3.546671101672308*^9}]
}, Open ]],
Cell["OK.", "Text",
CellChangeTimes->{{3.532037030307228*^9, 3.532037039976215*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"god", "[", "200", "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.531614965562894*^9, 3.5316150349762983`*^9}, {
3.531615097515093*^9, 3.531615149717634*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"20", ",", "17", ",", "5", ",", "4", ",", "18", ",", "16", ",", "21", ",",
"11", ",", "13", ",", "1", ",", "19", ",", "2", ",", "15", ",", "8", ",",
"7", ",", "9", ",", "6", ",", "14", ",", "12", ",", "3", ",", "10"}],
"}"}]], "Output",
CellChangeTimes->{{3.53161497691422*^9, 3.531614984066183*^9}, {
3.531615022572414*^9, 3.5316150354125767`*^9}, {3.5316151059058523`*^9,
3.5316151528650303`*^9}, 3.531616611571159*^9, 3.531617376257884*^9,
3.531622866836967*^9, 3.531627038704877*^9, 3.531629525735751*^9,
3.531630115446309*^9, 3.5317132516253366`*^9, 3.531776067282825*^9,
3.531790200495893*^9, 3.5317908789128437`*^9, 3.532036627184198*^9,
3.53203984224214*^9, 3.532054643961101*^9, 3.5321248512682953`*^9,
3.535608674007275*^9, 3.537097444002267*^9, 3.5374087983644733`*^9,
3.537436922904501*^9, 3.537520514143194*^9, 3.537524993208515*^9,
3.5375285235231256`*^9, 3.537848718846676*^9, 3.537939053505995*^9,
3.540983989308757*^9, 3.541051023059342*^9, 3.5466711017222*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"ranking", "[", "\"\<G\>\"", "]"}], "=",
RowBox[{"Inner", "[",
RowBox[{"List", ",",
RowBox[{"ClNames21", "[",
RowBox[{"[",
RowBox[{"god", "[", "200", "]"}], "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[",
RowBox[{"god", "[", "200", "]"}], "]"}], "]"}], ",", "List"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.5316152141431913`*^9, 3.531615239303141*^9}, {
3.5316158034335747`*^9, 3.531615928812451*^9}, {3.531616399295946*^9,
3.531616421405343*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "0.2936275522522333`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "0.08867330775662671`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "0.07742950165199784`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "0.07168654388094363`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "0.058847411594883`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "0.043868822631392565`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "0.041998380709361106`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "0.034948853734028396`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.03355620530142517`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "0.03346199416399495`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "0.029046100345864675`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "0.02273047343078459`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.021444870693491037`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.021444291750851545`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "0.02053342029990574`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.020319245313387944`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "0.01993179566693772`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.01841918579886483`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "0.01731994818954596`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "0.015723996826755456`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.014988098006725206`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{
3.531615239927796*^9, {3.531615883853547*^9, 3.531615899461521*^9},
3.531615929864379*^9, 3.531616504607126*^9, 3.531616611625331*^9,
3.531617376268889*^9, 3.5316228668512173`*^9, 3.531627038756386*^9,
3.531629525748259*^9, 3.531630115461128*^9, 3.531713251639063*^9,
3.5317760672954683`*^9, 3.531790200552096*^9, 3.5317908789257383`*^9,
3.532036627198235*^9, 3.532039842253024*^9, 3.5320546439752293`*^9,
3.532124851281252*^9, 3.5356086740909986`*^9, 3.53709744405414*^9,
3.537408798448121*^9, 3.537436922956423*^9, 3.5375205141935043`*^9,
3.5375249932592573`*^9, 3.53752852357911*^9, 3.537848718879889*^9,
3.537939053557109*^9, 3.540983989357176*^9, 3.541051023103997*^9,
3.5466711017742987`*^9}]
}, Open ]],
Cell["for JSIMS ->", "Text",
CellChangeTimes->{{3.5317969395741158`*^9, 3.5317969524346046`*^9}, {
3.53179703194718*^9, 3.531797032724834*^9}},
FontSize->24],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"jranking", "[", "\"\<G\>\"", "]"}], "=",
RowBox[{"Inner", "[",
RowBox[{"List", ",",
RowBox[{"Flatten", "[",
RowBox[{"jFieldName21", "[",
RowBox[{"[",
RowBox[{"god", "[", "200", "]"}], "]"}], "]"}], "]"}], ",",
RowBox[{"Round", "[",
RowBox[{
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[",
RowBox[{"god", "[", "200", "]"}], "]"}], "]"}], ",", "0.0001"}],
"]"}], ",", "List"}], "]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.531796778491475*^9, 3.5317969280832157`*^9}}],
Cell[BoxData[
TagBox[GridBox[{
{"\<\"\:751f\:5316\:5b66\:30fb\:751f\:7406\:5b66\"\>", "0.2936`"},
{"\<\"\:81e8\:5e8a\:533b\:5b662\"\>", "0.0887`"},
{"\<\"\:7269\:6027\:7269\:7406\"\>", "0.07740000000000001`"},
{"\<\"\:5316\:5b66\"\>", "0.0717`"},
{"\<\"\:5fc3\:7406\:30fb\:795e\:7d4c\:79d1\:5b66\"\>",
"0.058800000000000005`"},
{"\<\"\:81e8\:5e8a\:533b\:5b661\"\>", "0.0439`"},
{"\<\"\:7d20\:7c92\:5b50\:30fb\:5929\:4f53\:7269\:7406\"\>", "0.042`"},
{"\<\"\:6c17\:8c61\:30fb\:74b0\:5883\"\>", "0.0349`"},
{"\<\"\:96fb\:5b50\:60c5\:5831\:5de5\:5b66\"\>",
"0.033600000000000005`"},
{"\<\"\:52d5\:690d\:7269\:5b66\"\>", "0.0335`"},
{"\<\"\:7363\:533b\:5b66\:30fb\:611f\:67d3\:75c7\"\>", "0.029`"},
{"\<\"\:8fb2\:5b66\:30fb\:98df\:54c1\:5b66\"\>", "0.0227`"},
{"\<\"\:6570\:5b66\"\>", "0.021400000000000002`"},
{"\<\"\:91d1\:5c5e\:30fb\:30bb\:30e9\:30df\:30c3\:30af\:30b9\"\>",
"0.021400000000000002`"},
{"\<\"\:5fdc\:7528\:5316\:5b66\"\>", "0.0205`"},
{"\<\"\:6a5f\:68b0\:30fb\:571f\:6728\:5efa\:7bc9\"\>",
"0.020300000000000002`"},
{"\<\"\:5206\:6790\:5316\:5b66\"\>", "0.0199`"},
{"\<\"\:6570\:7406\:5de5\:5b66\"\>", "0.0184`"},
{"\<\"\:5730\:7403\:79d1\:5b66\"\>", "0.0173`"},
{"\<\"\:6c34\:7523\:30fb\:6d77\:6d0b\"\>", "0.015700000000000002`"},
{"\<\"\:5316\:5b66\:5de5\:5b66\:30fb\:30a8\:30cd\:30eb\:30ae\:30fc\:5de5\
\:5b66\"\>", "0.015000000000000001`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
Function[BoxForm`e$,
TableForm[BoxForm`e$]]]], "Output",
CellChangeTimes->{{3.531796771691721*^9, 3.53179678509333*^9}, {
3.531796874760326*^9, 3.531796928690205*^9}, 3.5320366272151423`*^9,
3.532039842264162*^9, 3.532054644221463*^9, 3.532124851296706*^9,
3.5356086741731358`*^9, 3.5370974441038437`*^9, 3.537408798531005*^9,
3.5374369230052567`*^9, 3.537520514244094*^9, 3.537524993310837*^9,
3.537528523680183*^9, 3.537848718915421*^9, 3.537939053606752*^9,
3.540983989395383*^9, 3.541051023152042*^9, 3.546671101821488*^9}]
}, Open ]],
Cell["compare with citedParIssues", "Text",
CellChangeTimes->{{3.531615305312183*^9, 3.5316153346440353`*^9}, {
3.531615993128883*^9, 3.5316159944806633`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"ranking", "[", "\"\<C\>\"", "]"}], "=",
RowBox[{"Sort", "[",
RowBox[{"citedParIssues", ",",
RowBox[{
RowBox[{
RowBox[{"#2", "[",
RowBox[{"[", "2", "]"}], "]"}], "<",
RowBox[{"#1", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "&"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.531615729871051*^9, 3.531615766138603*^9}, {
3.531616006766115*^9, 3.531616008562118*^9}, {3.531616438561174*^9,
3.531616456717597*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "4.075204616839217`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "2.4901762998886943`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "2.4529642908880196`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "2.3537927197315844`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "2.082303430949749`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "1.6491218869433537`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "1.5784180985672789`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "1.551529896394186`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "1.4971389455907789`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "1.4203311695398864`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "1.4068775867337018`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "1.3779596819071211`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "1.3287499598419379`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "1.2062449449768389`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "1.2019085625054222`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.8177326421089438`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.7522039633666011`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.7312816799420709`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.6603038256581564`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.5284888950390922`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.4962958174413343`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.5316160120419807`*^9, 3.5316165087486143`*^9,
3.5316166117244377`*^9, 3.531617376282509*^9, 3.531622866868661*^9,
3.531627038808145*^9, 3.5316295257621527`*^9, 3.5316301154749107`*^9,
3.531713251654448*^9, 3.531776067309762*^9, 3.531790200594314*^9,
3.531790878939829*^9, 3.5320366272317142`*^9, 3.532039842274873*^9,
3.532054644337984*^9, 3.532124851328557*^9, 3.5356086742592373`*^9,
3.537097444153798*^9, 3.537408798614805*^9, 3.5374369230557833`*^9,
3.5375205142940063`*^9, 3.53752499336176*^9, 3.537528523780435*^9,
3.537848718951008*^9, 3.537939053657596*^9, 3.54098398944508*^9,
3.5410510231992083`*^9, 3.546671101874617*^9}]
}, Open ]],
Cell["compare with citedParIssuesDropSelf", "Text",
CellChangeTimes->{{3.531615305312183*^9, 3.5316153346440353`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"ranking", "[",
RowBox[{"\"\<C\>\"", ",", "\"\<D\>\""}], "]"}], "=",
RowBox[{"Sort", "[",
RowBox[{"citedParIssuesDropSelf", ",",
RowBox[{
RowBox[{
RowBox[{"#2", "[",
RowBox[{"[", "2", "]"}], "]"}], "<",
RowBox[{"#1", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "&"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.531615729871051*^9, 3.531615766138603*^9}, {
3.5316164604200163`*^9, 3.531616478081662*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "1.1938155733753701`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "0.9548009644079514`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "0.7854984894259819`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "0.5785337600132704`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "0.52888828713505`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "0.5268089834399483`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "0.5138502906142659`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "0.4968355447039548`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "0.4499875003472126`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "0.44127700182180973`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "0.4280554092306268`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "0.4104809791337525`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "0.37110010446496783`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "0.3217728472184824`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.30491661218967114`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "0.2634452411994785`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.26188393117526976`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.24343229543808834`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.17985885283332181`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.14425942035934708`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.12404163165039757`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.531615281289419*^9, 3.531615771498766*^9,
3.531616511426057*^9, 3.531616611818465*^9, 3.5316173763373632`*^9,
3.5316228668890657`*^9, 3.5316270388213243`*^9, 3.531629525776667*^9,
3.531630115489108*^9, 3.531713251670212*^9, 3.531776067324535*^9,
3.5317902006425858`*^9, 3.531790878954393*^9, 3.5320366272485037`*^9,
3.532039842290913*^9, 3.53205464435631*^9, 3.532124851346425*^9,
3.535608674453285*^9, 3.537097444204048*^9, 3.5374087987922573`*^9,
3.53743692310852*^9, 3.5375205143443737`*^9, 3.537524993412122*^9,
3.537528523883697*^9, 3.537848718983165*^9, 3.537939053707947*^9,
3.540983989495817*^9, 3.541051023246415*^9, 3.546671101924973*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.5356086745426073`*^9, 3.537097444251993*^9,
3.53740879888151*^9, 3.53743692315467*^9, 3.5375205143931913`*^9,
3.537524993459392*^9, 3.5375285240051107`*^9, 3.537848719013173*^9,
3.537939053756774*^9, 3.540983989543374*^9, 3.5410510233030853`*^9,
3.546671101972855*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"googlePageScore", "[",
RowBox[{"citingcited21DataZeroSelf", ",", "0.9", ",", "50"}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614775157372*^9}, {3.531614843076782*^9,
3.531614843581339*^9}, {3.531615668604926*^9, 3.531615673875045*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.004761904761904761`"},
{"0.07306620048950621`"},
{"0.08519624937448336`"},
{"0.011366148529335277`"},
{"0.007978133301823957`"},
{"0.010469040271909744`"},
{"0.007701365860703314`"},
{"0.004885972925165739`"},
{"0.005620838199865377`"},
{"0.006813801308144011`"},
{"0.08293439132118707`"},
{"0.018982025012586074`"},
{"0.007806346614231834`"},
{"0.008302619267275746`"},
{"0.007290986551455464`"},
{"0.006785170193545324`"},
{"0.01082215735196022`"},
{"0.02306673069533212`"},
{"0.03086393757104127`"},
{"0.5804190948831098`"},
{"0.004866885515433281`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09878939447962543`"},
{"0.004761904761904761`"},
{"0.02345983424480278`"},
{"0.056711143697469144`"},
{"0.006765630989626489`"},
{"0.05035194940633124`"},
{"0.02566393309529668`"},
{"0.0053841144852499285`"},
{"0.005204833717506406`"},
{"0.017079548098636224`"},
{"0.05532962719309258`"},
{"0.007440570350543281`"},
{"0.005616124890565077`"},
{"0.005320838920163979`"},
{"0.004899001819590984`"},
{"0.018503248313070084`"},
{"0.09671184675930343`"},
{"0.01905163654381498`"},
{"0.07683277339480102`"},
{"0.4112863185841004`"},
{"0.0048357262545050345`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.24984729795812918`"},
{"0.06278222197617664`"},
{"0.004761904761904761`"},
{"0.011438351740618743`"},
{"0.00797556767330067`"},
{"0.01021765807660014`"},
{"0.006505752853359905`"},
{"0.005011025917826924`"},
{"0.011164318469104362`"},
{"0.0059078620791467125`"},
{"0.1631282235816241`"},
{"0.024392651848571242`"},
{"0.0060822468882922275`"},
{"0.006829610356058717`"},
{"0.005060850149011357`"},
{"0.00892222806580489`"},
{"0.013879739068655944`"},
{"0.04768547992729353`"},
{"0.03555327963388417`"},
{"0.3080419999815466`"},
{"0.004811728993089194`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008589512165770617`"},
{"0.031104367708424806`"},
{"0.006134761807188553`"},
{"0.004761904761904761`"},
{"0.2123911650583326`"},
{"0.06260631429677259`"},
{"0.08718660252845076`"},
{"0.053438907698862614`"},
{"0.006028211708151602`"},
{"0.029313506428457592`"},
{"0.023789293601464902`"},
{"0.009757465174444889`"},
{"0.006843729773857496`"},
{"0.005151222431462851`"},
{"0.005212693642445707`"},
{"0.015150539418007486`"},
{"0.018928969853087056`"},
{"0.022195140196642822`"},
{"0.012835123804319898`"},
{"0.3679379173293523`"},
{"0.01064265061259802`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008473816932397333`"},
{"0.005726209347121692`"},
{"0.005362943921183807`"},
{"0.26575160123346`"},
{"0.004761904761904761`"},
{"0.028486439488611744`"},
{"0.03394202570360616`"},
{"0.12493010766215722`"},
{"0.026181355240387706`"},
{"0.016769478295633404`"},
{"0.025236865132949204`"},
{"0.012833002043651958`"},
{"0.03062640308868219`"},
{"0.016842131380820982`"},
{"0.018044209699379074`"},
{"0.0139360079733179`"},
{"0.006538602936037327`"},
{"0.00981459659540444`"},
{"0.007238714484208524`"},
{"0.20314445627954703`"},
{"0.13535912779953763`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.018373788793858807`"},
{"0.08842584875256987`"},
{"0.01036283825081958`"},
{"0.21420450416949835`"},
{"0.06977851009356259`"},
{"0.004761904761904761`"},
{"0.0413833929586555`"},
{"0.01801026666837635`"},
{"0.007481588811810514`"},
{"0.02037989237522493`"},
{"0.08877590709562705`"},
{"0.015977235522159676`"},
{"0.007764328242741311`"},
{"0.005906326268053221`"},
{"0.004815759891605865`"},
{"0.01679852625010151`"},
{"0.04485704882437671`"},
{"0.020810733412833765`"},
{"0.015384829095447531`"},
{"0.2781170793422835`"},
{"0.007629690418488551`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010332296542984908`"},
{"0.037802528092829385`"},
{"0.005723292175898289`"},
{"0.35004136688763915`"},
{"0.1042796401604407`"},
{"0.03672803627718956`"},
{"0.004761904761904761`"},
{"0.04752950663441096`"},
{"0.019366510624482913`"},
{"0.04038979128048844`"},
{"0.017090284541351176`"},
{"0.007165373296888581`"},
{"0.006302952234335563`"},
{"0.005482945322399907`"},
{"0.005030527715814717`"},
{"0.07022107721469939`"},
{"0.02267481437263711`"},
{"0.01362646224093332`"},
{"0.015959240524888202`"},
{"0.17291987390953745`"},
{"0.0065715751882455195`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005178236218059225`"},
{"0.006228115542274833`"},
{"0.004979121173811438`"},
{"0.2192450101520898`"},
{"0.4400273914875685`"},
{"0.021759088993602266`"},
{"0.07512192085200935`"},
{"0.004761904761904761`"},
{"0.06078563766616864`"},
{"0.03138901658813163`"},
{"0.011694728575259546`"},
{"0.010083706853618358`"},
{"0.014174615944527449`"},
{"0.012907520208405163`"},
{"0.005558364938895911`"},
{"0.02038338505152664`"},
{"0.005087729379764777`"},
{"0.004961019806152548`"},
{"0.004924817070834768`"},
{"0.03365168754549286`"},
{"0.007096981189901543`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008866428365996958`"},
{"0.0060376350712847675`"},
{"0.017075475574181355`"},
{"0.032883438103455356`"},
{"0.19057479764986238`"},
{"0.015245079912896996`"},
{"0.062114302148814665`"},
{"0.14292904392127861`"},
{"0.004761904761904761`"},
{"0.09073503430707917`"},
{"0.0887382390402235`"},
{"0.009088294506758698`"},
{"0.10243847323226098`"},
{"0.026449320021364887`"},
{"0.05739964665762767`"},
{"0.03892929043921278`"},
{"0.010197625210567402`"},
{"0.03227330621636057`"},
{"0.005372036648999547`"},
{"0.036987961707547555`"},
{"0.02090266650232138`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010564452028734916`"},
{"0.06236019603632925`"},
{"0.005509472201189627`"},
{"0.27459815189425185`"},
{"0.08927262385058446`"},
{"0.05018552631083285`"},
{"0.10383238969189447`"},
{"0.05990390302153612`"},
{"0.0716157929036657`"},
{"0.004761904761904761`"},
{"0.12811053224390778`"},
{"0.011703602412407095`"},
{"0.03843803797921352`"},
{"0.016011014800667515`"},
{"0.008855726453226648`"},
{"0.0070758039787388715`"},
{"0.008072560564452028`"},
{"0.006007850494046205`"},
{"0.005117889256802316`"},
{"0.03081996978840583`"},
{"0.007182599327208139`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.10476328796429493`"},
{"0.06557439784589282`"},
{"0.08315213382022058`"},
{"0.05109641842794437`"},
{"0.04966480395411456`"},
{"0.04154817232857511`"},
{"0.012206300025819777`"},
{"0.008608590608977906`"},
{"0.025974696617609087`"},
{"0.03524906864372395`"},
{"0.004761904761904761`"},
{"0.11677640072295378`"},
{"0.013139961639187046`"},
{"0.011534063664195343`"},
{"0.005708015196783592`"},
{"0.013364040426395189`"},
{"0.06098078270812585`"},
{"0.01839336431706687`"},
{"0.013227103389767991`"},
{"0.2168649256759249`"},
{"0.04741156726052156`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.06308443762618916`"},
{"0.022008710908914576`"},
{"0.03503407658193809`"},
{"0.04955916452861463`"},
{"0.13084966628754818`"},
{"0.022203119351795524`"},
{"0.009122208409377452`"},
{"0.01512109750398956`"},
{"0.01337142151806103`"},
{"0.012649333015931793`"},
{"0.29773542818349336`"},
{"0.004761904761904761`"},
{"0.008427892541945493`"},
{"0.006094991227374118`"},
{"0.008039075656183598`"},
{"0.007816894578605372`"},
{"0.0070948060764761366`"},
{"0.009566570564533904`"},
{"0.008233484099064546`"},
{"0.24157916082559672`"},
{"0.027646555752462068`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015440686162225445`"},
{"0.00726324094576366`"},
{"0.005595683489857727`"},
{"0.020122674403807488`"},
{"0.15634929118627677`"},
{"0.013805197118933087`"},
{"0.006942556819627904`"},
{"0.016915833142449925`"},
{"0.06732737777099082`"},
{"0.02252780534982566`"},
{"0.02255987376243923`"},
{"0.005595683489857727`"},
{"0.004761904761904761`"},
{"0.118925453666234`"},
{"0.1255315466646306`"},
{"0.062485047466340884`"},
{"0.0387864905449085`"},
{"0.0953551703952559`"},
{"0.007680130309740143`"},
{"0.16952940877045636`"},
{"0.01649894377847344`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0163858939802336`"},
{"0.009007187780772686`"},
{"0.0057726864330637905`"},
{"0.010119047619047618`"},
{"0.18912848158131176`"},
{"0.010826594788858938`"},
{"0.007086702605570529`"},
{"0.03377133872416891`"},
{"0.024168912848158135`"},
{"0.01931716082659479`"},
{"0.03205300988319856`"},
{"0.004761904761904761`"},
{"0.3408468104222821`"},
{"0.004761904761904761`"},
{"0.05823225516621743`"},
{"0.025381850853548965`"},
{"0.08451257861635221`"},
{"0.022753818508535494`"},
{"0.009714734950584007`"},
{"0.07955974842767297`"},
{"0.011837376460017968`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.025246348278296492`"},
{"0.005983454145909772`"},
{"0.005043800773598225`"},
{"0.013782577136095615`"},
{"0.2297149220932892`"},
{"0.005607592796985153`"},
{"0.007017072855452474`"},
{"0.0068291421809901645`"},
{"0.0970358659228987`"},
{"0.014722230508407161`"},
{"0.024494625580447252`"},
{"0.011527409042547902`"},
{"0.31325010689178573`"},
{"0.06283248317075839`"},
{"0.004761904761904761`"},
{"0.007486899541608248`"},
{"0.005607592796985153`"},
{"0.010775686344698663`"},
{"0.0068291421809901645`"},
{"0.04253597032882896`"},
{"0.0989151726675218`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005562349453400036`"},
{"0.010148230498425049`"},
{"0.005412266073744672`"},
{"0.010092644061515655`"},
{"0.011132110431721326`"},
{"0.007085417824717434`"},
{"0.016390587363350008`"},
{"0.006268297202149341`"},
{"0.007468964239392254`"},
{"0.0050565128775245495`"},
{"0.006896423939225495`"},
{"0.005312210487307762`"},
{"0.011599036501760236`"},
{"0.0062071521215490075`"},
{"0.0049953677969242155`"},
{"0.004761904761904761`"},
{"0.31255512321660184`"},
{"0.08187696868630721`"},
{"0.03352788586251621`"},
{"0.4416379470075968`"},
{"0.006012599592366128`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005905344186065718`"},
{"0.022022766786013684`"},
{"0.005015568797981424`"},
{"0.006408769734587095`"},
{"0.005148254601467678`"},
{"0.010104459614042476`"},
{"0.006420477305482941`"},
{"0.004804832521856196`"},
{"0.004992153656189732`"},
{"0.004859467852703477`"},
{"0.013452824890254428`"},
{"0.0048165400927520415`"},
{"0.007076101275650316`"},
{"0.008071244801797224`"},
{"0.0048477602818076315`"},
{"0.15256998732196028`"},
{"0.004761904761904761`"},
{"0.1163389579229489`"},
{"0.07421121531606312`"},
{"0.5333587307093508`"},
{"0.004812637569120093`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0133897196929816`"},
{"0.009763679021492586`"},
{"0.010377845801893843`"},
{"0.010009345733653089`"},
{"0.008451818778555505`"},
{"0.0089873722110654`"},
{"0.006535618423703587`"},
{"0.004811038104336861`"},
{"0.0069335984974036`"},
{"0.004845431444039331`"},
{"0.00685007181526903`"},
{"0.004879824783741802`"},
{"0.012736246238634664`"},
{"0.005661044928412198`"},
{"0.004919131457687482`"},
{"0.06997659017203169`"},
{"0.16652360805110908`"},
{"0.004761904761904761`"},
{"0.022199327991057213`"},
{"0.6125659173182034`"},
{"0.004820864772823281`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02626803229540419`"},
{"0.053614675619086095`"},
{"0.013193155182751843`"},
{"0.011261467080940515`"},
{"0.006799646328129258`"},
{"0.008276819582455564`"},
{"0.008269244334997481`"},
{"0.004792205751737095`"},
{"0.004883108721234099`"},
{"0.0048528077314017645`"},
{"0.00907979581301243`"},
{"0.005049764165311939`"},
{"0.005216419609389778`"},
{"0.0052315701043059454`"},
{"0.004890683968692183`"},
{"0.04600912717117013`"},
{"0.2174975791272674`"},
{"0.04066100246576308`"},
{"0.004761904761904761`"},
{"0.5146063596807654`"},
{"0.0047846305042790116`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.055215287538772764`"},
{"0.04462846135354898`"},
{"0.013263846864247463`"},
{"0.07087120384566553`"},
{"0.015027979549762224`"},
{"0.021587142618689936`"},
{"0.014534672020901364`"},
{"0.005167919188950735`"},
{"0.0051882199103030335`"},
{"0.004973032263968667`"},
{"0.020170152268299487`"},
{"0.007819193397560948`"},
{"0.007833403902507557`"},
{"0.005833782849306133`"},
{"0.00508062608713585`"},
{"0.11248159240147221`"},
{"0.29384011667436805`"},
{"0.19580793326411755`"},
{"0.08892057519999433`"},
{"0.004761904761904761`"},
{"0.006992954038522389`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0051894821031003005`"},
{"0.00511402727818344`"},
{"0.00513917888648906`"},
{"0.023474701341286028`"},
{"0.6444427587987379`"},
{"0.00788070419180164`"},
{"0.006145243218713859`"},
{"0.00586857552735204`"},
{"0.012483448511730097`"},
{"0.00649736573499254`"},
{"0.06663486119372994`"},
{"0.019978627786804853`"},
{"0.009591013556583799`"},
{"0.005340391752934021`"},
{"0.0372829343010714`"},
{"0.009767074814723139`"},
{"0.00516433049479468`"},
{"0.00622069804363072`"},
{"0.004761904761904761`"},
{"0.108260772939531`"},
{"0.004761904761904761`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.032461031746000846`", "0.031452873907369186`",
"0.014405837946699862`", "0.06316951499979087`", "0.056729002670578926`",
"0.020824809813603934`", "0.02082892152369792`",
"0.019148167591948793`", "0.01196848495992916`", "0.011739163539346197`",
"0.029326747704381328`", "0.011423739703616057`",
"0.017425278834399295`", "0.009959864174538214`",
"0.009705381351114784`", "0.06894013214480152`", "0.13973253570722832`",
"0.08716122130526885`", "0.04666870751547514`", "0.28058986119852114`",
"0.01633872166168927`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJxF1nk0FOr/B3Br2SlRciupS4irUkR5u6KEUtJ6Q5QkKjWrsY0JU0OMJYPK
vmUnJAmDhAlD4lraVKQr7rdyZe3nd873O/c8z/PH55/PeZ3nPMt7vesVezcR
ISEhpf+u5UZBikZBBAwlh12ilJXi66/tbz07yiFhUZmqvo8Jc8/PYz3H6Kic
LHve6h2Cg3dUcihhgeAGNDgdEiWCzRnd81acgqlbtMGWT75g63hv1Tcph7gN
W32Jdwy8GsJ3hE8HQnGiteQfoSCoscpsNV/5Y+3bPb83tvqCzNd3/qIVCge9
vpXtSRyMY7qFl5gMr+EOBV70EPTPfE+1nSDgjK2vyB7rR/ift/+y+4t+8XjE
Ff3cYSpZgA1n3Hbvq/DF5eEZ+cfP7uP1tL1b5r5E5H37xThblgzTZPbo/cMk
ZHjLLT/gH4WlaXE7tB3yUWiv+lGIFgCZwAbpCSEKxj+c7TrAI+GYbnTLtAIR
4WcDp69/jQYlbIqlWl+JzhPsIktGDKoG5yUO5T3AM5WRvuv2/UhY2+eS0k6A
c/Gg1M+ZDkR4bhoOWF4s8CYZ6tye92LipgUnOuAoHY3vTfsXxoKxw3bgcVMm
DbvaZpdcDSVihpdNOvwqFJ4q5Vm9W6nQNsqrdH3XiDG9Ds2zM/HY9Yn1sHSU
isrsmSjHaV9QDq9IKqoiomazkF6nJQOH3ohKz3qFo20ve4vJxRxMy8atljJI
w+WnX1onK17gYHVCLrmcgGtBj9rPcIKwQ92quasvGWt3W99uUPMReNP2/Gdn
2m88KNIv5UwtKcbwIQZ58HAF6Kvatpw4nQex8V31kiVUKIw0rDktlgTtW7JU
o9PxsHVmtlfOXsf8hdlKHQk/pJOlaq6pkCBFCOCNnCRhj9fNGdOlkYjQenV/
jWsM1O1UMu2r4pB+qkfzwH4WCl9QaTbhvfCw5LjyeSEwZDYRK08FoaxHNMmR
SMGeXUttiVMkjC2TElYU6RR4RXLHOeE696DQVHGu70wqCH0l5z1na6H9j7LI
/o5EyP3qni62OQpndBJOlvQm4P2vpWf0rVgY701fyzydjNjp4QMKiEL+rNZF
PVo0XG4OHPFlhePY0ZODRs00xCUbDOSrBGMsMT75eJY/9J9L7UgXakVzYsT9
a0e4KOR8WBnLj0a8x3W2YnoFPhyQufPLzhDc1pVIkvXkoZ3LVxd+VSLwTlWV
mxroZ6JuxOGm1dVorN5yoEw0MwDEG/NelNexmBPKihKrqoCp/Ra1Y6fZmDOU
WfBrC4T8vWhXky1UfHfseVD8iIDcryTRtG1ROLvrHI8+lQWj7uyCC3a3oe4Q
0b6CEQmTObnYvOedsDppeMnOLBAa6pOOKloh2Nha9Uf/qXSIfL8RdvAqBaof
uCOK7j1Ie6Ams7y0CutsD7mJtacJvJxZ3YSWozkQsljB5HfHwLfIKuhHQQaM
X1XHrqFH4fOtWHif9EdB4JWBdZ0+WCLO/GJFImONwTGhD4lEFAer6YnMlOBz
UInEMiMOKvtpbfqfwpBzKoCedJyNQ+FpkrvVm1Dpa9HM+0zDxFL7bU3bSTja
uUYym+GDJy559+fOEcGQ3n7NSOE5rq//mnlBaxCb1vjUiFrFQTHbskTf5IHA
60ouCrNZV4SA7eeTjZanYIG4ftj9GxO01ZY7G7OCMaBuXxu79BbstY5Lml9h
YYCvauzUSIbeHxV8lzexiCHXfX/dQ4TFa817wvZE2PeqBUtvJqJO9Ys5zzgV
ItQml0fL/BEu+/l15CYG1h7tsv+rigpralKjiV8UWoWoyio9KQhk5VtyzzVj
c4/BfIdRJIJTitSutRVhjW5mZaBNvcBbtP+bhYfxQ9xceTsx/GEFhvPIu4fu
MtDp73ruws4q0CSnO5lKd2DBOcfyO1sA9tRtY9Z4OnIbtisHDC2eyyMUklpo
CkSSQ1XnhcjQcayXVv47DSsOqhow3G9jyYXyWn5aCLzzVk3mfylCxStuoUoU
GeMuvmpiMZ242PpqZXR/BVzSfbo/l9wHV3jhUn1sFW4V13s/yisEZcYtxeNo
qcD7p/N6yS9udQim9o/J/WDizQrlGxqF6bhs90x0ixsb1h3zvt/UGZDjjeQG
z/ph8sj36hM36Nhoa65cfIeKM66VEwH/EHHX2EjLMjIZGjVOR+ie/shtSbFr
7KzC9NS2Ht+WYvz98KQdaX85NCl6tnZauXBl+u/PvXQfwkaV9m2Wmdix0mHg
3s8bWFIg5eOSGoQA+TmXXxISsVRlBU1b5t/zm/VQZlju4xOU3lB+vm6UhVcO
XZ06yUw81Am9v9+Fgo61nI13nMIQP94d+saoCJIbu5rLX0ZDsaGnoUM5DBFV
FX3G9TyIyuVvd9ibg0tl/rsOaBRDu88+jnAzDlVUB9bcRCpqNKrvdTrfh9NQ
aURhbR1MW/9ec7E6Dhr9Vsq5hQxo/Vh+qmMqAjViP/g+rmF4LT5Z/WHkJgI1
qz6uknsh8GqqVcdlmAchRGagVn6Kit4/LKitZDraDKK7D4jQMei5NuiqvD92
bipwTOdcx8/ddObDQToc5KLfKYy1g7jJ8NsZu7vIzObyHZMjcdJmm5t8nT8C
Td37Av8i42Dt+07JO7G4OLb1s5loI7Jk1bYMW4bjUVe/+/MrfqiJCj3hah8F
vTdZk467SkBLHfViLuOguFeaPqHCEfT5n/di5KYlw1dr0GDydOLisjos51bs
lVoownn6y5yugXRY/3rKeqtHJSIPalhtIwWi5pY+d8ODp/ib3+Ks8pENNWXp
x+RnbMzoxO47fY2B9htSD1UyKYi1ebQ4g/FYPark9PZm7Io4/d1scygmM3pM
vy7xx+7oR8o068V9F5PdX10bD/le4cq3z2Lgx3FmmXmkCHx2F79suMJ/Kajl
68SRxC/AJr6d7oP5BOwUNW+5l1YO5XqP0SZbDtIuG2Yf/ngdw5tilJY6lSFx
x/qmLaY3QKbx6nT7E/BAcXa3KoOKOdWxyfYcInL7L+tLGYfD6d7Hy7bubeC/
51bNTZHhevxPjYknfrhaa/LxzQ9fmLEKCo/3ViLkGNmhWCMCwUN6gWuVEiBi
05BVeIeJabeNutYy3RjZf2Jjq9K/+cH0xRvr27kBgr7rVFkb2MtCBX1j2OP2
e59lwtCjyDDI/hGGLAY7wprJoH3v8o5vDobv1rBfNuss1mpuXEJeMIpHP0dd
fh6K8j4nxwTxxXt3pK60pJkNmxGuYUu+D4Jp1l1NnAAUuMke31BBxCcxYpkX
/PCO/zPj93oSVlJDjuziMrHKil+e5+UDnybVl+JkosB70H21wYhQN65ktsW9
nyxDlPb/j1TYBTS28/YMYqVfx2huChWrYj3qt+lTkaFEHFS/FQfjHIdAgzAi
uAWFS5TMaNgndXj5MWUS/jEvvptZEowHwt11f9jSYMAtu2BSSMAxISnp7GtE
7E+SpYaMEKCvyeJo3gqDhlK/OqOKgBynBWr34vsjllyyIYdJx3HrT09MBwj4
ovCN78FsEHglUpgvzjY/wYnzz+KCfi7m4D91HfYuewf6QWrkxYrFf5ZL5S7z
CkP00mL+zMJ1tMbFDM2YhcA8OyPjWWAwGsWmRn+zC4L0k5aCH+4M7FTdWbHy
KQ21Fsrbn5QR4HcnPd/9vB86hdwS2v4koKarVqNLzg8fqh/Mv5ojYKYpXIKs
xALfy1xXUp+C7phGGyUNIp7s2es0N1oCnTIby8xDTwXezWMDhZ6P4+DUXdyz
IfE9fGmJEtK1iznTKaJdeDgRlngy50LIg/bokUOi4mG44McKNVNgQrkwR+tr
ny/67Zz/uvKNjnXC/b9RJugYL8ibmE8hgCGvE2wnRERWglDOzbeL7tEo9qV4
Bh5zVtTKFxHxfd3CdIcjCUOnFD+VXiJhOn/7rJkEEddkJdczIrLx4ln2+GQP
D3qWKb3BnRkCr2NkBjeb8hYUhVSqTAIBtLord3Ut87FzciqP1ZcFFVORc4ra
YRhsrQm4t7EUNuFMy/mmCHi/NE36e3Uc3q0fyT7VeAtOTFrNd20Sxs9d0jU1
I6Em6YdeohNxMS+cE/bLjkVu7Flnhigd/Nmk/EkpOgIe8jZpf6SgR3ibnlcH
ER90G39weNUIT+1t2tvehbjjLxdMFFrAGvMqDWyoEHi9qx3bMzL84Pwpe4H9
OwkB4tGm174SQcwaf9EpQ8JpM11WnWQ8tn/K9Nyb/GHxvfltR/0GOtqfu2tz
dXxgPuRVmylJhdE63qox9k2YJFKPzt6lYbwmgTQrVwJp937RfaRYKP/wkyFm
XIda4YuA9jckzFpKF9Uqp+Oqzu+ceqFgeOyz8diiSUJRkf/nN7R/87mqhKHz
TMVjQf1/5A5yLQ==
"], {0.032461031746000846`, 0.031452873907369186`,
0.014405837946699862`, 0.06316951499979087, 0.056729002670578926`,
0.020824809813603934`, 0.02082892152369792, 0.019148167591948793`,
0.01196848495992916, 0.011739163539346197`, 0.029326747704381328`,
0.011423739703616057`, 0.017425278834399295`, 0.009959864174538214,
0.009705381351114784, 0.06894013214480152, 0.13973253570722832`,
0.08716122130526885, 0.04666870751547514, 0.28058986119852114`,
0.01633872166168927}}]]], "Output",
CellChangeTimes->{3.53161477551545*^9, 3.531614844737278*^9,
3.531615675622834*^9, 3.531616096684578*^9, 3.531616578358224*^9,
3.531622867019073*^9, 3.531627038919057*^9, 3.531629525919388*^9,
3.5316301156308527`*^9, 3.5317132518218937`*^9, 3.531776067452386*^9,
3.531790200798604*^9, 3.5317908790820417`*^9, 3.5320366273791847`*^9,
3.532039842394724*^9, 3.5320546444576807`*^9, 3.532124851467326*^9,
3.5356086746573277`*^9, 3.5370974443368483`*^9, 3.537408798991962*^9,
3.537436923238772*^9, 3.537520514475543*^9, 3.5375249935445547`*^9,
3.537528524087631*^9, 3.537848719113473*^9, 3.5379390538494253`*^9,
3.540983989641171*^9, 3.5410510233795147`*^9, 3.546671102059888*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"googlePageScore", "[",
RowBox[{"citingcited21DataZeroSelf", ",", "0.9", ",", "100"}], "]"}], "//",
"TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.004761904761904761`"},
{"0.07306620048950621`"},
{"0.08519624937448336`"},
{"0.011366148529335277`"},
{"0.007978133301823957`"},
{"0.010469040271909744`"},
{"0.007701365860703314`"},
{"0.004885972925165739`"},
{"0.005620838199865377`"},
{"0.006813801308144011`"},
{"0.08293439132118707`"},
{"0.018982025012586074`"},
{"0.007806346614231834`"},
{"0.008302619267275746`"},
{"0.007290986551455464`"},
{"0.006785170193545324`"},
{"0.01082215735196022`"},
{"0.02306673069533212`"},
{"0.03086393757104127`"},
{"0.5804190948831098`"},
{"0.004866885515433281`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09878939447962543`"},
{"0.004761904761904761`"},
{"0.02345983424480278`"},
{"0.056711143697469144`"},
{"0.006765630989626489`"},
{"0.05035194940633124`"},
{"0.02566393309529668`"},
{"0.0053841144852499285`"},
{"0.005204833717506406`"},
{"0.017079548098636224`"},
{"0.05532962719309258`"},
{"0.007440570350543281`"},
{"0.005616124890565077`"},
{"0.005320838920163979`"},
{"0.004899001819590984`"},
{"0.018503248313070084`"},
{"0.09671184675930343`"},
{"0.01905163654381498`"},
{"0.07683277339480102`"},
{"0.4112863185841004`"},
{"0.0048357262545050345`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.24984729795812918`"},
{"0.06278222197617664`"},
{"0.004761904761904761`"},
{"0.011438351740618743`"},
{"0.00797556767330067`"},
{"0.01021765807660014`"},
{"0.006505752853359905`"},
{"0.005011025917826924`"},
{"0.011164318469104362`"},
{"0.0059078620791467125`"},
{"0.1631282235816241`"},
{"0.024392651848571242`"},
{"0.0060822468882922275`"},
{"0.006829610356058717`"},
{"0.005060850149011357`"},
{"0.00892222806580489`"},
{"0.013879739068655944`"},
{"0.04768547992729353`"},
{"0.03555327963388417`"},
{"0.3080419999815466`"},
{"0.004811728993089194`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008589512165770617`"},
{"0.031104367708424806`"},
{"0.006134761807188553`"},
{"0.004761904761904761`"},
{"0.2123911650583326`"},
{"0.06260631429677259`"},
{"0.08718660252845076`"},
{"0.053438907698862614`"},
{"0.006028211708151602`"},
{"0.029313506428457592`"},
{"0.023789293601464902`"},
{"0.009757465174444889`"},
{"0.006843729773857496`"},
{"0.005151222431462851`"},
{"0.005212693642445707`"},
{"0.015150539418007486`"},
{"0.018928969853087056`"},
{"0.022195140196642822`"},
{"0.012835123804319898`"},
{"0.3679379173293523`"},
{"0.01064265061259802`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008473816932397333`"},
{"0.005726209347121692`"},
{"0.005362943921183807`"},
{"0.26575160123346`"},
{"0.004761904761904761`"},
{"0.028486439488611744`"},
{"0.03394202570360616`"},
{"0.12493010766215722`"},
{"0.026181355240387706`"},
{"0.016769478295633404`"},
{"0.025236865132949204`"},
{"0.012833002043651958`"},
{"0.03062640308868219`"},
{"0.016842131380820982`"},
{"0.018044209699379074`"},
{"0.0139360079733179`"},
{"0.006538602936037327`"},
{"0.00981459659540444`"},
{"0.007238714484208524`"},
{"0.20314445627954703`"},
{"0.13535912779953763`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.018373788793858807`"},
{"0.08842584875256987`"},
{"0.01036283825081958`"},
{"0.21420450416949835`"},
{"0.06977851009356259`"},
{"0.004761904761904761`"},
{"0.0413833929586555`"},
{"0.01801026666837635`"},
{"0.007481588811810514`"},
{"0.02037989237522493`"},
{"0.08877590709562705`"},
{"0.015977235522159676`"},
{"0.007764328242741311`"},
{"0.005906326268053221`"},
{"0.004815759891605865`"},
{"0.01679852625010151`"},
{"0.04485704882437671`"},
{"0.020810733412833765`"},
{"0.015384829095447531`"},
{"0.2781170793422835`"},
{"0.007629690418488551`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010332296542984908`"},
{"0.037802528092829385`"},
{"0.005723292175898289`"},
{"0.35004136688763915`"},
{"0.1042796401604407`"},
{"0.03672803627718956`"},
{"0.004761904761904761`"},
{"0.04752950663441096`"},
{"0.019366510624482913`"},
{"0.04038979128048844`"},
{"0.017090284541351176`"},
{"0.007165373296888581`"},
{"0.006302952234335563`"},
{"0.005482945322399907`"},
{"0.005030527715814717`"},
{"0.07022107721469939`"},
{"0.02267481437263711`"},
{"0.01362646224093332`"},
{"0.015959240524888202`"},
{"0.17291987390953745`"},
{"0.0065715751882455195`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005178236218059225`"},
{"0.006228115542274833`"},
{"0.004979121173811438`"},
{"0.2192450101520898`"},
{"0.4400273914875685`"},
{"0.021759088993602266`"},
{"0.07512192085200935`"},
{"0.004761904761904761`"},
{"0.06078563766616864`"},
{"0.03138901658813163`"},
{"0.011694728575259546`"},
{"0.010083706853618358`"},
{"0.014174615944527449`"},
{"0.012907520208405163`"},
{"0.005558364938895911`"},
{"0.02038338505152664`"},
{"0.005087729379764777`"},
{"0.004961019806152548`"},
{"0.004924817070834768`"},
{"0.03365168754549286`"},
{"0.007096981189901543`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008866428365996958`"},
{"0.0060376350712847675`"},
{"0.017075475574181355`"},
{"0.032883438103455356`"},
{"0.19057479764986238`"},
{"0.015245079912896996`"},
{"0.062114302148814665`"},
{"0.14292904392127861`"},
{"0.004761904761904761`"},
{"0.09073503430707917`"},
{"0.0887382390402235`"},
{"0.009088294506758698`"},
{"0.10243847323226098`"},
{"0.026449320021364887`"},
{"0.05739964665762767`"},
{"0.03892929043921278`"},
{"0.010197625210567402`"},
{"0.03227330621636057`"},
{"0.005372036648999547`"},
{"0.036987961707547555`"},
{"0.02090266650232138`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010564452028734916`"},
{"0.06236019603632925`"},
{"0.005509472201189627`"},
{"0.27459815189425185`"},
{"0.08927262385058446`"},
{"0.05018552631083285`"},
{"0.10383238969189447`"},
{"0.05990390302153612`"},
{"0.0716157929036657`"},
{"0.004761904761904761`"},
{"0.12811053224390778`"},
{"0.011703602412407095`"},
{"0.03843803797921352`"},
{"0.016011014800667515`"},
{"0.008855726453226648`"},
{"0.0070758039787388715`"},
{"0.008072560564452028`"},
{"0.006007850494046205`"},
{"0.005117889256802316`"},
{"0.03081996978840583`"},
{"0.007182599327208139`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.10476328796429493`"},
{"0.06557439784589282`"},
{"0.08315213382022058`"},
{"0.05109641842794437`"},
{"0.04966480395411456`"},
{"0.04154817232857511`"},
{"0.012206300025819777`"},
{"0.008608590608977906`"},
{"0.025974696617609087`"},
{"0.03524906864372395`"},
{"0.004761904761904761`"},
{"0.11677640072295378`"},
{"0.013139961639187046`"},
{"0.011534063664195343`"},
{"0.005708015196783592`"},
{"0.013364040426395189`"},
{"0.06098078270812585`"},
{"0.01839336431706687`"},
{"0.013227103389767991`"},
{"0.2168649256759249`"},
{"0.04741156726052156`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.06308443762618916`"},
{"0.022008710908914576`"},
{"0.03503407658193809`"},
{"0.04955916452861463`"},
{"0.13084966628754818`"},
{"0.022203119351795524`"},
{"0.009122208409377452`"},
{"0.01512109750398956`"},
{"0.01337142151806103`"},
{"0.012649333015931793`"},
{"0.29773542818349336`"},
{"0.004761904761904761`"},
{"0.008427892541945493`"},
{"0.006094991227374118`"},
{"0.008039075656183598`"},
{"0.007816894578605372`"},
{"0.0070948060764761366`"},
{"0.009566570564533904`"},
{"0.008233484099064546`"},
{"0.24157916082559672`"},
{"0.027646555752462068`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015440686162225445`"},
{"0.00726324094576366`"},
{"0.005595683489857727`"},
{"0.020122674403807488`"},
{"0.15634929118627677`"},
{"0.013805197118933087`"},
{"0.006942556819627904`"},
{"0.016915833142449925`"},
{"0.06732737777099082`"},
{"0.02252780534982566`"},
{"0.02255987376243923`"},
{"0.005595683489857727`"},
{"0.004761904761904761`"},
{"0.118925453666234`"},
{"0.1255315466646306`"},
{"0.062485047466340884`"},
{"0.0387864905449085`"},
{"0.0953551703952559`"},
{"0.007680130309740143`"},
{"0.16952940877045636`"},
{"0.01649894377847344`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0163858939802336`"},
{"0.009007187780772686`"},
{"0.0057726864330637905`"},
{"0.010119047619047618`"},
{"0.18912848158131176`"},
{"0.010826594788858938`"},
{"0.007086702605570529`"},
{"0.03377133872416891`"},
{"0.024168912848158135`"},
{"0.01931716082659479`"},
{"0.03205300988319856`"},
{"0.004761904761904761`"},
{"0.3408468104222821`"},
{"0.004761904761904761`"},
{"0.05823225516621743`"},
{"0.025381850853548965`"},
{"0.08451257861635221`"},
{"0.022753818508535494`"},
{"0.009714734950584007`"},
{"0.07955974842767297`"},
{"0.011837376460017968`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.025246348278296492`"},
{"0.005983454145909772`"},
{"0.005043800773598225`"},
{"0.013782577136095615`"},
{"0.2297149220932892`"},
{"0.005607592796985153`"},
{"0.007017072855452474`"},
{"0.0068291421809901645`"},
{"0.0970358659228987`"},
{"0.014722230508407161`"},
{"0.024494625580447252`"},
{"0.011527409042547902`"},
{"0.31325010689178573`"},
{"0.06283248317075839`"},
{"0.004761904761904761`"},
{"0.007486899541608248`"},
{"0.005607592796985153`"},
{"0.010775686344698663`"},
{"0.0068291421809901645`"},
{"0.04253597032882896`"},
{"0.0989151726675218`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005562349453400036`"},
{"0.010148230498425049`"},
{"0.005412266073744672`"},
{"0.010092644061515655`"},
{"0.011132110431721326`"},
{"0.007085417824717434`"},
{"0.016390587363350008`"},
{"0.006268297202149341`"},
{"0.007468964239392254`"},
{"0.0050565128775245495`"},
{"0.006896423939225495`"},
{"0.005312210487307762`"},
{"0.011599036501760236`"},
{"0.0062071521215490075`"},
{"0.0049953677969242155`"},
{"0.004761904761904761`"},
{"0.31255512321660184`"},
{"0.08187696868630721`"},
{"0.03352788586251621`"},
{"0.4416379470075968`"},
{"0.006012599592366128`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005905344186065718`"},
{"0.022022766786013684`"},
{"0.005015568797981424`"},
{"0.006408769734587095`"},
{"0.005148254601467678`"},
{"0.010104459614042476`"},
{"0.006420477305482941`"},
{"0.004804832521856196`"},
{"0.004992153656189732`"},
{"0.004859467852703477`"},
{"0.013452824890254428`"},
{"0.0048165400927520415`"},
{"0.007076101275650316`"},
{"0.008071244801797224`"},
{"0.0048477602818076315`"},
{"0.15256998732196028`"},
{"0.004761904761904761`"},
{"0.1163389579229489`"},
{"0.07421121531606312`"},
{"0.5333587307093508`"},
{"0.004812637569120093`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0133897196929816`"},
{"0.009763679021492586`"},
{"0.010377845801893843`"},
{"0.010009345733653089`"},
{"0.008451818778555505`"},
{"0.0089873722110654`"},
{"0.006535618423703587`"},
{"0.004811038104336861`"},
{"0.0069335984974036`"},
{"0.004845431444039331`"},
{"0.00685007181526903`"},
{"0.004879824783741802`"},
{"0.012736246238634664`"},
{"0.005661044928412198`"},
{"0.004919131457687482`"},
{"0.06997659017203169`"},
{"0.16652360805110908`"},
{"0.004761904761904761`"},
{"0.022199327991057213`"},
{"0.6125659173182034`"},
{"0.004820864772823281`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02626803229540419`"},
{"0.053614675619086095`"},
{"0.013193155182751843`"},
{"0.011261467080940515`"},
{"0.006799646328129258`"},
{"0.008276819582455564`"},
{"0.008269244334997481`"},
{"0.004792205751737095`"},
{"0.004883108721234099`"},
{"0.0048528077314017645`"},
{"0.00907979581301243`"},
{"0.005049764165311939`"},
{"0.005216419609389778`"},
{"0.0052315701043059454`"},
{"0.004890683968692183`"},
{"0.04600912717117013`"},
{"0.2174975791272674`"},
{"0.04066100246576308`"},
{"0.004761904761904761`"},
{"0.5146063596807654`"},
{"0.0047846305042790116`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.055215287538772764`"},
{"0.04462846135354898`"},
{"0.013263846864247463`"},
{"0.07087120384566553`"},
{"0.015027979549762224`"},
{"0.021587142618689936`"},
{"0.014534672020901364`"},
{"0.005167919188950735`"},
{"0.0051882199103030335`"},
{"0.004973032263968667`"},
{"0.020170152268299487`"},
{"0.007819193397560948`"},
{"0.007833403902507557`"},
{"0.005833782849306133`"},
{"0.00508062608713585`"},
{"0.11248159240147221`"},
{"0.29384011667436805`"},
{"0.19580793326411755`"},
{"0.08892057519999433`"},
{"0.004761904761904761`"},
{"0.006992954038522389`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0051894821031003005`"},
{"0.00511402727818344`"},
{"0.00513917888648906`"},
{"0.023474701341286028`"},
{"0.6444427587987379`"},
{"0.00788070419180164`"},
{"0.006145243218713859`"},
{"0.00586857552735204`"},
{"0.012483448511730097`"},
{"0.00649736573499254`"},
{"0.06663486119372994`"},
{"0.019978627786804853`"},
{"0.009591013556583799`"},
{"0.005340391752934021`"},
{"0.0372829343010714`"},
{"0.009767074814723139`"},
{"0.00516433049479468`"},
{"0.00622069804363072`"},
{"0.004761904761904761`"},
{"0.108260772939531`"},
{"0.004761904761904761`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03246103174600641`", "0.03145287390737331`", "0.014405837946700563`",
"0.0631695149997338`", "0.05672900267049718`", "0.020824809813595094`",
"0.02082892152368146`", "0.019148167591921332`", "0.011968484959918702`",
"0.011739163539336784`", "0.029326747704370677`",
"0.011423739703611633`", "0.017425278834386916`", "0.00995986417453289`",
"0.009705381351107486`", "0.06894013214483612`", "0.13973253570730473`",
"0.08716122130531176`", "0.04666870751549852`", "0.28058986119860607`",
"0.016338721661667374`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJxF1nk0FOr/B3Br2SlRciupS4irUkR5u6KEUtJ6Q5QkKjWrsY0JU0OMJYPK
vmUnJAmDhAlD4lraVKQr7rdyZe3nd873O/c8z/PH55/PeZ3nPMt7vesVezcR
ISEhpf+u5UZBikZBBAwlh12ilJXi66/tbz07yiFhUZmqvo8Jc8/PYz3H6Kic
LHve6h2Cg3dUcihhgeAGNDgdEiWCzRnd81acgqlbtMGWT75g63hv1Tcph7gN
W32Jdwy8GsJ3hE8HQnGiteQfoSCoscpsNV/5Y+3bPb83tvqCzNd3/qIVCge9
vpXtSRyMY7qFl5gMr+EOBV70EPTPfE+1nSDgjK2vyB7rR/ift/+y+4t+8XjE
Ff3cYSpZgA1n3Hbvq/DF5eEZ+cfP7uP1tL1b5r5E5H37xThblgzTZPbo/cMk
ZHjLLT/gH4WlaXE7tB3yUWiv+lGIFgCZwAbpCSEKxj+c7TrAI+GYbnTLtAIR
4WcDp69/jQYlbIqlWl+JzhPsIktGDKoG5yUO5T3AM5WRvuv2/UhY2+eS0k6A
c/Gg1M+ZDkR4bhoOWF4s8CYZ6tye92LipgUnOuAoHY3vTfsXxoKxw3bgcVMm
DbvaZpdcDSVihpdNOvwqFJ4q5Vm9W6nQNsqrdH3XiDG9Ds2zM/HY9Yn1sHSU
isrsmSjHaV9QDq9IKqoiomazkF6nJQOH3ohKz3qFo20ve4vJxRxMy8atljJI
w+WnX1onK17gYHVCLrmcgGtBj9rPcIKwQ92quasvGWt3W99uUPMReNP2/Gdn
2m88KNIv5UwtKcbwIQZ58HAF6Kvatpw4nQex8V31kiVUKIw0rDktlgTtW7JU
o9PxsHVmtlfOXsf8hdlKHQk/pJOlaq6pkCBFCOCNnCRhj9fNGdOlkYjQenV/
jWsM1O1UMu2r4pB+qkfzwH4WCl9QaTbhvfCw5LjyeSEwZDYRK08FoaxHNMmR
SMGeXUttiVMkjC2TElYU6RR4RXLHOeE696DQVHGu70wqCH0l5z1na6H9j7LI
/o5EyP3qni62OQpndBJOlvQm4P2vpWf0rVgY701fyzydjNjp4QMKiEL+rNZF
PVo0XG4OHPFlhePY0ZODRs00xCUbDOSrBGMsMT75eJY/9J9L7UgXakVzYsT9
a0e4KOR8WBnLj0a8x3W2YnoFPhyQufPLzhDc1pVIkvXkoZ3LVxd+VSLwTlWV
mxroZ6JuxOGm1dVorN5yoEw0MwDEG/NelNexmBPKihKrqoCp/Ra1Y6fZmDOU
WfBrC4T8vWhXky1UfHfseVD8iIDcryTRtG1ROLvrHI8+lQWj7uyCC3a3oe4Q
0b6CEQmTObnYvOedsDppeMnOLBAa6pOOKloh2Nha9Uf/qXSIfL8RdvAqBaof
uCOK7j1Ie6Ams7y0CutsD7mJtacJvJxZ3YSWozkQsljB5HfHwLfIKuhHQQaM
X1XHrqFH4fOtWHif9EdB4JWBdZ0+WCLO/GJFImONwTGhD4lEFAer6YnMlOBz
UInEMiMOKvtpbfqfwpBzKoCedJyNQ+FpkrvVm1Dpa9HM+0zDxFL7bU3bSTja
uUYym+GDJy559+fOEcGQ3n7NSOE5rq//mnlBaxCb1vjUiFrFQTHbskTf5IHA
60ouCrNZV4SA7eeTjZanYIG4ftj9GxO01ZY7G7OCMaBuXxu79BbstY5Lml9h
YYCvauzUSIbeHxV8lzexiCHXfX/dQ4TFa817wvZE2PeqBUtvJqJO9Ys5zzgV
ItQml0fL/BEu+/l15CYG1h7tsv+rigpralKjiV8UWoWoyio9KQhk5VtyzzVj
c4/BfIdRJIJTitSutRVhjW5mZaBNvcBbtP+bhYfxQ9xceTsx/GEFhvPIu4fu
MtDp73ruws4q0CSnO5lKd2DBOcfyO1sA9tRtY9Z4OnIbtisHDC2eyyMUklpo
CkSSQ1XnhcjQcayXVv47DSsOqhow3G9jyYXyWn5aCLzzVk3mfylCxStuoUoU
GeMuvmpiMZ242PpqZXR/BVzSfbo/l9wHV3jhUn1sFW4V13s/yisEZcYtxeNo
qcD7p/N6yS9udQim9o/J/WDizQrlGxqF6bhs90x0ixsb1h3zvt/UGZDjjeQG
z/ph8sj36hM36Nhoa65cfIeKM66VEwH/EHHX2EjLMjIZGjVOR+ie/shtSbFr
7KzC9NS2Ht+WYvz98KQdaX85NCl6tnZauXBl+u/PvXQfwkaV9m2Wmdix0mHg
3s8bWFIg5eOSGoQA+TmXXxISsVRlBU1b5t/zm/VQZlju4xOU3lB+vm6UhVcO
XZ06yUw81Am9v9+Fgo61nI13nMIQP94d+saoCJIbu5rLX0ZDsaGnoUM5DBFV
FX3G9TyIyuVvd9ibg0tl/rsOaBRDu88+jnAzDlVUB9bcRCpqNKrvdTrfh9NQ
aURhbR1MW/9ec7E6Dhr9Vsq5hQxo/Vh+qmMqAjViP/g+rmF4LT5Z/WHkJgI1
qz6uknsh8GqqVcdlmAchRGagVn6Kit4/LKitZDraDKK7D4jQMei5NuiqvD92
bipwTOdcx8/ddObDQToc5KLfKYy1g7jJ8NsZu7vIzObyHZMjcdJmm5t8nT8C
Td37Av8i42Dt+07JO7G4OLb1s5loI7Jk1bYMW4bjUVe/+/MrfqiJCj3hah8F
vTdZk467SkBLHfViLuOguFeaPqHCEfT5n/di5KYlw1dr0GDydOLisjos51bs
lVoownn6y5yugXRY/3rKeqtHJSIPalhtIwWi5pY+d8ODp/ib3+Ks8pENNWXp
x+RnbMzoxO47fY2B9htSD1UyKYi1ebQ4g/FYPark9PZm7Io4/d1scygmM3pM
vy7xx+7oR8o068V9F5PdX10bD/le4cq3z2Lgx3FmmXmkCHx2F79suMJ/Kajl
68SRxC/AJr6d7oP5BOwUNW+5l1YO5XqP0SZbDtIuG2Yf/ngdw5tilJY6lSFx
x/qmLaY3QKbx6nT7E/BAcXa3KoOKOdWxyfYcInL7L+tLGYfD6d7Hy7bubeC/
51bNTZHhevxPjYknfrhaa/LxzQ9fmLEKCo/3ViLkGNmhWCMCwUN6gWuVEiBi
05BVeIeJabeNutYy3RjZf2Jjq9K/+cH0xRvr27kBgr7rVFkb2MtCBX1j2OP2
e59lwtCjyDDI/hGGLAY7wprJoH3v8o5vDobv1rBfNuss1mpuXEJeMIpHP0dd
fh6K8j4nxwTxxXt3pK60pJkNmxGuYUu+D4Jp1l1NnAAUuMke31BBxCcxYpkX
/PCO/zPj93oSVlJDjuziMrHKil+e5+UDnybVl+JkosB70H21wYhQN65ktsW9
nyxDlPb/j1TYBTS28/YMYqVfx2huChWrYj3qt+lTkaFEHFS/FQfjHIdAgzAi
uAWFS5TMaNgndXj5MWUS/jEvvptZEowHwt11f9jSYMAtu2BSSMAxISnp7GtE
7E+SpYaMEKCvyeJo3gqDhlK/OqOKgBynBWr34vsjllyyIYdJx3HrT09MBwj4
ovCN78FsEHglUpgvzjY/wYnzz+KCfi7m4D91HfYuewf6QWrkxYrFf5ZL5S7z
CkP00mL+zMJ1tMbFDM2YhcA8OyPjWWAwGsWmRn+zC4L0k5aCH+4M7FTdWbHy
KQ21Fsrbn5QR4HcnPd/9vB86hdwS2v4koKarVqNLzg8fqh/Mv5ojYKYpXIKs
xALfy1xXUp+C7phGGyUNIp7s2es0N1oCnTIby8xDTwXezWMDhZ6P4+DUXdyz
IfE9fGmJEtK1iznTKaJdeDgRlngy50LIg/bokUOi4mG44McKNVNgQrkwR+tr
ny/67Zz/uvKNjnXC/b9RJugYL8ibmE8hgCGvE2wnRERWglDOzbeL7tEo9qV4
Bh5zVtTKFxHxfd3CdIcjCUOnFD+VXiJhOn/7rJkEEddkJdczIrLx4ln2+GQP
D3qWKb3BnRkCr2NkBjeb8hYUhVSqTAIBtLord3Ut87FzciqP1ZcFFVORc4ra
YRhsrQm4t7EUNuFMy/mmCHi/NE36e3Uc3q0fyT7VeAtOTFrNd20Sxs9d0jU1
I6Em6YdeohNxMS+cE/bLjkVu7Flnhigd/Nmk/EkpOgIe8jZpf6SgR3ibnlcH
ER90G39weNUIT+1t2tvehbjjLxdMFFrAGvMqDWyoEHi9qx3bMzL84Pwpe4H9
OwkB4tGm174SQcwaf9EpQ8JpM11WnWQ8tn/K9Nyb/GHxvfltR/0GOtqfu2tz
dXxgPuRVmylJhdE63qox9k2YJFKPzt6lYbwmgTQrVwJp937RfaRYKP/wkyFm
XIda4YuA9jckzFpKF9Uqp+Oqzu+ceqFgeOyz8diiSUJRkf/nN7R/87mqhKHz
TMVjQf1/5A5yLQ==
"], {0.03246103174600641, 0.03145287390737331,
0.014405837946700563`, 0.0631695149997338, 0.05672900267049718,
0.020824809813595094`, 0.02082892152368146, 0.019148167591921332`,
0.011968484959918702`, 0.011739163539336784`, 0.029326747704370677`,
0.011423739703611633`, 0.017425278834386916`, 0.00995986417453289,
0.009705381351107486, 0.06894013214483612, 0.13973253570730473`,
0.08716122130531176, 0.04666870751549852, 0.28058986119860607`,
0.016338721661667374`}}]]], "Output",
CellChangeTimes->{3.5316147892594643`*^9, 3.531614848354909*^9,
3.531615686153913*^9, 3.53161609681293*^9, 3.5316165784832153`*^9,
3.531622867149292*^9, 3.5316270390623198`*^9, 3.5316295261202383`*^9,
3.531630115731564*^9, 3.531713251970915*^9, 3.531776067575654*^9,
3.531790200919943*^9, 3.531790879208127*^9, 3.532036627503133*^9,
3.532039842501646*^9, 3.532054644558632*^9, 3.532124851586048*^9,
3.5356086747678013`*^9, 3.537097444435433*^9, 3.53740879910273*^9,
3.537436923353271*^9, 3.5375205145715237`*^9, 3.537524993639654*^9,
3.5375285241815042`*^9, 3.537848719209156*^9, 3.537939053943891*^9,
3.540983989740076*^9, 3.541051023486466*^9, 3.5466711021538477`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "=",
RowBox[{"googlePageScore", "[",
RowBox[{"citingcited21DataZeroSelf", ",", "0.9", ",", "200"}], "]"}]}],
")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614803398451*^9}, {3.531614879893703*^9,
3.5316149023127337`*^9}, {3.531615695254334*^9, 3.53161569825383*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.004761904761904761`"},
{"0.07306620048950621`"},
{"0.08519624937448336`"},
{"0.011366148529335277`"},
{"0.007978133301823957`"},
{"0.010469040271909744`"},
{"0.007701365860703314`"},
{"0.004885972925165739`"},
{"0.005620838199865377`"},
{"0.006813801308144011`"},
{"0.08293439132118707`"},
{"0.018982025012586074`"},
{"0.007806346614231834`"},
{"0.008302619267275746`"},
{"0.007290986551455464`"},
{"0.006785170193545324`"},
{"0.01082215735196022`"},
{"0.02306673069533212`"},
{"0.03086393757104127`"},
{"0.5804190948831098`"},
{"0.004866885515433281`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09878939447962543`"},
{"0.004761904761904761`"},
{"0.02345983424480278`"},
{"0.056711143697469144`"},
{"0.006765630989626489`"},
{"0.05035194940633124`"},
{"0.02566393309529668`"},
{"0.0053841144852499285`"},
{"0.005204833717506406`"},
{"0.017079548098636224`"},
{"0.05532962719309258`"},
{"0.007440570350543281`"},
{"0.005616124890565077`"},
{"0.005320838920163979`"},
{"0.004899001819590984`"},
{"0.018503248313070084`"},
{"0.09671184675930343`"},
{"0.01905163654381498`"},
{"0.07683277339480102`"},
{"0.4112863185841004`"},
{"0.0048357262545050345`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.24984729795812918`"},
{"0.06278222197617664`"},
{"0.004761904761904761`"},
{"0.011438351740618743`"},
{"0.00797556767330067`"},
{"0.01021765807660014`"},
{"0.006505752853359905`"},
{"0.005011025917826924`"},
{"0.011164318469104362`"},
{"0.0059078620791467125`"},
{"0.1631282235816241`"},
{"0.024392651848571242`"},
{"0.0060822468882922275`"},
{"0.006829610356058717`"},
{"0.005060850149011357`"},
{"0.00892222806580489`"},
{"0.013879739068655944`"},
{"0.04768547992729353`"},
{"0.03555327963388417`"},
{"0.3080419999815466`"},
{"0.004811728993089194`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008589512165770617`"},
{"0.031104367708424806`"},
{"0.006134761807188553`"},
{"0.004761904761904761`"},
{"0.2123911650583326`"},
{"0.06260631429677259`"},
{"0.08718660252845076`"},
{"0.053438907698862614`"},
{"0.006028211708151602`"},
{"0.029313506428457592`"},
{"0.023789293601464902`"},
{"0.009757465174444889`"},
{"0.006843729773857496`"},
{"0.005151222431462851`"},
{"0.005212693642445707`"},
{"0.015150539418007486`"},
{"0.018928969853087056`"},
{"0.022195140196642822`"},
{"0.012835123804319898`"},
{"0.3679379173293523`"},
{"0.01064265061259802`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008473816932397333`"},
{"0.005726209347121692`"},
{"0.005362943921183807`"},
{"0.26575160123346`"},
{"0.004761904761904761`"},
{"0.028486439488611744`"},
{"0.03394202570360616`"},
{"0.12493010766215722`"},
{"0.026181355240387706`"},
{"0.016769478295633404`"},
{"0.025236865132949204`"},
{"0.012833002043651958`"},
{"0.03062640308868219`"},
{"0.016842131380820982`"},
{"0.018044209699379074`"},
{"0.0139360079733179`"},
{"0.006538602936037327`"},
{"0.00981459659540444`"},
{"0.007238714484208524`"},
{"0.20314445627954703`"},
{"0.13535912779953763`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.018373788793858807`"},
{"0.08842584875256987`"},
{"0.01036283825081958`"},
{"0.21420450416949835`"},
{"0.06977851009356259`"},
{"0.004761904761904761`"},
{"0.0413833929586555`"},
{"0.01801026666837635`"},
{"0.007481588811810514`"},
{"0.02037989237522493`"},
{"0.08877590709562705`"},
{"0.015977235522159676`"},
{"0.007764328242741311`"},
{"0.005906326268053221`"},
{"0.004815759891605865`"},
{"0.01679852625010151`"},
{"0.04485704882437671`"},
{"0.020810733412833765`"},
{"0.015384829095447531`"},
{"0.2781170793422835`"},
{"0.007629690418488551`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010332296542984908`"},
{"0.037802528092829385`"},
{"0.005723292175898289`"},
{"0.35004136688763915`"},
{"0.1042796401604407`"},
{"0.03672803627718956`"},
{"0.004761904761904761`"},
{"0.04752950663441096`"},
{"0.019366510624482913`"},
{"0.04038979128048844`"},
{"0.017090284541351176`"},
{"0.007165373296888581`"},
{"0.006302952234335563`"},
{"0.005482945322399907`"},
{"0.005030527715814717`"},
{"0.07022107721469939`"},
{"0.02267481437263711`"},
{"0.01362646224093332`"},
{"0.015959240524888202`"},
{"0.17291987390953745`"},
{"0.0065715751882455195`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005178236218059225`"},
{"0.006228115542274833`"},
{"0.004979121173811438`"},
{"0.2192450101520898`"},
{"0.4400273914875685`"},
{"0.021759088993602266`"},
{"0.07512192085200935`"},
{"0.004761904761904761`"},
{"0.06078563766616864`"},
{"0.03138901658813163`"},
{"0.011694728575259546`"},
{"0.010083706853618358`"},
{"0.014174615944527449`"},
{"0.012907520208405163`"},
{"0.005558364938895911`"},
{"0.02038338505152664`"},
{"0.005087729379764777`"},
{"0.004961019806152548`"},
{"0.004924817070834768`"},
{"0.03365168754549286`"},
{"0.007096981189901543`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008866428365996958`"},
{"0.0060376350712847675`"},
{"0.017075475574181355`"},
{"0.032883438103455356`"},
{"0.19057479764986238`"},
{"0.015245079912896996`"},
{"0.062114302148814665`"},
{"0.14292904392127861`"},
{"0.004761904761904761`"},
{"0.09073503430707917`"},
{"0.0887382390402235`"},
{"0.009088294506758698`"},
{"0.10243847323226098`"},
{"0.026449320021364887`"},
{"0.05739964665762767`"},
{"0.03892929043921278`"},
{"0.010197625210567402`"},
{"0.03227330621636057`"},
{"0.005372036648999547`"},
{"0.036987961707547555`"},
{"0.02090266650232138`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.010564452028734916`"},
{"0.06236019603632925`"},
{"0.005509472201189627`"},
{"0.27459815189425185`"},
{"0.08927262385058446`"},
{"0.05018552631083285`"},
{"0.10383238969189447`"},
{"0.05990390302153612`"},
{"0.0716157929036657`"},
{"0.004761904761904761`"},
{"0.12811053224390778`"},
{"0.011703602412407095`"},
{"0.03843803797921352`"},
{"0.016011014800667515`"},
{"0.008855726453226648`"},
{"0.0070758039787388715`"},
{"0.008072560564452028`"},
{"0.006007850494046205`"},
{"0.005117889256802316`"},
{"0.03081996978840583`"},
{"0.007182599327208139`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.10476328796429493`"},
{"0.06557439784589282`"},
{"0.08315213382022058`"},
{"0.05109641842794437`"},
{"0.04966480395411456`"},
{"0.04154817232857511`"},
{"0.012206300025819777`"},
{"0.008608590608977906`"},
{"0.025974696617609087`"},
{"0.03524906864372395`"},
{"0.004761904761904761`"},
{"0.11677640072295378`"},
{"0.013139961639187046`"},
{"0.011534063664195343`"},
{"0.005708015196783592`"},
{"0.013364040426395189`"},
{"0.06098078270812585`"},
{"0.01839336431706687`"},
{"0.013227103389767991`"},
{"0.2168649256759249`"},
{"0.04741156726052156`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.06308443762618916`"},
{"0.022008710908914576`"},
{"0.03503407658193809`"},
{"0.04955916452861463`"},
{"0.13084966628754818`"},
{"0.022203119351795524`"},
{"0.009122208409377452`"},
{"0.01512109750398956`"},
{"0.01337142151806103`"},
{"0.012649333015931793`"},
{"0.29773542818349336`"},
{"0.004761904761904761`"},
{"0.008427892541945493`"},
{"0.006094991227374118`"},
{"0.008039075656183598`"},
{"0.007816894578605372`"},
{"0.0070948060764761366`"},
{"0.009566570564533904`"},
{"0.008233484099064546`"},
{"0.24157916082559672`"},
{"0.027646555752462068`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015440686162225445`"},
{"0.00726324094576366`"},
{"0.005595683489857727`"},
{"0.020122674403807488`"},
{"0.15634929118627677`"},
{"0.013805197118933087`"},
{"0.006942556819627904`"},
{"0.016915833142449925`"},
{"0.06732737777099082`"},
{"0.02252780534982566`"},
{"0.02255987376243923`"},
{"0.005595683489857727`"},
{"0.004761904761904761`"},
{"0.118925453666234`"},
{"0.1255315466646306`"},
{"0.062485047466340884`"},
{"0.0387864905449085`"},
{"0.0953551703952559`"},
{"0.007680130309740143`"},
{"0.16952940877045636`"},
{"0.01649894377847344`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0163858939802336`"},
{"0.009007187780772686`"},
{"0.0057726864330637905`"},
{"0.010119047619047618`"},
{"0.18912848158131176`"},
{"0.010826594788858938`"},
{"0.007086702605570529`"},
{"0.03377133872416891`"},
{"0.024168912848158135`"},
{"0.01931716082659479`"},
{"0.03205300988319856`"},
{"0.004761904761904761`"},
{"0.3408468104222821`"},
{"0.004761904761904761`"},
{"0.05823225516621743`"},
{"0.025381850853548965`"},
{"0.08451257861635221`"},
{"0.022753818508535494`"},
{"0.009714734950584007`"},
{"0.07955974842767297`"},
{"0.011837376460017968`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.025246348278296492`"},
{"0.005983454145909772`"},
{"0.005043800773598225`"},
{"0.013782577136095615`"},
{"0.2297149220932892`"},
{"0.005607592796985153`"},
{"0.007017072855452474`"},
{"0.0068291421809901645`"},
{"0.0970358659228987`"},
{"0.014722230508407161`"},
{"0.024494625580447252`"},
{"0.011527409042547902`"},
{"0.31325010689178573`"},
{"0.06283248317075839`"},
{"0.004761904761904761`"},
{"0.007486899541608248`"},
{"0.005607592796985153`"},
{"0.010775686344698663`"},
{"0.0068291421809901645`"},
{"0.04253597032882896`"},
{"0.0989151726675218`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005562349453400036`"},
{"0.010148230498425049`"},
{"0.005412266073744672`"},
{"0.010092644061515655`"},
{"0.011132110431721326`"},
{"0.007085417824717434`"},
{"0.016390587363350008`"},
{"0.006268297202149341`"},
{"0.007468964239392254`"},
{"0.0050565128775245495`"},
{"0.006896423939225495`"},
{"0.005312210487307762`"},
{"0.011599036501760236`"},
{"0.0062071521215490075`"},
{"0.0049953677969242155`"},
{"0.004761904761904761`"},
{"0.31255512321660184`"},
{"0.08187696868630721`"},
{"0.03352788586251621`"},
{"0.4416379470075968`"},
{"0.006012599592366128`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.005905344186065718`"},
{"0.022022766786013684`"},
{"0.005015568797981424`"},
{"0.006408769734587095`"},
{"0.005148254601467678`"},
{"0.010104459614042476`"},
{"0.006420477305482941`"},
{"0.004804832521856196`"},
{"0.004992153656189732`"},
{"0.004859467852703477`"},
{"0.013452824890254428`"},
{"0.0048165400927520415`"},
{"0.007076101275650316`"},
{"0.008071244801797224`"},
{"0.0048477602818076315`"},
{"0.15256998732196028`"},
{"0.004761904761904761`"},
{"0.1163389579229489`"},
{"0.07421121531606312`"},
{"0.5333587307093508`"},
{"0.004812637569120093`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0133897196929816`"},
{"0.009763679021492586`"},
{"0.010377845801893843`"},
{"0.010009345733653089`"},
{"0.008451818778555505`"},
{"0.0089873722110654`"},
{"0.006535618423703587`"},
{"0.004811038104336861`"},
{"0.0069335984974036`"},
{"0.004845431444039331`"},
{"0.00685007181526903`"},
{"0.004879824783741802`"},
{"0.012736246238634664`"},
{"0.005661044928412198`"},
{"0.004919131457687482`"},
{"0.06997659017203169`"},
{"0.16652360805110908`"},
{"0.004761904761904761`"},
{"0.022199327991057213`"},
{"0.6125659173182034`"},
{"0.004820864772823281`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02626803229540419`"},
{"0.053614675619086095`"},
{"0.013193155182751843`"},
{"0.011261467080940515`"},
{"0.006799646328129258`"},
{"0.008276819582455564`"},
{"0.008269244334997481`"},
{"0.004792205751737095`"},
{"0.004883108721234099`"},
{"0.0048528077314017645`"},
{"0.00907979581301243`"},
{"0.005049764165311939`"},
{"0.005216419609389778`"},
{"0.0052315701043059454`"},
{"0.004890683968692183`"},
{"0.04600912717117013`"},
{"0.2174975791272674`"},
{"0.04066100246576308`"},
{"0.004761904761904761`"},
{"0.5146063596807654`"},
{"0.0047846305042790116`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.055215287538772764`"},
{"0.04462846135354898`"},
{"0.013263846864247463`"},
{"0.07087120384566553`"},
{"0.015027979549762224`"},
{"0.021587142618689936`"},
{"0.014534672020901364`"},
{"0.005167919188950735`"},
{"0.0051882199103030335`"},
{"0.004973032263968667`"},
{"0.020170152268299487`"},
{"0.007819193397560948`"},
{"0.007833403902507557`"},
{"0.005833782849306133`"},
{"0.00508062608713585`"},
{"0.11248159240147221`"},
{"0.29384011667436805`"},
{"0.19580793326411755`"},
{"0.08892057519999433`"},
{"0.004761904761904761`"},
{"0.006992954038522389`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0051894821031003005`"},
{"0.00511402727818344`"},
{"0.00513917888648906`"},
{"0.023474701341286028`"},
{"0.6444427587987379`"},
{"0.00788070419180164`"},
{"0.006145243218713859`"},
{"0.00586857552735204`"},
{"0.012483448511730097`"},
{"0.00649736573499254`"},
{"0.06663486119372994`"},
{"0.019978627786804853`"},
{"0.009591013556583799`"},
{"0.005340391752934021`"},
{"0.0372829343010714`"},
{"0.009767074814723139`"},
{"0.00516433049479468`"},
{"0.00622069804363072`"},
{"0.004761904761904761`"},
{"0.108260772939531`"},
{"0.004761904761904761`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03246103174600641`", "0.03145287390737331`", "0.014405837946700563`",
"0.0631695149997338`", "0.05672900267049718`", "0.020824809813595094`",
"0.02082892152368146`", "0.019148167591921332`", "0.011968484959918702`",
"0.011739163539336784`", "0.029326747704370677`",
"0.011423739703611633`", "0.017425278834386916`", "0.00995986417453289`",
"0.009705381351107486`", "0.06894013214483612`", "0.13973253570730473`",
"0.08716122130531176`", "0.04666870751549852`", "0.28058986119860607`",
"0.016338721661667374`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJxF1nk0FOr/B3Br2SlRciupS4irUkR5u6KEUtJ6Q5QkKjWrsY0JU0OMJYPK
vmUnJAmDhAlD4lraVKQr7rdyZe3nd873O/c8z/PH55/PeZ3nPMt7vesVezcR
ISEhpf+u5UZBikZBBAwlh12ilJXi66/tbz07yiFhUZmqvo8Jc8/PYz3H6Kic
LHve6h2Cg3dUcihhgeAGNDgdEiWCzRnd81acgqlbtMGWT75g63hv1Tcph7gN
W32Jdwy8GsJ3hE8HQnGiteQfoSCoscpsNV/5Y+3bPb83tvqCzNd3/qIVCge9
vpXtSRyMY7qFl5gMr+EOBV70EPTPfE+1nSDgjK2vyB7rR/ift/+y+4t+8XjE
Ff3cYSpZgA1n3Hbvq/DF5eEZ+cfP7uP1tL1b5r5E5H37xThblgzTZPbo/cMk
ZHjLLT/gH4WlaXE7tB3yUWiv+lGIFgCZwAbpCSEKxj+c7TrAI+GYbnTLtAIR
4WcDp69/jQYlbIqlWl+JzhPsIktGDKoG5yUO5T3AM5WRvuv2/UhY2+eS0k6A
c/Gg1M+ZDkR4bhoOWF4s8CYZ6tye92LipgUnOuAoHY3vTfsXxoKxw3bgcVMm
DbvaZpdcDSVihpdNOvwqFJ4q5Vm9W6nQNsqrdH3XiDG9Ds2zM/HY9Yn1sHSU
isrsmSjHaV9QDq9IKqoiomazkF6nJQOH3ohKz3qFo20ve4vJxRxMy8atljJI
w+WnX1onK17gYHVCLrmcgGtBj9rPcIKwQ92quasvGWt3W99uUPMReNP2/Gdn
2m88KNIv5UwtKcbwIQZ58HAF6Kvatpw4nQex8V31kiVUKIw0rDktlgTtW7JU
o9PxsHVmtlfOXsf8hdlKHQk/pJOlaq6pkCBFCOCNnCRhj9fNGdOlkYjQenV/
jWsM1O1UMu2r4pB+qkfzwH4WCl9QaTbhvfCw5LjyeSEwZDYRK08FoaxHNMmR
SMGeXUttiVMkjC2TElYU6RR4RXLHOeE696DQVHGu70wqCH0l5z1na6H9j7LI
/o5EyP3qni62OQpndBJOlvQm4P2vpWf0rVgY701fyzydjNjp4QMKiEL+rNZF
PVo0XG4OHPFlhePY0ZODRs00xCUbDOSrBGMsMT75eJY/9J9L7UgXakVzYsT9
a0e4KOR8WBnLj0a8x3W2YnoFPhyQufPLzhDc1pVIkvXkoZ3LVxd+VSLwTlWV
mxroZ6JuxOGm1dVorN5yoEw0MwDEG/NelNexmBPKihKrqoCp/Ra1Y6fZmDOU
WfBrC4T8vWhXky1UfHfseVD8iIDcryTRtG1ROLvrHI8+lQWj7uyCC3a3oe4Q
0b6CEQmTObnYvOedsDppeMnOLBAa6pOOKloh2Nha9Uf/qXSIfL8RdvAqBaof
uCOK7j1Ie6Ams7y0CutsD7mJtacJvJxZ3YSWozkQsljB5HfHwLfIKuhHQQaM
X1XHrqFH4fOtWHif9EdB4JWBdZ0+WCLO/GJFImONwTGhD4lEFAer6YnMlOBz
UInEMiMOKvtpbfqfwpBzKoCedJyNQ+FpkrvVm1Dpa9HM+0zDxFL7bU3bSTja
uUYym+GDJy559+fOEcGQ3n7NSOE5rq//mnlBaxCb1vjUiFrFQTHbskTf5IHA
60ouCrNZV4SA7eeTjZanYIG4ftj9GxO01ZY7G7OCMaBuXxu79BbstY5Lml9h
YYCvauzUSIbeHxV8lzexiCHXfX/dQ4TFa817wvZE2PeqBUtvJqJO9Ys5zzgV
ItQml0fL/BEu+/l15CYG1h7tsv+rigpralKjiV8UWoWoyio9KQhk5VtyzzVj
c4/BfIdRJIJTitSutRVhjW5mZaBNvcBbtP+bhYfxQ9xceTsx/GEFhvPIu4fu
MtDp73ruws4q0CSnO5lKd2DBOcfyO1sA9tRtY9Z4OnIbtisHDC2eyyMUklpo
CkSSQ1XnhcjQcayXVv47DSsOqhow3G9jyYXyWn5aCLzzVk3mfylCxStuoUoU
GeMuvmpiMZ242PpqZXR/BVzSfbo/l9wHV3jhUn1sFW4V13s/yisEZcYtxeNo
qcD7p/N6yS9udQim9o/J/WDizQrlGxqF6bhs90x0ixsb1h3zvt/UGZDjjeQG
z/ph8sj36hM36Nhoa65cfIeKM66VEwH/EHHX2EjLMjIZGjVOR+ie/shtSbFr
7KzC9NS2Ht+WYvz98KQdaX85NCl6tnZauXBl+u/PvXQfwkaV9m2Wmdix0mHg
3s8bWFIg5eOSGoQA+TmXXxISsVRlBU1b5t/zm/VQZlju4xOU3lB+vm6UhVcO
XZ06yUw81Am9v9+Fgo61nI13nMIQP94d+saoCJIbu5rLX0ZDsaGnoUM5DBFV
FX3G9TyIyuVvd9ibg0tl/rsOaBRDu88+jnAzDlVUB9bcRCpqNKrvdTrfh9NQ
aURhbR1MW/9ec7E6Dhr9Vsq5hQxo/Vh+qmMqAjViP/g+rmF4LT5Z/WHkJgI1
qz6uknsh8GqqVcdlmAchRGagVn6Kit4/LKitZDraDKK7D4jQMei5NuiqvD92
bipwTOdcx8/ddObDQToc5KLfKYy1g7jJ8NsZu7vIzObyHZMjcdJmm5t8nT8C
Td37Av8i42Dt+07JO7G4OLb1s5loI7Jk1bYMW4bjUVe/+/MrfqiJCj3hah8F
vTdZk467SkBLHfViLuOguFeaPqHCEfT5n/di5KYlw1dr0GDydOLisjos51bs
lVoownn6y5yugXRY/3rKeqtHJSIPalhtIwWi5pY+d8ODp/ib3+Ks8pENNWXp
x+RnbMzoxO47fY2B9htSD1UyKYi1ebQ4g/FYPark9PZm7Io4/d1scygmM3pM
vy7xx+7oR8o068V9F5PdX10bD/le4cq3z2Lgx3FmmXmkCHx2F79suMJ/Kajl
68SRxC/AJr6d7oP5BOwUNW+5l1YO5XqP0SZbDtIuG2Yf/ngdw5tilJY6lSFx
x/qmLaY3QKbx6nT7E/BAcXa3KoOKOdWxyfYcInL7L+tLGYfD6d7Hy7bubeC/
51bNTZHhevxPjYknfrhaa/LxzQ9fmLEKCo/3ViLkGNmhWCMCwUN6gWuVEiBi
05BVeIeJabeNutYy3RjZf2Jjq9K/+cH0xRvr27kBgr7rVFkb2MtCBX1j2OP2
e59lwtCjyDDI/hGGLAY7wprJoH3v8o5vDobv1rBfNuss1mpuXEJeMIpHP0dd
fh6K8j4nxwTxxXt3pK60pJkNmxGuYUu+D4Jp1l1NnAAUuMke31BBxCcxYpkX
/PCO/zPj93oSVlJDjuziMrHKil+e5+UDnybVl+JkosB70H21wYhQN65ktsW9
nyxDlPb/j1TYBTS28/YMYqVfx2huChWrYj3qt+lTkaFEHFS/FQfjHIdAgzAi
uAWFS5TMaNgndXj5MWUS/jEvvptZEowHwt11f9jSYMAtu2BSSMAxISnp7GtE
7E+SpYaMEKCvyeJo3gqDhlK/OqOKgBynBWr34vsjllyyIYdJx3HrT09MBwj4
ovCN78FsEHglUpgvzjY/wYnzz+KCfi7m4D91HfYuewf6QWrkxYrFf5ZL5S7z
CkP00mL+zMJ1tMbFDM2YhcA8OyPjWWAwGsWmRn+zC4L0k5aCH+4M7FTdWbHy
KQ21Fsrbn5QR4HcnPd/9vB86hdwS2v4koKarVqNLzg8fqh/Mv5ojYKYpXIKs
xALfy1xXUp+C7phGGyUNIp7s2es0N1oCnTIby8xDTwXezWMDhZ6P4+DUXdyz
IfE9fGmJEtK1iznTKaJdeDgRlngy50LIg/bokUOi4mG44McKNVNgQrkwR+tr
ny/67Zz/uvKNjnXC/b9RJugYL8ibmE8hgCGvE2wnRERWglDOzbeL7tEo9qV4
Bh5zVtTKFxHxfd3CdIcjCUOnFD+VXiJhOn/7rJkEEddkJdczIrLx4ln2+GQP
D3qWKb3BnRkCr2NkBjeb8hYUhVSqTAIBtLord3Ut87FzciqP1ZcFFVORc4ra
YRhsrQm4t7EUNuFMy/mmCHi/NE36e3Uc3q0fyT7VeAtOTFrNd20Sxs9d0jU1
I6Em6YdeohNxMS+cE/bLjkVu7Flnhigd/Nmk/EkpOgIe8jZpf6SgR3ibnlcH
ER90G39weNUIT+1t2tvehbjjLxdMFFrAGvMqDWyoEHi9qx3bMzL84Pwpe4H9
OwkB4tGm174SQcwaf9EpQ8JpM11WnWQ8tn/K9Nyb/GHxvfltR/0GOtqfu2tz
dXxgPuRVmylJhdE63qox9k2YJFKPzt6lYbwmgTQrVwJp937RfaRYKP/wkyFm
XIda4YuA9jckzFpKF9Uqp+Oqzu+ceqFgeOyz8diiSUJRkf/nN7R/87mqhKHz
TMVjQf1/5A5yLQ==
"], {0.03246103174600641, 0.03145287390737331,
0.014405837946700563`, 0.0631695149997338, 0.05672900267049718,
0.020824809813595094`, 0.02082892152368146, 0.019148167591921332`,
0.011968484959918702`, 0.011739163539336784`, 0.029326747704370677`,
0.011423739703611633`, 0.017425278834386916`, 0.00995986417453289,
0.009705381351107486, 0.06894013214483612, 0.13973253570730473`,
0.08716122130531176, 0.04666870751549852, 0.28058986119860607`,
0.016338721661667374`}}]]], "Output",
CellChangeTimes->{3.5316148042403507`*^9, 3.531614852072456*^9,
3.531614903710799*^9, 3.531615699319181*^9, 3.531616096987891*^9,
3.5316165786594667`*^9, 3.5316228673334713`*^9, 3.5316270392429447`*^9,
3.53162952630083*^9, 3.531630115911222*^9, 3.5317132521898203`*^9,
3.53177606773796*^9, 3.5317902011135073`*^9, 3.5317908794205933`*^9,
3.532036627665997*^9, 3.532039842641692*^9, 3.532054644738205*^9,
3.532124851775334*^9, 3.5356086750323277`*^9, 3.537097444570856*^9,
3.537408799249201*^9, 3.53743692358818*^9, 3.5375205147722673`*^9,
3.5375249937674923`*^9, 3.537528524309621*^9, 3.5378487193372717`*^9,
3.537939054164015*^9, 3.540983989874511*^9, 3.541051023632951*^9,
3.546671102284451*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"god", "[", "200", "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.531614965562894*^9, 3.5316150349762983`*^9}, {
3.531615097515093*^9, 3.531615149717634*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"20", ",", "17", ",", "18", ",", "16", ",", "4", ",", "5", ",", "19", ",",
"1", ",", "2", ",", "11", ",", "7", ",", "6", ",", "8", ",", "13", ",",
"21", ",", "3", ",", "9", ",", "10", ",", "12", ",", "14", ",", "15"}],
"}"}]], "Output",
CellChangeTimes->{{3.53161497691422*^9, 3.531614984066183*^9}, {
3.531615022572414*^9, 3.5316150354125767`*^9}, {3.5316151059058523`*^9,
3.5316151528650303`*^9}, 3.5316160970503073`*^9, 3.531616578757053*^9,
3.531622867375169*^9, 3.531627039353259*^9, 3.531629526312457*^9,
3.531630115922593*^9, 3.531713252250662*^9, 3.531776067804152*^9,
3.5317902011408863`*^9, 3.531790879479443*^9, 3.5320366277235537`*^9,
3.5320398426562567`*^9, 3.532054644751234*^9, 3.5321248518046017`*^9,
3.535608675079484*^9, 3.5370974446554127`*^9, 3.537408799331987*^9,
3.537436923640174*^9, 3.537520514811392*^9, 3.537524993874969*^9,
3.537528524341867*^9, 3.537848719367278*^9, 3.537939054208823*^9,
3.540983989957457*^9, 3.541051023736603*^9, 3.54667110237002*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"ranking", "[",
RowBox[{"\"\<G\>\"", ",", "\"\<D\>\""}], "]"}], "=",
RowBox[{"Inner", "[",
RowBox[{"List", ",",
RowBox[{"ClNames21", "[",
RowBox[{"[",
RowBox[{"god", "[", "200", "]"}], "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[",
RowBox[{"god", "[", "200", "]"}], "]"}], "]"}], ",", "List"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.5316152141431913`*^9, 3.531615239303141*^9}, {
3.5316158034335747`*^9, 3.531615928812451*^9}, {3.531616399295946*^9,
3.531616421405343*^9}, {3.531616569996826*^9, 3.531616572425331*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "0.28058986119860607`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "0.13973253570730473`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "0.08716122130531176`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "0.06894013214483612`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "0.0631695149997338`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "0.05672900267049718`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "0.04666870751549852`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "0.03246103174600641`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "0.03145287390737331`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "0.029326747704370677`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "0.02082892152368146`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "0.020824809813595094`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.019148167591921332`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.017425278834386916`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "0.016338721661667374`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "0.014405837946700563`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.011968484959918702`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.011739163539336784`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "0.011423739703611633`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.00995986417453289`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.009705381351107486`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{
3.531615239927796*^9, {3.531615883853547*^9, 3.531615899461521*^9},
3.531615929864379*^9, 3.531616504607126*^9, 3.531616578817051*^9,
3.531622867386962*^9, 3.531627039364973*^9, 3.531629526324985*^9,
3.531630115934949*^9, 3.5317132522669697`*^9, 3.531776067816831*^9,
3.531790201168445*^9, 3.531790879494645*^9, 3.5320366277375193`*^9,
3.5320398426702747`*^9, 3.532054644765067*^9, 3.532124851817657*^9,
3.535608675123475*^9, 3.5370974446883783`*^9, 3.537408799417902*^9,
3.537436923691037*^9, 3.537520514861889*^9, 3.537524993908806*^9,
3.537528524377187*^9, 3.537848719398197*^9, 3.5379390542661877`*^9,
3.540983989994253*^9, 3.541051023780919*^9, 3.546671102405964*^9}]
}, Open ]],
Cell["compare with citedParIssuesDropSelf", "Text",
CellChangeTimes->{{3.531615305312183*^9, 3.5316153346440353`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"ranking", "[",
RowBox[{"\"\<C\>\"", ",", "\"\<D\>\""}], "]"}]], "Input",
CellChangeTimes->{{3.531616584745119*^9, 3.531616592159363*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "1.1938155733753701`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "0.9548009644079514`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "0.7854984894259819`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "0.5785337600132704`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "0.52888828713505`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "0.5268089834399483`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "0.5138502906142659`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "0.4968355447039548`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "0.4499875003472126`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "0.44127700182180973`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "0.4280554092306268`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "0.4104809791337525`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "0.37110010446496783`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "0.3217728472184824`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "0.30491661218967114`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "0.2634452411994785`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "0.26188393117526976`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "0.24343229543808834`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "0.17985885283332181`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "0.14425942035934708`"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "0.12404163165039757`"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.531616592929614*^9, 3.5316228674027357`*^9,
3.53162703937764*^9, 3.5316295263389893`*^9, 3.5316301159487257`*^9,
3.531713252282229*^9, 3.53177606783121*^9, 3.5317902011831923`*^9,
3.531790879511327*^9, 3.532036627752962*^9, 3.5320398426852837`*^9,
3.532054644780652*^9, 3.5321248518323393`*^9, 3.5356086751760902`*^9,
3.5370974447423286`*^9, 3.537408799500836*^9, 3.537436923743936*^9,
3.537520514912353*^9, 3.537524993967976*^9, 3.537528524430625*^9,
3.537848719465726*^9, 3.537939054309637*^9, 3.54098399007233*^9,
3.541051023827203*^9, 3.546671102457155*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["SpearmanRankCorrelation to Googlescore", "Section",
CellChangeTimes->{{3.531788852536481*^9, 3.531788870240039*^9}, {
3.531801304753668*^9, 3.53180131028603*^9}, {3.531801342159812*^9,
3.5318013478665323`*^9}, {3.53180138816392*^9, 3.531801397387474*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.03246103174600641`", ",", "0.03145287390737331`", ",",
"0.014405837946700563`", ",", "0.0631695149997338`", ",",
"0.05672900267049718`", ",", "0.020824809813595094`", ",",
"0.02082892152368146`", ",", "0.019148167591921332`", ",",
"0.011968484959918702`", ",", "0.011739163539336784`", ",",
"0.029326747704370677`", ",", "0.011423739703611633`", ",",
"0.017425278834386916`", ",", "0.00995986417453289`", ",",
"0.009705381351107486`", ",", "0.06894013214483612`", ",",
"0.13973253570730473`", ",", "0.08716122130531176`", ",",
"0.04666870751549852`", ",", "0.28058986119860607`", ",",
"0.016338721661667374`"}], "}"}]], "Output",
CellChangeTimes->{3.532046543657063*^9, 3.5320546447951508`*^9,
3.5321248518458443`*^9, 3.535608675223585*^9, 3.537097444775826*^9,
3.5374087995834093`*^9, 3.537436923789628*^9, 3.537520514961598*^9,
3.5375249940106153`*^9, 3.537528524476457*^9, 3.5378487194958353`*^9,
3.537939054358548*^9, 3.540983990165161*^9, 3.5410510238727417`*^9,
3.546671102506001*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["sizes vs. google page score", "Subsection",
CellChangeTimes->{{3.5320472285446033`*^9, 3.532047248101993*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDSizes21"}],
"]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.53204726334995*^9, 3.532047313739801*^9}}],
Cell[BoxData["0.7012987012987013`"], "Output",
CellChangeTimes->{{3.532047309968445*^9, 3.532047314209847*^9},
3.5320546448119287`*^9, 3.532124851879356*^9, 3.535608675274211*^9,
3.5370974448211803`*^9, 3.5374087996664658`*^9, 3.537436923841942*^9,
3.537520515011586*^9, 3.5375249940607224`*^9, 3.5375285245257807`*^9,
3.537848719526183*^9, 3.537939054408149*^9, 3.5409839902096157`*^9,
3.541051023915956*^9, 3.546671102555172*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["issues vs. google page score", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}, {
3.53204675716875*^9, 3.532046768075264*^9}, {3.532046980395443*^9,
3.532046990597639*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDIssues21"}],
"]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532046997726769*^9, 3.5320470271523247`*^9}}],
Cell[BoxData["0.8974025974025974`"], "Output",
CellChangeTimes->{{3.532046993170166*^9, 3.5320470276214857`*^9},
3.5320546448278103`*^9, 3.532124851894062*^9, 3.535608675324432*^9,
3.5370974448713293`*^9, 3.537408799776374*^9, 3.5374369238919086`*^9,
3.537520515062048*^9, 3.537524994110036*^9, 3.537528524576416*^9,
3.537848719556587*^9, 3.537939054458908*^9, 3.540983990261095*^9,
3.541051023959116*^9, 3.546671102605977*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citedParIssuesDropSelf vs. google page score", "Subsection",
CellChangeTimes->{{3.532046664611774*^9, 3.532046687996421*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.5320465907569513`*^9, 3.5320466391747627`*^9}}],
Cell[BoxData["0.8103896103896104`"], "Output",
CellChangeTimes->{{3.532046610905663*^9, 3.5320466396448917`*^9},
3.532054644884062*^9, 3.5321248519088182`*^9, 3.5356086753905087`*^9,
3.537097444923709*^9, 3.537408799849498*^9, 3.537436923941917*^9,
3.537520515111211*^9, 3.5375249941614532`*^9, 3.537528524626639*^9,
3.537848719587049*^9, 3.537939054507928*^9, 3.540983990311754*^9,
3.541051024002236*^9, 3.546671102655072*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["totalCited21DropSelf vs. google page score", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}, {
3.53204675716875*^9, 3.532046768075264*^9}}],
Cell[CellGroupData[{
Cell[BoxData["totalCited21DropSelf"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"62616", ",", "64483", ",", "25433", ",", "147894", ",", "142806", ",",
"42969", ",", "46395", ",", "40113", ",", "16809", ",", "19756", ",",
"64800", ",", "17925", ",", "21060", ",", "10398", ",", "9594", ",",
"125362", ",", "283151", ",", "158080", ",", "83704", ",", "705816", ",",
"29097"}], "}"}]], "Output",
CellChangeTimes->{3.5317894483616457`*^9, 3.531790194167828*^9,
3.531790873902844*^9, 3.532036621581049*^9, 3.532039837849284*^9,
3.532054644899315*^9, 3.5321248519229794`*^9, 3.53560867542293*^9,
3.537097444959955*^9, 3.53740879993577*^9, 3.5374369239903803`*^9,
3.537520515166263*^9, 3.537524994209963*^9, 3.53752852467659*^9,
3.5378487196171227`*^9, 3.537939054559642*^9, 3.54098399036266*^9,
3.541051024045155*^9, 3.546671102706121*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{"totalCited21DropSelf", ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.531789501781489*^9, 3.531789522854916*^9}, {
3.5320467869796553`*^9, 3.532046797130472*^9}, {3.532046832725788*^9,
3.532046854415872*^9}}],
Cell[BoxData["0.9831168831168832`"], "Output",
CellChangeTimes->{{3.531789519802024*^9, 3.531789523451688*^9},
3.531790194200221*^9, 3.531790873913436*^9, 3.53203662159128*^9,
3.532039837860818*^9, 3.532046797819251*^9, {3.53204685151927*^9,
3.532046854911618*^9}, 3.532054644912833*^9, 3.532124851935639*^9,
3.535608675455576*^9, 3.537097445005143*^9, 3.537408800016883*^9,
3.5374369240409307`*^9, 3.537520515211837*^9, 3.5375249942664433`*^9,
3.537528524732792*^9, 3.537848719646275*^9, 3.537939054609042*^9,
3.540983990412125*^9, 3.5410510240874863`*^9, 3.546671102762268*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["SpearmanRankCorrelation to Googlescore in lower field", "Section",
CellChangeTimes->{{3.531788852536481*^9, 3.531788870240039*^9}, {
3.531801304753668*^9, 3.53180131028603*^9}, {3.531801342159812*^9,
3.5318013478665323`*^9}, {3.53180138816392*^9, 3.531801397387474*^9}, {
3.5320547034934196`*^9, 3.532054708601108*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}],
"]"}]], "Input",
CellChangeTimes->{{3.5320547162634706`*^9, 3.532054737921998*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.019148167591921332`", ",", "0.011968484959918702`", ",",
"0.011739163539336784`", ",", "0.029326747704370677`", ",",
"0.011423739703611633`", ",", "0.017425278834386916`", ",",
"0.00995986417453289`", ",", "0.009705381351107486`", ",",
"0.016338721661667374`"}], "}"}]], "Output",
CellChangeTimes->{3.532046543657063*^9, 3.5320546447951508`*^9,
3.5320547407870007`*^9, 3.532124851950076*^9, 3.535608675506378*^9,
3.53709744505558*^9, 3.537408800103006*^9, 3.537436924091021*^9,
3.5375205152618437`*^9, 3.537524994309992*^9, 3.5375285247760773`*^9,
3.5378487196763887`*^9, 3.537939054658752*^9, 3.540983990462467*^9,
3.5410510241306953`*^9, 3.546671102806649*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["sizes vs. google page score", "Subsection",
CellChangeTimes->{{3.5320472285446033`*^9, 3.532047248101993*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDSizes21"}],
"]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.5320548242764683`*^9, 3.532054879777081*^9}}],
Cell[BoxData["0.36666666666666664`"], "Output",
CellChangeTimes->{
3.532054831652101*^9, {3.532054877335248*^9, 3.532054880250193*^9},
3.532124851982709*^9, 3.535608675556711*^9, 3.537097445105468*^9,
3.537408800187861*^9, 3.537436924140428*^9, 3.537520515312306*^9,
3.5375249943667507`*^9, 3.537528524832142*^9, 3.537848719707273*^9,
3.537939054709179*^9, 3.540983990510981*^9, 3.541051024174307*^9,
3.546671102856262*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDSizes21"}],
"]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.53204726334995*^9, 3.532047313739801*^9}}],
Cell[BoxData["0.7012987012987013`"], "Output",
CellChangeTimes->{3.532054808611472*^9, 3.532124851995533*^9,
3.5356086756134777`*^9, 3.537097445138674*^9, 3.537408800286316*^9,
3.537436924190873*^9, 3.537520515367208*^9, 3.537524994411994*^9,
3.537528524877242*^9, 3.537848719736642*^9, 3.537939054766124*^9,
3.5409839905616293`*^9, 3.541051024217185*^9, 3.546671102906039*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["issues vs. google page score", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}, {
3.53204675716875*^9, 3.532046768075264*^9}, {3.532046980395443*^9,
3.532046990597639*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDIssues21"}],
"]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532054918847316*^9, 3.532054957009922*^9}}],
Cell[BoxData["0.75`"], "Output",
CellChangeTimes->{{3.5320549246129637`*^9, 3.532054957440905*^9},
3.532124852011759*^9, 3.535608675657851*^9, 3.537097445189108*^9,
3.53740880037189*^9, 3.537436924241411*^9, 3.537520515412134*^9,
3.537524994463434*^9, 3.537528524927178*^9, 3.537848719767221*^9,
3.537939054809466*^9, 3.540983990612791*^9, 3.541051024260688*^9,
3.546671102956695*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDIssues21"}],
"]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532046997726769*^9, 3.5320470271523247`*^9}}],
Cell[BoxData["0.8974025974025974`"], "Output",
CellChangeTimes->{{3.532046993170166*^9, 3.5320470276214857`*^9},
3.5320546448278103`*^9, 3.5321248520244513`*^9, 3.5356086757074137`*^9,
3.5370974452420483`*^9, 3.5374088004537983`*^9, 3.53743692429041*^9,
3.537520515466886*^9, 3.537524994513328*^9, 3.537528525010112*^9,
3.537848719796501*^9, 3.537939054859632*^9, 3.540983990661661*^9,
3.541051024303494*^9, 3.5466711029929667`*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citedParIssuesDropSelf vs. google page score", "Subsection",
CellChangeTimes->{{3.532046664611774*^9, 3.532046687996421*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532054975012075*^9, 3.532055012806437*^9}}],
Cell[BoxData["0.55`"], "Output",
CellChangeTimes->{{3.532054985605815*^9, 3.532055013703032*^9},
3.532124852039394*^9, 3.535608675757935*^9, 3.537097445289053*^9,
3.5374088005381737`*^9, 3.537436924341653*^9, 3.537520515512555*^9,
3.5375249945639877`*^9, 3.537528525063436*^9, 3.5378487198273373`*^9,
3.5379390549096737`*^9, 3.54098399071436*^9, 3.5410510243471613`*^9,
3.546671103042239*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.5320465907569513`*^9, 3.5320466391747627`*^9}}],
Cell[BoxData["0.8103896103896104`"], "Output",
CellChangeTimes->{{3.532046610905663*^9, 3.5320466396448917`*^9},
3.532054644884062*^9, 3.5321248520696*^9, 3.535608675808539*^9,
3.537097445339506*^9, 3.537408800620997*^9, 3.537436924390933*^9,
3.5375205155489693`*^9, 3.53752499459932*^9, 3.5375285251124573`*^9,
3.5378487198601*^9, 3.537939054964074*^9, 3.540983990762314*^9,
3.5410510243898277`*^9, 3.546671103092123*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["totalCited21DropSelf vs. google page score", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}, {
3.53204675716875*^9, 3.532046768075264*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"totalCited21DropSelf", "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "nonBiomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532055023399691*^9, 3.532055065378441*^9}}],
Cell[BoxData["0.9333333333333333`"], "Output",
CellChangeTimes->{
3.5317894483616457`*^9, 3.531790194167828*^9, 3.531790873902844*^9,
3.532036621581049*^9, 3.532039837849284*^9, 3.532054644899315*^9, {
3.532055037873083*^9, 3.532055066042162*^9}, 3.532124852084334*^9,
3.535608675857629*^9, 3.537097445388111*^9, 3.53740880070402*^9,
3.5374369244721212`*^9, 3.537520515596595*^9, 3.537524994645014*^9,
3.53752852516521*^9, 3.537848719898822*^9, 3.537939055040423*^9,
3.540983990811343*^9, 3.5410510244331207`*^9, 3.546671103142694*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{"totalCited21DropSelf", ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.531789501781489*^9, 3.531789522854916*^9}, {
3.5320467869796553`*^9, 3.532046797130472*^9}, {3.532046832725788*^9,
3.532046854415872*^9}}],
Cell[BoxData["0.9831168831168832`"], "Output",
CellChangeTimes->{{3.531789519802024*^9, 3.531789523451688*^9},
3.531790194200221*^9, 3.531790873913436*^9, 3.53203662159128*^9,
3.532039837860818*^9, 3.532046797819251*^9, {3.53204685151927*^9,
3.532046854911618*^9}, 3.532054644912833*^9, 3.5321248520968437`*^9,
3.5356086759139967`*^9, 3.5370974454434566`*^9, 3.537408800813929*^9,
3.5374369245125427`*^9, 3.5375205156788807`*^9, 3.537524994700021*^9,
3.537528525213336*^9, 3.537848719934018*^9, 3.5379390550813923`*^9,
3.540983990863627*^9, 3.54105102447631*^9, 3.546671103189945*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["SpearmanRankCorrelation to Googlescore in upper field", "Section",
CellChangeTimes->{{3.531788852536481*^9, 3.531788870240039*^9}, {
3.531801304753668*^9, 3.53180131028603*^9}, {3.531801342159812*^9,
3.5318013478665323`*^9}, {3.53180138816392*^9, 3.531801397387474*^9}, {
3.5320547034934196`*^9, 3.532054708601108*^9}, {3.5320550962298527`*^9,
3.532055098412928*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}]], "Input",
CellChangeTimes->{{3.5320547162634706`*^9, 3.532054737921998*^9}, {
3.532055105016979*^9, 3.532055107430724*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.03246103174600641`", ",", "0.03145287390737331`", ",",
"0.014405837946700563`", ",", "0.0631695149997338`", ",",
"0.05672900267049718`", ",", "0.020824809813595094`", ",",
"0.02082892152368146`", ",", "0.06894013214483612`", ",",
"0.13973253570730473`", ",", "0.08716122130531176`", ",",
"0.04666870751549852`", ",", "0.28058986119860607`"}], "}"}]], "Output",
CellChangeTimes->{3.532046543657063*^9, 3.5320546447951508`*^9,
3.5320547407870007`*^9, 3.532055108326871*^9, 3.5321248521113997`*^9,
3.535608675958787*^9, 3.5370974454894753`*^9, 3.537408800886664*^9,
3.537436924560876*^9, 3.5375205157360287`*^9, 3.537524994746204*^9,
3.5375285252633867`*^9, 3.537848719966867*^9, 3.53793905512668*^9,
3.5409839909135723`*^9, 3.541051024519601*^9, 3.546671103246406*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell["sizes vs. google page score", "Subsection",
CellChangeTimes->{{3.5320472285446033`*^9, 3.532047248101993*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDSizes21"}],
"]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.5320548242764683`*^9, 3.532054879777081*^9}, {
3.532055114626334*^9, 3.532055122000716*^9}}],
Cell[BoxData["0.8741258741258742`"], "Output",
CellChangeTimes->{
3.532054831652101*^9, {3.532054877335248*^9, 3.532054880250193*^9},
3.532055123204836*^9, 3.532124852144306*^9, 3.535608675995617*^9,
3.537097445539772*^9, 3.537408800971848*^9, 3.537436924611936*^9,
3.537520515780635*^9, 3.537524994797523*^9, 3.5375285253128633`*^9,
3.5378487200007153`*^9, 3.537939055177249*^9, 3.540983990993885*^9,
3.5410510245638647`*^9, 3.5466711032933826`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDSizes21"}],
"]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.53204726334995*^9, 3.532047313739801*^9}}],
Cell[BoxData["0.7012987012987013`"], "Output",
CellChangeTimes->{3.532054808611472*^9, 3.5321248521575527`*^9,
3.535608676041422*^9, 3.537097445596876*^9, 3.5374088010564528`*^9,
3.537436924658845*^9, 3.537520515830454*^9, 3.537524994876253*^9,
3.537528525365074*^9, 3.537848720033832*^9, 3.537939055227235*^9,
3.540983991033111*^9, 3.5410510246060953`*^9, 3.546671103328792*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["issues vs. google page score", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}, {
3.53204675716875*^9, 3.532046768075264*^9}, {3.532046980395443*^9,
3.532046990597639*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDIssues21"}],
"]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532054918847316*^9, 3.532054957009922*^9}, {
3.532055134479211*^9, 3.532055141974347*^9}}],
Cell[BoxData["0.8741258741258742`"], "Output",
CellChangeTimes->{{3.5320549246129637`*^9, 3.532054957440905*^9},
3.532055143567233*^9, 3.532124852172566*^9, 3.535608676091721*^9,
3.537097445656281*^9, 3.53740880114017*^9, 3.537436924708379*^9,
3.53752051588099*^9, 3.537524994911626*^9, 3.537528525413262*^9,
3.537848720070842*^9, 3.537939055279229*^9, 3.5409839910790777`*^9,
3.5410510246501923`*^9, 3.546671103391739*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",", "ClNamesANDIssues21"}],
"]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532046997726769*^9, 3.5320470271523247`*^9}}],
Cell[BoxData["0.8974025974025974`"], "Output",
CellChangeTimes->{{3.532046993170166*^9, 3.5320470276214857`*^9},
3.5320546448278103`*^9, 3.532124852185297*^9, 3.5356086761276093`*^9,
3.537097445689356*^9, 3.53740880124034*^9, 3.5374369247590313`*^9,
3.537520515930874*^9, 3.537524994967906*^9, 3.537528525463435*^9,
3.537848720103717*^9, 3.537939055329918*^9, 3.540983991128438*^9,
3.541051024692421*^9, 3.546671103425103*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citedParIssuesDropSelf vs. google page score", "Subsection",
CellChangeTimes->{{3.532046664611774*^9, 3.532046687996421*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532054975012075*^9, 3.532055012806437*^9}, {
3.532055154101872*^9, 3.532055161130932*^9}}],
Cell[BoxData["0.48951048951048953`"], "Output",
CellChangeTimes->{{3.532054985605815*^9, 3.532055013703032*^9},
3.532055162101492*^9, 3.5321248522004004`*^9, 3.535608676176579*^9,
3.537097445723611*^9, 3.537408801340472*^9, 3.5374369248090963`*^9,
3.5375205159818907`*^9, 3.537524995013887*^9, 3.537528525514991*^9,
3.537848720141121*^9, 3.537939055378463*^9, 3.5409839911671457`*^9,
3.5410510247452*^9, 3.546671103456036*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}], "&"}], ",",
"citedParIssuesDropSelf"}], "]"}], ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.5320465907569513`*^9, 3.5320466391747627`*^9}}],
Cell[BoxData["0.8103896103896104`"], "Output",
CellChangeTimes->{{3.532046610905663*^9, 3.5320466396448917`*^9},
3.532054644884062*^9, 3.532124852213031*^9, 3.5356086762262983`*^9,
3.537097445773741*^9, 3.537408801423168*^9, 3.5374369248594913`*^9,
3.5375205160302343`*^9, 3.537524995064205*^9, 3.537528525563645*^9,
3.537848720174079*^9, 3.5379390554282713`*^9, 3.5409839912115183`*^9,
3.541051024787346*^9, 3.5466711034958677`*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["totalCited21DropSelf vs. google page score", "Subsection",
CellChangeTimes->{{3.531789453076695*^9, 3.5317894733387613`*^9}, {
3.53204675716875*^9, 3.532046768075264*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{
RowBox[{"totalCited21DropSelf", "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}], ",",
RowBox[{
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "[",
RowBox[{"[", "biomedicalChemicalClNames21Position", "]"}], "]"}]}],
"]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.532055023399691*^9, 3.532055065378441*^9}, {
3.5320551700344133`*^9, 3.532055177590971*^9}}],
Cell[BoxData["0.972027972027972`"], "Output",
CellChangeTimes->{
3.5317894483616457`*^9, 3.531790194167828*^9, 3.531790873902844*^9,
3.532036621581049*^9, 3.532039837849284*^9, 3.532054644899315*^9, {
3.532055037873083*^9, 3.532055066042162*^9}, 3.532055178834838*^9,
3.532124852245243*^9, 3.535608676277083*^9, 3.53709744582309*^9,
3.5374088015074587`*^9, 3.537436924911888*^9, 3.5375205160814753`*^9,
3.537524995112726*^9, 3.5375285256017523`*^9, 3.53784872021032*^9,
3.537939055479087*^9, 3.5409839912681227`*^9, 3.541051024830596*^9,
3.5466711035288677`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"SpearmanRankCorrelation", "[",
RowBox[{"totalCited21DropSelf", ",",
RowBox[{
RowBox[{"gps", "[", "200", "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "//", "N"}]], "Input",
CellChangeTimes->{{3.531789501781489*^9, 3.531789522854916*^9}, {
3.5320467869796553`*^9, 3.532046797130472*^9}, {3.532046832725788*^9,
3.532046854415872*^9}}],
Cell[BoxData["0.9831168831168832`"], "Output",
CellChangeTimes->{{3.531789519802024*^9, 3.531789523451688*^9},
3.531790194200221*^9, 3.531790873913436*^9, 3.53203662159128*^9,
3.532039837860818*^9, 3.532046797819251*^9, {3.53204685151927*^9,
3.532046854911618*^9}, 3.532054644912833*^9, 3.5321248522584267`*^9,
3.5356086763265743`*^9, 3.537097445877997*^9, 3.537408801591032*^9,
3.537436925016453*^9, 3.53752051613098*^9, 3.537524995167624*^9,
3.5375285256478863`*^9, 3.5378487202445107`*^9, 3.537939055528719*^9,
3.540983991312458*^9, 3.54105102487436*^9, 3.5466711035762453`*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["Eigen score and ranking (zero self-link)", "Section",
CellChangeTimes->{{3.5316429672611217`*^9, 3.531642981085814*^9}, {
3.531801401883176*^9, 3.531801404074361*^9}, {3.545967656431315*^9,
3.545967675513389*^9}, {3.54597263632019*^9, 3.545972638963667*^9}, {
3.54597284833316*^9, 3.545972850488763*^9}}],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.5", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977481421817*^9, 3.546030310322204*^9,
3.546030380521142*^9, 3.54666915943137*^9, 3.5466711036273947`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.5", ",", "300"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.5", ",", "issues21", ",", "300"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.546030607518526*^9, 3.546030639170212*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.02128972380008653`"},
{"0.05503005380384217`"},
{"0.05272959845358341`"},
{"0.05188914685365455`"},
{"0.05549406917724456`"},
{"0.014509481657442692`"},
{"0.014665789941599755`"},
{"0.018429312516114474`"},
{"0.01011417565516893`"},
{"0.011668476670361957`"},
{"0.06352713410574355`"},
{"0.015674836174121527`"},
{"0.02206608966581134`"},
{"0.01003561813531591`"},
{"0.012199730788459939`"},
{"0.03517324710861195`"},
{"0.044755622223850974`"},
{"0.03825660402472481`"},
{"0.03469386914664632`"},
{"0.4023243788903812`"},
{"0.015473041207233456`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.07352721808770912`"},
{"0.017083222844063585`"},
{"0.018431590048205312`"},
{"0.07708081083595114`"},
{"0.0548204567815793`"},
{"0.03666665339878797`"},
{"0.024644993960818293`"},
{"0.018706057827272356`"},
{"0.009883062053858391`"},
{"0.017371669331746522`"},
{"0.04819115403457995`"},
{"0.009262916917431087`"},
{"0.02084929981932981`"},
{"0.008379073498031594`"},
{"0.01087085038186856`"},
{"0.041683290508347924`"},
{"0.09247211633904165`"},
{"0.03602599616277085`"},
{"0.06023211127095729`"},
{"0.30836172539093154`"},
{"0.015455730506717764`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.15744827557576677`"},
{"0.04931673240754796`"},
{"0.008043851446595302`"},
{"0.05192925974881203`"},
{"0.05549264382806495`"},
{"0.014369824882270689`"},
{"0.014001560493075639`"},
{"0.018498786400926243`"},
{"0.013193886915857255`"},
{"0.011165177098696792`"},
{"0.10807926313931968`"},
{"0.018680739971891066`"},
{"0.021108256484733783`"},
{"0.009217279851306449`"},
{"0.010960766120435434`"},
{"0.03636050148208948`"},
{"0.04645427873312638`"},
{"0.05193368693137004`"},
{"0.03729905918155904`"},
{"0.25100377061173496`"},
{"0.015442398694820074`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.023416172357789786`"},
{"0.031717924481019164`"},
{"0.008806549805086297`"},
{"0.04822012253841537`"},
{"0.16905686459752714`"},
{"0.04347463389347761`"},
{"0.058824254757015006`"},
{"0.045403165168168294`"},
{"0.0103404942708835`"},
{"0.024168312848313948`"},
{"0.03066874648367568`"},
{"0.010550080708487534`"},
{"0.021531302532270043`"},
{"0.008284842115419857`"},
{"0.01104512361678785`"},
{"0.039820674455535374`"},
{"0.04925940694669922`"},
{"0.03777238708100854`"},
{"0.02467786149846778`"},
{"0.2842792802494048`"},
{"0.018681799594547202`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02335189722813796`"},
{"0.017618947613628547`"},
{"0.008377762090639217`"},
{"0.19321439835594606`"},
{"0.053707275543956115`"},
{"0.0245191478889438`"},
{"0.029243934298768003`"},
{"0.08512049848110974`"},
{"0.02153668512212578`"},
{"0.01719940833007829`"},
{"0.03147295289005585`"},
{"0.012258712302491462`"},
{"0.03474389881828376`"},
{"0.01477979153172993`"},
{"0.0181737436484175`"},
{"0.03914593476404116`"},
{"0.04237586977056048`"},
{"0.03089430730254277`"},
{"0.02156874520951702`"},
{"0.19272735744395741`"},
{"0.08796873136506919`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.028851881595616555`"},
{"0.06356319172776642`"},
{"0.01115548116265909`"},
{"0.1645771222093007`"},
{"0.08982761183932159`"},
{"0.011338850818551034`"},
{"0.03337802721823986`"},
{"0.02572058681789815`"},
{"0.01114792599513845`"},
{"0.019205193929851358`"},
{"0.0667724206470991`"},
{"0.014005508679440195`"},
{"0.022042746126094383`"},
{"0.008704344246858951`"},
{"0.010824604866321271`"},
{"0.040736222695587604`"},
{"0.06366389526408237`"},
{"0.037003272201114615`"},
{"0.02609436443798313`"},
{"0.23437881470103328`"},
{"0.01700793282004194`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024384385900686614`"},
{"0.035439124694577266`"},
{"0.008577955565480595`"},
{"0.24004204594160114`"},
{"0.10899490632092051`"},
{"0.029097812771487035`"},
{"0.013032755997822781`"},
{"0.042120164576806264`"},
{"0.017750660335512005`"},
{"0.03032180443277553`"},
{"0.026947074783612503`"},
{"0.009110029665400697`"},
{"0.02123087056586897`"},
{"0.008469132610384887`"},
{"0.01094392032421508`"},
{"0.07041541767591976`"},
{"0.05134043167978258`"},
{"0.033012010438947706`"},
{"0.026413481898783505`"},
{"0.1759359227939521`"},
{"0.016420091025462477`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021521019053505678`"},
{"0.017897784388713624`"},
{"0.0081645272309879`"},
{"0.16737740331074039`"},
{"0.2955214348359915`"},
{"0.02078173094727187`"},
{"0.05212165382565866`"},
{"0.018360385758747263`"},
{"0.04076128646978185`"},
{"0.02532137404813286`"},
{"0.023949543691339375`"},
{"0.010731326085806129`"},
{"0.025604017071531128`"},
{"0.012593896435943363`"},
{"0.011237163225926853`"},
{"0.04272781091860157`"},
{"0.04156982890596462`"},
{"0.028197875752958387`"},
{"0.020283246646531597`"},
{"0.09856470814726065`"},
{"0.016711983248604713`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.023570014691248864`"},
{"0.017791961904830254`"},
{"0.014884724120082297`"},
{"0.06384319661705459`"},
{"0.15693666048171034`"},
{"0.01716283701354672`"},
{"0.04489519899055051`"},
{"0.09511990751395495`"},
{"0.009636990411857477`"},
{"0.05829138389199261`"},
{"0.06675149394965268`"},
{"0.010178319226439652`"},
{"0.0746394933424942`"},
{"0.02011711855425432`"},
{"0.040037875291888944`"},
{"0.05303109168953832`"},
{"0.04440865992307719`"},
{"0.043371368203073954`"},
{"0.020531701967734253`"},
{"0.1004181937928466`"},
{"0.02438180842217129`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02451336117054773`"},
{"0.04908227355207719`"},
{"0.00845916669064245`"},
{"0.19812914872305265`"},
{"0.10065767503766707`"},
{"0.03657419612351108`"},
{"0.0680719142922615`"},
{"0.048994829236320245`"},
{"0.046778039379502444`"},
{"0.010528534144673486`"},
{"0.08862499017392172`"},
{"0.011631268062910982`"},
{"0.03908369597969005`"},
{"0.014318060098311339`"},
{"0.013069030733888374`"},
{"0.03533471032260836`"},
{"0.043228068453013094`"},
{"0.02877944835734375`"},
{"0.020390508972069125`"},
{"0.09699153161554563`"},
{"0.01675954888044171`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.07684604780141441`"},
{"0.050867941224056946`"},
{"0.051593978701215196`"},
{"0.07396151901954849`"},
{"0.07865333065073934`"},
{"0.031775666133367894`"},
{"0.017168531144442233`"},
{"0.020497433451565676`"},
{"0.021421874776137658`"},
{"0.027465847412350815`"},
{"0.02009797490614227`"},
{"0.07000504490210359`"},
{"0.02502920912411979`"},
{"0.011830865022493463`"},
{"0.011320302258086676`"},
{"0.03882817501575076`"},
{"0.07262152519949855`"},
{"0.03566028937013301`"},
{"0.02489562793482783`"},
{"0.20034984044194512`"},
{"0.039108975510060276`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05369113094691119`"},
{"0.026664781814624592`"},
{"0.02486172467994715`"},
{"0.07310748907547641`"},
{"0.12375603194709134`"},
{"0.021028414479601458`"},
{"0.015455146913085386`"},
{"0.024115492837683262`"},
{"0.014420055276388736`"},
{"0.01491043873024406`"},
{"0.18286104347369148`"},
{"0.007774769368187464`"},
{"0.022411392958985598`"},
{"0.008809158113148339`"},
{"0.012615335846642236`"},
{"0.0357464273225342`"},
{"0.04268487151524871`"},
{"0.030756515063170252`"},
{"0.02212139499554814`"},
{"0.2140799710806517`"},
{"0.028128413561138335`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.027222380133598022`"},
{"0.01847285405731853`"},
{"0.008507061851013617`"},
{"0.056753883450583555`"},
{"0.13792249022416278`"},
{"0.016362902128011215`"},
{"0.014244229363224527`"},
{"0.025112568192383465`"},
{"0.044395586528016395`"},
{"0.02039847891574065`"},
{"0.029985735461994754`"},
{"0.00823797977260578`"},
{"0.02037473308118519`"},
{"0.07149274835695939`"},
{"0.077888930851335`"},
{"0.06611762337127615`"},
{"0.060291362886600024`"},
{"0.07841684830246025`"},
{"0.02181397622370125`"},
{"0.17405233105001816`"},
{"0.021935295797811324`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.027747495588046997`"},
{"0.01944171341010132`"},
{"0.008605396819461429`"},
{"0.05119631301460585`"},
{"0.15613315155473778`"},
{"0.014708123055747799`"},
{"0.014324310355414874`"},
{"0.034476737960005124`"},
{"0.020418661570887127`"},
{"0.018614787513945723`"},
{"0.035259699973527715`"},
{"0.007774769368187464`"},
{"0.2070885695591726`"},
{"0.008068554521220917`"},
{"0.04050043557443881`"},
{"0.045504736364169525`"},
{"0.08569474514851319`"},
{"0.038082763920948906`"},
{"0.022944312135281173`"},
{"0.12406918641513849`"},
{"0.019345536176447173`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.03266997019808194`"},
{"0.017761861390733037`"},
{"0.00820046034198056`"},
{"0.05323160719074362`"},
{"0.1786811740613919`"},
{"0.011808677504706808`"},
{"0.014285627160904844`"},
{"0.01950885099157249`"},
{"0.06090030216796522`"},
{"0.01606204844828593`"},
{"0.03106059758311032`"},
{"0.011533382857433654`"},
{"0.1917570675977857`"},
{"0.04032998697058404`"},
{"0.010794685349820659`"},
{"0.03556309674642468`"},
{"0.04185864191553149`"},
{"0.03142824605215067`"},
{"0.021341205041062374`"},
{"0.1035004208046696`"},
{"0.0677220896250604`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021734415295361683`"},
{"0.0200756260310193`"},
{"0.008405163286506364`"},
{"0.05118164437153254`"},
{"0.05724627869385421`"},
{"0.01262969140900252`"},
{"0.019493135220847918`"},
{"0.01919727044777203`"},
{"0.011140912343794973`"},
{"0.010692205320017812`"},
{"0.021283818893542677`"},
{"0.008080494771189132`"},
{"0.02417313960332712`"},
{"0.008871469721023277`"},
{"0.010924387035942578`"},
{"0.034049210757700524`"},
{"0.2123850477042074`"},
{"0.07092895846415542`"},
{"0.03617384041968795`"},
{"0.32522374118176284`"},
{"0.016109549027751704`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021924967924620398`"},
{"0.026672590635235208`"},
{"0.008184775911082336`"},
{"0.04913504752323889`"},
{"0.05392191434371329`"},
{"0.014306936847516431`"},
{"0.013954185188699548`"},
{"0.018384234514275836`"},
{"0.009764906464238016`"},
{"0.010582735861783883`"},
{"0.024926263866336527`"},
{"0.007805122329769287`"},
{"0.02166039781104383`"},
{"0.00990707676560562`"},
{"0.01084238286087781`"},
{"0.11616481217995359`"},
{"0.04138881522937572`"},
{"0.09007450804006747`"},
{"0.0587756901161029`"},
{"0.37617973212718175`"},
{"0.015442903459281686`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.026082954317351442`"},
{"0.019861986321612377`"},
{"0.01116381869103368`"},
{"0.05113536752272`"},
{"0.05575722777542875`"},
{"0.013686332734751389`"},
{"0.014018152476599906`"},
{"0.01838768206009843`"},
{"0.010843486931579055`"},
{"0.01057493785697047`"},
{"0.021258067713566864`"},
{"0.007840280491430264`"},
{"0.02480492279047958`"},
{"0.008568076835947272`"},
{"0.010882033514144393`"},
{"0.07027959154110437`"},
{"0.13125642816782257`"},
{"0.028087256283931838`"},
{"0.029880197157766287`"},
{"0.4201837246876554`"},
{"0.01544747412800568`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.03323757242980843`"},
{"0.044223651098053214`"},
{"0.012727879458177015`"},
{"0.05183099049343524`"},
{"0.05483935419185861`"},
{"0.013291581274412592`"},
{"0.014981277982874294`"},
{"0.01837721964198745`"},
{"0.00970432594481822`"},
{"0.010579035794394044`"},
{"0.022496803267868754`"},
{"0.007934691258969229`"},
{"0.020627241329787976`"},
{"0.008329479711443799`"},
{"0.010866229353591448`"},
{"0.0569643343184035`"},
{"0.1595753009879105`"},
{"0.04803119945274202`"},
{"0.02019273980823715`"},
{"0.3657617482224121`"},
{"0.015427343978814418`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.04931938089834653`"},
{"0.03923130983942148`"},
{"0.01276715261456347`"},
{"0.08494751091828247`"},
{"0.05941065042609915`"},
{"0.020686205183431686`"},
{"0.018462071141709783`"},
{"0.01858594932932836`"},
{"0.009873832160967629`"},
{"0.010645827201375656`"},
{"0.028658112409694896`"},
{"0.009473263054663124`"},
{"0.022081121492631188`"},
{"0.008664042347555013`"},
{"0.01097175275272682`"},
{"0.09389348166857134`"},
{"0.20198782184741088`"},
{"0.13422393878516115`"},
{"0.06694755671828691`"},
{"0.08251482882304505`"},
{"0.016654190386727406`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021527266767417386`"},
{"0.017278846464218407`"},
{"0.008253448182475469`"},
{"0.05861612063807163`"},
{"0.4090855277866412`"},
{"0.013071517168493745`"},
{"0.013801277362716725`"},
{"0.01897520285066242`"},
{"0.01392673693953822`"},
{"0.011492679129722252`"},
{"0.05447183959048959`"},
{"0.01622850438202085`"},
{"0.023057571300451322`"},
{"0.00838993618290384`"},
{"0.028861923982691016`"},
{"0.03682986078704407`"},
{"0.04161238508098123`"},
{"0.028897696996001816`"},
{"0.02019273980823715`"},
{"0.1400142000328374`"},
{"0.015414718566384279`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.035515138098443796`", "0.03106322209779578`", "0.013511116204110794`",
"0.08695741111770378`", "0.09350738443399145`", "0.021337137381933113`",
"0.02407754209768402`", "0.030039281163864538`",
"0.015371173267122206`", "0.015628951095450122`",
"0.034938781657474036`", "0.012138245274081614`",
"0.029408491689604657`", "0.012172849580469023`",
"0.014954329031397047`", "0.06394031740815628`", "0.1052788606845205`",
"0.06695158850966161`", "0.03968720868019803`", "0.22844083969920048`",
"0.02508013082713701`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9l3k4FIr3xkuLkC1bbkIilK1CruS1ZWlRUiJKKZQll6SQZSxj38YY+zYY
jCH7EpEQUhLKchMqS4osJVeWnz9+z/eP8/d53vec9zyfs8/K6YI106ZNm/j+
v9JNBmT/exUH9enmI+MyDOiYtdZYrtPhMksYUI6h48uS+1LVHQaWPyXlS1RF
4Lz7lc2CLJH4EiqrKjZMwsm3RoVPKwNQ/TvMMXssCJ/Db907r12M7uoFFy72
aCw7flDyTqAgP8FrKCIiALoK7AdkVoJhvZf9oioTFfXzRE+lKRrudOmnXaNk
ITuicpd1UyZezTg+K2oYgJt+ltPF4iho3GffVtRdiuX6skJt7xi8Sh7lrt3o
3xtUfCemtgx7CzlOOXIzwHvU9slSCxVmkQbhIWqJeFxvf6pIMha71pzFSCcC
oBeasTbSHgOOGe7Xfow8aFZ05jst+cHyqntPgFkcwpKklHZKE/DO/td7V20i
PNvZ9vtfzkF374MCDUYVjlnQ3q87U1HcK6lf/74IoYLub4/U9eCBjs8Ozdwo
LNgpDmlLNsNpB2OOVSMfe3lkH5x298W8Wm7XQwod6ctvxYM3/Gw9ZYZpxwi4
HjTIGmCE477G3VDTORISLR8RrbeFQS16rqx5iIiP4lHifAW1cDq2rMa2LxZ/
DgnttU2NQ26XpIXfiB8EtiqLJroQ0Z3j9l9fKhXirO9/DLblojnrw1X2eDoc
7lfWf9idBbXOR8IuXF2Qzp+ma2dEwYwyVnN7OR53kx7PXjyRATmo7jnE4rcx
1/Ruw+I8PD1o2Jyb1YKuq5E5hlo0rCq0uyoLF8HjIZc9H3LRd6Y+x1o2ENyv
9m0jNyTA1y2jLsM2HVF5Ex/0kgNxJHZI4+xOCvaFEh5n//aFHXuVdU/ahp5H
f4Su38xGq1elfZBKPogDt9fGTbLA3q+vIXkyEW99x6szD3dDZ07S7MKGXs7h
2NNRX+Ph6iwdVcZKQo1C2GELKQLo7MwDqG0D3YdFNNCnAKbKatLhexJRSStU
EplPRQf3kVXXlxUwFeJwr2SnwEZSsrE6JQb8ovUcf+/NwKWjzv6794QgfcHo
5UJ7JrRnpVk/6kRiLc3t1P4UEopdDib/YM1GcnnyiVOlOTD8vjLUSE0HIVl6
dS8/Bbv5qRqnCtrQmaB/WziwEoI3ieumYanYqlZmXXiyGDtOCJs87idiMKB1
8QNXC74UiWJurRKsUwEd3SpBsDNPrf/On4kDmz9a+JgkoXQ65ExNLxEyWtca
iPRYmKr9vLAuUILI0h8R34rCobdtgmZJogAlK4ZxPQQUdIoPKx0iQm3Oo+v6
v9lQtdz9XfdMMZJaxloF5jf2c95T0rM6CRq7mDaJbupEr+7sziC7GOROTzip
LCXgcptIGY8EFaGXFsuNYgg4+tsro7SmE2pKvPwCE7W4Zv1T6m1HKrIoZ8an
ikPBx1N95EV0DphvedNUZUlQm48dKNyZjlAiI3ZLQjIsZ3s89fL8UPTtT1LY
0ziYWZTWaZsSUOXIKdJ8h4jM6+yM+u2lyPvGvv20AR0eLfZaC+MZeMxe1SS2
MxnVNae9uANfICWsM9exKxo3GGziySwUsOp6LncYb8xDOPJ0dLUvrkbmOqQ7
tECg82Fd99dujJgJmHfqxeG0q4JX8WM65Nt8M7lek3BPJ78r/2M2tj8rz+mf
ToS5KrVAlZiAT9Y0RcPlQAyWDPvMHktCbArpYO/LELxZ+SfAb0sQbrzb6Wg/
koOS4LPrWfo5qOsruz0xnIIvWVuy97WQ8Uprh03I8RqESm5VnheKwfUAzq91
YgkYP85+hUOFBKqEy+CoZyR0+0IFmU2L8WJFUtSXvxm3eKq9xWJjMDfYPe67
QsPfpKXjrWbVUOhR/BVZ5w+O15O61/oLscLpfjyDvwTtXjmj1/o37uqNsXHS
njIsbhL5j5xIhlzjL+l+n2x8T/op9eVAARQaOCxq62jgKGDOaFGkIUBl5rD2
9jhk+Wg/2VxRA4sQ6QdhvxNgEHWom/mvRCzc+OfNuX35ENU8K8ZqTABDlqfp
tEU7hLuuR5Y118C72vX6YA0VvOfzlaQdS5D24BF9gC8fR3NTQk8t5CKINWXm
T1Qg6p7bJokWV0I0KchSrDsIatq8Kq1M2cg7N+XdfiEC6defpvxoCsVMso/Y
LQEqmFrC9Vf30fCP/28+i4epMFKv+4JRMqJ364049VbjyVkzAzvpGPAaiNXL
Mcow9mxu2IKNDi1HKxrRjg7JJbMb4j9KYfVqaCpdrBxpM2WO4zoZOJognp5B
jkGRuqG73ioZDT4Xi1J/xMHPlvR2s2gKlpWfaUeTyWDpv/184FsJmJmDX2pm
JkKQta+7VTUYJ7PfQVA+CM56leYGo1mQKazaYhxfis9UlUYuLSr0/WXOnfBO
BI+3qi5XTjvoTvH3BbZnQ0Vis62tVwFqpKyPbTFMhltBseCV+4nQXisQk6kq
RZ36WKF7UQOucU5udg+Ow5ubluXztChEGGtdrC1JgJhPOId2cARGpWqUroZE
os2gKmXVthUp5JrnTv0+MIaOyJYFCi7EMymEsPrh7f29VdzvQzB3IJHL/CwV
C3pWaS8Hc3Dg9OV2qvdGDr8rFK/SKJCJ1vq1ZNMBV9dLoyWvU+AfQNosP5KM
C9+lNMKnSDA97Ol/wIGAuOqiC/0chVjIdil3zm3EayrzC6fGaMxQZP7ilYkA
xdL++56qROQtuxRvraUh86hxg8lnMtz807PJ5WkImaRP7xr2Rd2NNYW9Q2T8
2L9b3+xsKez4ntgFzZZhNJObxjddjInIPCe/j0Vg+2vKRpSnHK4/J6RtTSjI
IPS8MNV7AZlEozZFNwrUPllNvr+Tgl1ygmeDJmMxvKbzpjydAN0sCUVbZTpI
w8OvD600IeEf3g+nRCLxSXHvLS6TCNDTt1n8oGXik0aZXOYkGbW06+qNnLEY
IhEUo9ip//OTMtHVO0J4iSA7cw4QfSErGyzkXpcNI9Ia2fpMLq4IDEJgtgJM
Q9L+cT5ZkNbcVFPpHQ8Jyd2h688b8Eir8+f5N7EYbRE5LfwkA9N/S10+qECC
wGq/pG2HL8oG1y7LaBbAI87XePvwCyzlBg9JyAfDZbzAvk0zAoJiv3tEl2Mx
4KO501juMfoPHuqJcYmGuKKmvVlnOupqPJy70oKgvM4+7B3WhtsOMp37aNlg
8bISJ+4h4ua7WT9jJSre8Rz86X03B42fp+csBDLwIPHd9oeDcXB39pja5PME
71mlRNVMSpBOi/4WpknB6sK6a3kkGcK/3L7VKBNgc8tts6ciHYyE1KtW5wrB
fs3zUcJQCEyDeKWZFmOhEPaH6V5eLI4anJ9je0tEkIMloWMsEH8qjScdOuJw
rl+FRgj3xbO+A7N9zxIQ0h3hp3jIDyyNVreJlkTMWxpNj93NBENn+9e78h1Q
uzHnaiNVCsNAiYLrgdQN/uI68aCrFxcXJ4O3+UQjY66z2OceBc02XzU5zyej
snNiu1yTLww0bVJUpfJhWWGglJtcAKGU6cifZyIg8E1lxxZyOIR7N+026iGB
NfFMVPq6P8QrHJtsGIFYPPJQ4yRxI99PLEjaSz5wXBkqFpejQN4h75L0qQC0
MqzWghSJOKirJbFc9xRXxPPlpxRy8FJTzUOEswoJjqVj/QJF6BmukbzI048X
b33tgjZ46XblX05eFUkYsHhqUmZCRrD1nRscG3w2lmeubCdHh6Be+h7lcAa8
mv54kpnDwV3gExteEY6U8puuKr0k7Nf5LSukRITcn21i5/MCIfrA4QWjOQ6N
3XbUaA5fOA/nKbjZJOKXnU3n/nAClo7c7zIyIKLlpfrnvtUSjNyVr2F6/QxN
zKUfJp6n4GyXBf9UQhoyeBZ1T30ZxCj/o9Hv1CiIqx8a8t+aiTssV7w9s2k4
EyvNxcMdinfmsi7xIXRkmcXemOBhIHmJry9VJQzq3yYFCEWREFKzu+TxlgSK
iy/5w7A/eJ/zHnCjB+Kk+tGvNizxGLlVfJxLwxfJMoxaQ5E4HHXN6GPjJMD6
PTV1hyYRZ5SGRx0PFmLrDp+cRYdmfKQyUsPi8xABy17bQjK4Ix8vZt3uQ6hG
D4dlQhREv+zournBx1a5Hkai/Nk44Bh6jC4Rika9k0+FGypwzU01c5d9EcT/
W3zSJBeHuXDe9OoJEoJv758/vCMWRqFPjWpVArAz1+ypx+tAzOhrXYswTUVz
/s7+Kht/CM8ULt9NocDD+SSvaz0BH2jbnpg/JIL4e9fftizV4FDwz6sbbMcI
f+VmDblG7FugpbnvL4HlJ9U9JSIVqExWetXBHoMItp926mwU+P070RhWEgMh
Znku+Qlf3LUwos4wFaFrVyvXfblB1N3/c+lESyh+NhgL9GuHo7K/0lDtbiwy
1qNW0wLDMenApu8eEoTT8gpZtZ8LcKvtkrdiWjQMPbPtbFPisap0SKZejoDK
bvuZ5YhUDN07zHn1Xyr4uLjmjxlu/B+KQmnm8an/83PbDMeJlW+NyN31y/dZ
TBT+DyHSk2Y=
"], {0.035515138098443796`, 0.03106322209779578,
0.013511116204110794`, 0.08695741111770378, 0.09350738443399145,
0.021337137381933113`, 0.02407754209768402, 0.030039281163864538`,
0.015371173267122206`, 0.015628951095450122`, 0.034938781657474036`,
0.012138245274081614`, 0.029408491689604657`, 0.012172849580469023`,
0.014954329031397047`, 0.06394031740815628, 0.1052788606845205,
0.06695158850966161, 0.03968720868019803, 0.22844083969920048`,
0.02508013082713701}}]]], "Output",
CellChangeTimes->{{3.546030620572571*^9, 3.546030640131021*^9},
3.546669162432852*^9, 3.546671103812593*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.5", ",", "300"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.5", ",", "300"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "21", ",", "12", ",", "20", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545977481802333*^9,
3.54603031061419*^9, 3.54603038083032*^9, 3.5460306547474337`*^9,
3.546669166380673*^9, 3.546671103848839*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.6", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977481846377*^9, 3.54603031063577*^9,
3.546030380910542*^9, 3.5466691704077053`*^9, 3.5466711038950167`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.6", ",", "300"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.6", ",", "issues21", ",", "300"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.546030663765106*^9,
3.54603067183214*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.017031779040069226`"},
{"0.05920277542698517`"},
{"0.060057977565661974`"},
{"0.042978927209019316`"},
{"0.04510997279511103`"},
{"0.012875837661510816`"},
{"0.012385845530790593`"},
{"0.014771020715838462`"},
{"0.008282214621459725`"},
{"0.009790758346564957`"},
{"0.06819337096443535`"},
{"0.01569989566167085`"},
{"0.018329414366499534`"},
{"0.008815319953890725`"},
{"0.010321802806223662`"},
{"0.02858821222725413`"},
{"0.03715122057687089`"},
{"0.03467302231609704`"},
{"0.033555547052680726`"},
{"0.4497833231392394`"},
{"0.012401762022126438`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.07971677218521633`"},
{"0.01366657827525087`"},
{"0.018900367479208258`"},
{"0.07320892398777523`"},
{"0.04430163792031272`"},
{"0.03946444375112514`"},
{"0.02436089035385284`"},
{"0.015103115089227922`"},
{"0.008004878299887079`"},
{"0.01663458954022643`"},
{"0.04979019487903903`"},
{"0.008005592553642318`"},
{"0.016869266550721698`"},
{"0.006827466389149548`"},
{"0.008727146318314009`"},
{"0.036400264306937304`"},
{"0.0944110135150997`"},
{"0.031996292881752285`"},
{"0.0642014376018539`"},
{"0.3370281389398998`"},
{"0.012380989181507608`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.1804220411708855`"},
{"0.05234678975143212`"},
{"0.006435081157276242`"},
{"0.043027062683208286`"},
{"0.045108262376095505`"},
{"0.012708249531304412`"},
{"0.011588770192561654`"},
{"0.014854389377612586`"},
{"0.011977868134285715`"},
{"0.009186798860566758`"},
{"0.12165592580472669`"},
{"0.019306980218994296`"},
{"0.017180014549206465`"},
{"0.007833314013079374`"},
{"0.008835045204594258`"},
{"0.030012917475427173`"},
{"0.039189608388001375`"},
{"0.05108552180407132`"},
{"0.036681775094575986`"},
{"0.26819859320486394`"},
{"0.01236499100723038`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01958351730931313`"},
{"0.03122822023959757`"},
{"0.0073503191874654365`"},
{"0.0385760980307323`"},
{"0.18138532729945012`"},
{"0.04763402034475271`"},
{"0.06537600330928889`"},
{"0.047139643898303045`"},
{"0.008553796960317208`"},
{"0.024790561760107344`"},
{"0.028763305817953912`"},
{"0.009550189102910056`"},
{"0.017687669806249976`"},
{"0.006714388730015462`"},
{"0.008936274200217158`"},
{"0.034165125043562235`"},
{"0.04255576224428878`"},
{"0.034091961983637516`"},
{"0.021536337874866477`"},
{"0.3081292047700678`"},
{"0.01625227208690293`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01950638715373094`"},
{"0.014309447998728825`"},
{"0.00683577393012894`"},
{"0.21256922901176914`"},
{"0.0429658204351649`"},
{"0.024887437139312147`"},
{"0.029879618759392493`"},
{"0.09480044387383277`"},
{"0.021989225981807945`"},
{"0.016427876338224554`"},
{"0.029728353505610115`"},
{"0.011600547015714769`"},
{"0.03354278534946644`"},
{"0.01450832802958755`"},
{"0.017490618238172738`"},
{"0.03335543741376918`"},
{"0.034295517632922295`"},
{"0.02583826624947859`"},
{"0.01780539832812556`"},
{"0.19826689740353085`"},
{"0.09939659021152931`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.026106368394705256`"},
{"0.06944254093569427`"},
{"0.010169036816552788`"},
{"0.17820449763579468`"},
{"0.08631022398960345`"},
{"0.009071080654840826`"},
{"0.03484053026275872`"},
{"0.023520549877978872`"},
{"0.00952271502942315`"},
{"0.018834819057952236`"},
{"0.07208771481406201`"},
{"0.013696702668053248`"},
{"0.018301402118839186`"},
{"0.007217791287742376`"},
{"0.008671651699657263`"},
{"0.035263782931624924`"},
{"0.05984114822514855`"},
{"0.033169024127764804`"},
{"0.0232361414022849`"},
{"0.24824864611202188`"},
{"0.014243631957496618`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.020745373560789322`"},
{"0.03569366049586729`"},
{"0.007076006099938594`"},
{"0.2687624061145552`"},
{"0.10931097736752218`"},
{"0.030381834998364027`"},
{"0.010426204798258225`"},
{"0.04320004318866861`"},
{"0.017445996237871415`"},
{"0.03217475166146124`"},
{"0.024297299777878097`"},
{"0.007822127851205852`"},
{"0.017327151446568687`"},
{"0.006935537323973499`"},
{"0.008814830249129832`"},
{"0.0708788169080235`"},
{"0.04505299192398882`"},
{"0.02837951001316451`"},
{"0.023619082355245347`"},
{"0.1781171758235245`"},
{"0.013538221804001264`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017309333344172204`"},
{"0.014644052128830918`"},
{"0.00657989209854736`"},
{"0.18156483495752232`"},
{"0.3331428115856074`"},
{"0.02040253680930583`"},
{"0.05733288219166128`"},
{"0.01468830860699781`"},
{"0.04505874759899523`"},
{"0.026174235199890036`"},
{"0.020700262467150343`"},
{"0.00976768355569237`"},
{"0.022574927253363276`"},
{"0.01188525391464367`"},
{"0.009166721731183962`"},
{"0.03765368879924168`"},
{"0.03332826859540726`"},
{"0.022602548389977332`"},
{"0.016262800052543058`"},
{"0.08527171824749477`"},
{"0.013888492471771947`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.019768128109464024`"},
{"0.014517065148170874`"},
{"0.014644128365460637`"},
{"0.05732378692509937`"},
{"0.16684108236046996`"},
{"0.016059864088835647`"},
{"0.04866113638953149`"},
{"0.10679973471324702`"},
{"0.007709592329485981`"},
{"0.06573824701252173`"},
{"0.07206260277712631`"},
{"0.009104075324452596`"},
{"0.08141749877851898`"},
{"0.02091312045661682`"},
{"0.043727576210338466`"},
{"0.05001762572436577`"},
{"0.03673486581594235`"},
{"0.040810739330116017`"},
{"0.016560946437986244`"},
{"0.0874959010221979`"},
{"0.023092282680051833`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.020900143884622663`"},
{"0.0520654391248672`"},
{"0.006933459450132819`"},
{"0.21846692945229704`"},
{"0.09930629982761803`"},
{"0.039353495020792884`"},
{"0.0764731947515847`"},
{"0.05144964078008538`"},
{"0.05227885109065994`"},
{"0.00842282731573879`"},
{"0.09831079824624915`"},
{"0.010847613928218194`"},
{"0.03875054194315399`"},
{"0.01395425030948524`"},
{"0.011364962740737786`"},
{"0.028781968084049828`"},
{"0.03531815605186543`"},
{"0.02330043551523977`"},
{"0.01639151484318809`"},
{"0.08338390640943674`"},
{"0.013945571229976344`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.08369936784166267`"},
{"0.0542082403312429`"},
{"0.05869523386282011`"},
{"0.06946577380809205`"},
{"0.07290108656330477`"},
{"0.03359525903262106`"},
{"0.015389134974201569`"},
{"0.017252765838379907`"},
{"0.0218514535666222`"},
{"0.028747603236951583`"},
{"0.01607837992491382`"},
{"0.08089614613524931`"},
{"0.021885157716469678`"},
{"0.01096961621850379`"},
{"0.009266488569775749`"},
{"0.03297412571582071`"},
{"0.07059030414764797`"},
{"0.03155744473058688`"},
{"0.02179765759849854`"},
{"0.20741387700111613`"},
{"0.04076488318551862`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.055913467616258816`"},
{"0.025164449039924076`"},
{"0.02661652903729846`"},
{"0.06844093787520555`"},
{"0.12702432811892717`"},
{"0.020698557048101335`"},
{"0.013333073896573351`"},
{"0.02159443710172101`"},
{"0.013449270166923493`"},
{"0.013681112818423477`"},
{"0.21139406220597287`"},
{"0.006219815494549972`"},
{"0.018743778318308642`"},
{"0.0073435679272896405`"},
{"0.010820528876042419`"},
{"0.02927602848396083`"},
{"0.03466631972654817`"},
{"0.025672915562231568`"},
{"0.01846857807136291`"},
{"0.22389003376756397`"},
{"0.027588208846812293`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024150966640283017`"},
{"0.015334135731156802`"},
{"0.006990933642578219`"},
{"0.04881661112533412`"},
{"0.1440240780514129`"},
{"0.015099942226193043`"},
{"0.01187997283674032`"},
{"0.02279092752736125`"},
{"0.04941990766887668`"},
{"0.02026676104101939`"},
{"0.0279436925919368`"},
{"0.0067756679798519496`"},
{"0.016299786464948153`"},
{"0.0825638762198629`"},
{"0.08914884288167373`"},
{"0.06572146374245116`"},
{"0.05579410937216975`"},
{"0.08286531544937957`"},
{"0.018099675545146642`"},
{"0.17585686573080375`"},
{"0.02015646753081988`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024781105185621786`"},
{"0.016496766954496152`"},
{"0.0071089356047155956`"},
{"0.042147526602160874`"},
{"0.16587687164810289`"},
{"0.013114207339476946`"},
{"0.011976070027368738`"},
{"0.03402793124850724`"},
{"0.020647597720321563`"},
{"0.018126331358865475`"},
{"0.034272450005776355`"},
{"0.006219815494549972`"},
{"0.24035639023853306`"},
{"0.006454843616976735`"},
{"0.044282648549398305`"},
{"0.040985999333923225`"},
{"0.08627816808646555`"},
{"0.034464414191565956`"},
{"0.01945607863904255`"},
{"0.11587709216894818`"},
{"0.017048755985182896`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.030688074717663712`"},
{"0.01448094453125421`"},
{"0.006623011831738551`"},
{"0.0445898796135262`"},
{"0.19293449865608783`"},
{"0.009634872678227754`"},
{"0.011929650193956701`"},
{"0.01606646688638808`"},
{"0.06922556643681527`"},
{"0.015063044480073725`"},
{"0.029233527137275478`"},
{"0.0107301516816454`"},
{"0.22195858788486877`"},
{"0.04516856255621248`"},
{"0.008635748279856527`"},
{"0.029056031792629413`"},
{"0.033674844206887516`"},
{"0.026478992749008074`"},
{"0.01753235012597999`"},
{"0.09119457343638551`"},
{"0.07510062012351877`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01756540883439941`"},
{"0.017257462099597727`"},
{"0.006868655365169516`"},
{"0.0421299242304729`"},
{"0.04721262421504261`"},
{"0.010620089363382608`"},
{"0.01817865986588839`"},
{"0.01569257023382753`"},
{"0.009514298647810976`"},
{"0.008619232726151983`"},
{"0.017501392709794308`"},
{"0.006586685978151974`"},
{"0.020857874291518468`"},
{"0.007418341856739567`"},
{"0.00879139030320283`"},
{"0.02723936860616042`"},
{"0.2383065311532986`"},
{"0.07387984764341377`"},
{"0.03533151258033068`"},
{"0.3572625578888974`"},
{"0.013165571406748337`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017794071989509865`"},
{"0.02517381962465682`"},
{"0.006604190514660684`"},
{"0.03967400801252052`"},
{"0.04322338699487351`"},
{"0.012632783889599304`"},
{"0.011531919827310345`"},
{"0.0147169271136321`"},
{"0.007863091592342629`"},
{"0.008487869376271268`"},
{"0.02187232667714693`"},
{"0.00625623904844816`"},
{"0.017842584140778522`"},
{"0.008661070310238378`"},
{"0.008692985293125108`"},
{"0.1257780903128641`"},
{"0.033111052183500585`"},
{"0.09685450713450823`"},
{"0.06245373221602862`"},
{"0.41840974702340006`"},
{"0.012365596724584314`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02278365566078712`"},
{"0.01700109444830942`"},
{"0.010179041850602297`"},
{"0.04207439201189785`"},
{"0.04542576311293206`"},
{"0.011888058954281251`"},
{"0.011608680572790776`"},
{"0.014721064168619211`"},
{"0.009157388153151874`"},
{"0.00847851177049517`"},
{"0.01747049129382333`"},
{"0.006298428842441333`"},
{"0.021616014116101423`"},
{"0.0070542703946483605`"},
{"0.008740566077045007`"},
{"0.07071582554624503`"},
{"0.14095218770963677`"},
{"0.022469805027145472`"},
{"0.027779140666024688`"},
{"0.47121453809596847`"},
{"0.012371081527053105`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.03136919739573551`"},
{"0.04623509218003842`"},
{"0.012055914771174295`"},
{"0.04290913957675614`"},
{"0.0443243148126479`"},
{"0.011414357201874696`"},
{"0.012764431180320038`"},
{"0.014708509266886034`"},
{"0.007790394969038873`"},
{"0.00848342929540346`"},
{"0.018956973958985598`"},
{"0.006411721763488091`"},
{"0.0166027963632715`"},
{"0.0067679538452441925`"},
{"0.008721601084381475`"},
{"0.054737516879003995`"},
{"0.1749348350937423`"},
{"0.04640253682971769`"},
{"0.01615419184658972`"},
{"0.40590816633767646`"},
{"0.012346925348023592`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.050667367557981235`"},
{"0.040244282669680345`"},
{"0.012103042558838043`"},
{"0.08264896408657282`"},
{"0.04980987029373654`"},
{"0.020287905892697612`"},
{"0.016941382970922625`"},
{"0.014958984891695127`"},
{"0.007993802428418163`"},
{"0.008563578983781394`"},
{"0.026350544929176968`"},
{"0.008258007918320764`"},
{"0.01834745255868335`"},
{"0.0071694290085776505`"},
{"0.00884822916334392`"},
{"0.09905249369920538`"},
{"0.22582986012514278`"},
{"0.14983382402862064`"},
{"0.07225997213864943`"},
{"0.06601186305843604`"},
{"0.013819141037519177`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01731683060086625`"},
{"0.013901326619436657`"},
{"0.006686597240332442`"},
{"0.05105129575031982`"},
{"0.469419723126387`"},
{"0.011150280274772079`"},
{"0.011348430436130957`"},
{"0.015426089117295996`"},
{"0.012857288162702873`"},
{"0.00957980129779731`"},
{"0.05732701754613061`"},
{"0.016364297511150032`"},
{"0.019519192328067512`"},
{"0.006840501610996242`"},
{"0.030316434639300956`"},
{"0.03057614864137267`"},
{"0.033379336005427196`"},
{"0.023442333881629446`"},
{"0.01615419184658972`"},
{"0.13501110851018688`"},
{"0.012331774853107425`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03425434733900781`", "0.030622524610880206`", "0.012897654895755492`",
"0.0836985256741471`", "0.08780253699769608`", "0.020860029975573804`",
"0.02321706289825326`", "0.02788227286567094`", "0.014072209765921467`",
"0.014202823378433394`", "0.03325751230456789`", "0.01124668114016019`",
"0.026328766711565744`", "0.011006393702725284`",
"0.013193980481730583`", "0.06478154472955346`", "0.1129782458438967`",
"0.07119670573371731`", "0.04064833091606902`", "0.24263201601837703`",
"0.023219834016298055`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9lmk8FI7zxxEqUiJFhFaEEsoV6iNHropIKREiSs6U3LvrvnfdN+smxIYc
KfcRkjulkCLpK11KKX8P/q/fg3k8M++Zz8xnr7WzkS0TAwMDz/8HH9f0hU4X
KugSCcQhg3KkGzAbLzwph7VBjK8JYwHs25oDCnkLEe1/tizfIhxBoXPsTeZh
+Ot5dExTLRpQI27UXCZC3VThghRHIKi5vB8Fb1dCmHxPIoebgnKJzVJf22Kx
+vW4YhsHGYZOHxaSRYKQ1KHppnwyA2blbbt9WHLxxaKPWtxEg3qGlZHsIRpq
h5/+RfcE+OatjHivhcHlhhfprH0V2mw+8Rz9G4GlgEGZzEtxUAo5vTjQSMdU
P8epqvICzIiG/iuXy4OemE/Ztq/J0F9m7LFajEa/Okf8hA0Rymwq9kWbqODy
NKnm8ytGV0OWq6otEd91Yg2lTlLh+7GSQ/Cn93r/h5vCJknokw2R3ZqbA8Ff
jj/PHqgFvyOb84BVNu4cfGVNcq4A06b8u2+oI5jz3XBMziwMTKr7O7fzduK/
Gc7ew30lkK6d/nLPzAu/PQgFeRsLoBtnIeS0zvNjF5NVF2s4fFsH7V42hEAs
nmbz2yEa7Aun8DIkFNwTulohz8loFKM/Htv3BJy7iWT59jj4vAxVz02iQkqB
PX2ejQhe1geV/LxkDLzc2lvVkIkRmcYtxZx5sJB4XzK9vwTJs53C3ztz4OZV
7CQpOQAR88W150ZhoFqEpTzgiMf4E4q13u8sRDbY6Vjw++HhptmtaMpF7fhl
+xzFTlhE7vH3uVqECR7xc96PKvD5WcfKfUIRGjamyxYGkiB1cbML3ToFinfV
OoXdM9A0uVS+JSYAXz67OD4UiF3nL8wQSfSG7naSw6HTZBTn3DLf5UdD76KM
05vufExfj3IgutPgGmBzIIsjEV8DzKKv1g7hr6FtoHMeBUPVUd7eK3Ew1HRM
0ToThXxbyq7hNW/Mf7D47CHfg7Be5QcZa/mQn7TM2eWTgr2vo7RakzOxmMoT
PKZZixXJoZULgYk4KHVH8O4gBayKOpsEXDPhVWfNubElBEc8pAWCDtJQ/UNt
KLwmColu2kHb5qkYX73XvMxNg81fjYxDMTRM+PHTTW+nwnqYfWu8Siychffo
9Ft2Y2RCj3OrWx0m/5upy25IhRG/Fnm1oxJrhXeZSUOBaNAsLbXr7wAhyFTL
kbcGTosbRl/FkTFC5ZfLHKWhahebdTtPMlq7lg/mEwOwe3eQgbNuHAInqBIX
3OmIqJUyZOaIhCuX7pnUxljE13vz2lF8kXQl86prCwlkq3E53q05kNss2eif
W47YhUetIX+ykT5K41DsSULWB4n49I5+7FW9u9B6IAqE+K+3Th5PQIYME8nl
ZA76w6mf6v/4II5BUtXuyAAuic1M9f1pwCa/MacbAlkQ4GILMrkUhOKGy/OG
ggU4XCX29/JrKmYkdAPlPbPXdV8tbTOdjJB+N+UtLETUfTt0S/4xFUom3UIu
9j7IPyvoS17XfZtlitIeUTrUtvRFSW8vxLFjoWWB2zLA8JO/O0U6GTL6ZMmI
3g6ka++/8l9dBK5PBtDD6qgIUu+xe/A3CstDf00Cv3nhYoCQcuCxThjvklRW
MBpB3qjddrt38dDVXdN/dKkMvBzP7Od2RIPlWGn50noeoco6GYe+VLgkqvPd
OpyA8MvO+jsYA1G/g6Nuek8SvNu+dOhfCEWMjCWFoYOM8vFFEVPtXPglnBKy
46TBKoViKiSahFtvPDYfLqRAIUZ0s8VwNdi+FM5RXSOR+nYxk/d4PLpaLxOF
GqIg+EQjt3G93rkUNYGIi2VY3iTtssWsHerV4qprrhS8lmx5KvCxCG5pzxWV
LzSAuFC/uCveHx+mNrQrDVfgrZrsy0o3Oga5VM6I55Ph5xC33DFWBfeg0mbc
SMC8e8Cf21cLcM7SgWU+rRjvRlOj55+t36fD/lKi7/NwTdLi9KUfFDDn36Tt
vVaDWcfUV8T8JPCefz3/4loCRAUSVY2KSpAuZn1R/ZoPFoqyneqWeyA/xX5c
5GYdZFZkD+4Ty0NbhNeZJ3EPcFqOxzPtQglqZ6/v128rQbbKzONVkPCnwsD/
vWQdVNJ8eU8qBkPkGP2mwFgupOyb29njI0G4beIVcDIEO1rDD7F4ZuCkpm2J
Ek8OWBl5WrZPJGH5acPS5y4K6mPY+vNNq7Hzwcu3fjGRoNnHXTFyrIbX96c1
h5rvIcXuscppjnLYu9P1yF2VqH9FO5lfTMcSa+WI7REalG1uNpwPjEGElWRg
dQkVEyrNR5UtE0GaWv7H5JKB7l+9/eN3KBBeYRFMr66C6XQuF+f1RJCnNX6q
egQjYOUFm8FvMpoThLetTmfjfEJ9pxwXHQFmwoRT4tn4ZLiNTdgoEcw3lKvD
Ip/i83MFImEyD0tVOfkV2aXwepeUWN2WAhOZf6zmJ9KwVD5taxpUiankUH0T
9SZs0rMuYFjfu0CV+rcWZyKQ5EXe91IgETOcUj56ERF4cZB1eow5EkmEyYUf
W3vgx3mI6ZunJ/wfB92jysYh6v55Rr0dfpAUl+7jkggG6XX8hrDfGUjdsVbS
9YQG7guLhxn0UqHSr63vOB+LkFMe9Y5FvRg4x2TGo5aOXzyRnzc2JEPWYfAV
0S4GBLvnt4NzfCA6Ti3y/VeEuKzQUCvnFpBiNJYefopGsZbvcvC5UGwMI54g
nU/CvV0Oi5TTxXAf8TDob4oH9Rw8tDLS4fpEILivyRtP52T3v6ugwHZNdnWO
UA12qUKb24M1KNFxkBUaqkCkgnABO7UU2gtD+sUK1TB2EympDY2FJy3CwIvc
Aa/dNrnvc+Mx+sloQNEyBfSHqnoh7yhgWpyzUBf0xYpoveHl+HwI8rlxuKu0
YzZm556sV+GwVxj48CE4FC1P6+b4b9LAGt47lLcvAQdXQkjVMbFgd3uVJB5J
+x9Ppbb6sLXWZ1DzaJ+xcfECPyVFULG0AIznPf7bs5qH79p6d4x31mBCuWjs
bD4NHXIvTfQ/xUGZpsQoVNIIjlNx+cq3qdgWJD5SeTMLeaY3PKWLoiBs6Hek
QdgbPvamPD7DBZBvWpvipnfBdNCp1q0hAG9dfSJinULh6mZ2of4WBZFF77Tb
aiuRaX057cp4NLrMGHttPmeAst8pvmIlCG3czIki13vh/PPXbRPhQtD+kgIy
75PQySen+7opA5qbCVrDx9b/lVGUkMGeNIiwFPIxfKdi0NJ7a4jpQ2itnTfu
OfoAs8eXaCWrVBzOP1u2dI+Kp5vjcs4QfCDkTirjiM2HaOCnbrWDRcjz/KWx
+iQIPg+dFRwzYtEk0hlTs50CioJ+pIpPAIb17EZ+FJCQ1K6X8HaBigc9Yxx5
v73w7FUX2swSoDmW97vS2g9O5GonJUYyPq6d4cl9l4YVxtdcw8RnqFK7I/F0
no6iFb7RXztzQP8R1XH19SgeaTPwRC2HY3fvxh9pSrEgWG9wkexMQVaZ07t/
W7wh4zvcJ2aYh6u39h6x3FuAh+ZnohQnw1BYIrpjS2YIRChyQR9EonHw6pRu
8G4izDdxRey0JuHAfs41um0ipnMfW+3LXp+7k2uUsVYsMhpfSL1/RELtBoNH
2X0k8Csf5fXna4KuYUjk4rdstM+lr7r31MKes5X8eeU+mlq+lh7tfInJKKVT
BOMw5Al2I+VcEpTPpxEe2VOR/GLwzZMXgVi4YmXcEZ6PotDFMnb1QrRdvKLR
ZhqKYXPtBr2OEBhtN+nmFovGTCL3CH8zGfIS0omHzEmgcDENdc1QceWxQaZV
rydc9HvEyIRE7NA6qbf0zgeRrskLsbMkEKY2ljvtpmND2omCWrYWbBj6vtOY
KQmmZfdjCW7pMLSjsViJv8Fh7RR3pvNhwNGRlKxt2aD7lZ8QLi0EeZuxb3tF
KNw2mD+T/pWPKgdu+bLKAhhc49113TIEIyXt31T3heNhmCzdTygat5+PHh38
4A+fSo60liskfLZrXHW/HgdNQ4q7lIYXXLam9xkxUHEneqCjptYbGv323rQJ
EuL5anWjWUvRZTTcrGHTAT1xrTaulkIcT6HfqQunIM9y9vi13+OQ9UzTNNUN
w6ZUrUauL8UoyRlhn03NA0Gnc9KrOxSLQ71B3uLViP/+aq6MWAzJVbWzlzri
wRCh+nPHRSpC9u/9+TwnGlWBjAxbrxAxbm65pyuMhHr3fkLun1QwlAdsi5sn
Yov5AL20Oxahe39+qTD3hVIilyKLEBmqPqw8JLM65BiMH/g31wuNZ8yKzVKt
YFAUlaD503Hqwx+d/bMVGN8YVCN/OhLPA+2GiQ1UHC9O9zx1NxIdjMROu6ve
kGQ2UbEVWffXCg0sK2xvwJn4S+fHSDAqNEojXxwLgXiaQE5NUgymPGwYP50L
R3mlvGRcZgCWLbkDfq77gmfxITf6minwZO0YHF2Nw/f2swe6mX3g5qvsq8We
hYfS/SmXDLJAGWAq5t1Fg46qu60mY/L/eF5aGtRg12le/4eUvmsnwvB/7y95
1Q==
"], {0.03425434733900781, 0.030622524610880206`,
0.012897654895755492`, 0.0836985256741471, 0.08780253699769608,
0.020860029975573804`, 0.02321706289825326, 0.02788227286567094,
0.014072209765921467`, 0.014202823378433394`, 0.03325751230456789,
0.01124668114016019, 0.026328766711565744`, 0.011006393702725284`,
0.013193980481730583`, 0.06478154472955346, 0.1129782458438967,
0.07119670573371731, 0.04064833091606902, 0.24263201601837703`,
0.023219834016298055`}}]]], "Output",
CellChangeTimes->{3.5316147892594643`*^9, 3.531614848354909*^9,
3.531615686153913*^9, 3.53161609681293*^9, 3.5316165784832153`*^9,
3.531622867149292*^9, 3.5316270390623198`*^9, 3.5316295261202383`*^9,
3.531630115731564*^9, 3.531713251970915*^9, 3.531776067575654*^9,
3.531790200919943*^9, 3.531790879208127*^9, 3.532036627503133*^9,
3.532039842501646*^9, 3.532054644558632*^9, 3.532124851586048*^9,
3.5420646297607613`*^9, 3.544839544215102*^9, 3.5448492082894917`*^9,
3.5449089530969353`*^9, 3.545943794207575*^9, 3.5459443716475286`*^9,
3.545958494473638*^9, 3.545967535420192*^9, 3.54597169437216*^9,
3.5459725945278482`*^9, 3.545972676380354*^9, 3.5459727305065193`*^9,
3.545972839130014*^9, 3.545972943437286*^9, 3.545977482096311*^9,
3.546030310855999*^9, 3.546030381192758*^9, 3.546030673213696*^9,
3.546669173029118*^9, 3.5466711040769463`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.6", ",", "300"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.6", ",", "300"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.54597748211395*^9, 3.546030310887601*^9, 3.546030381499298*^9,
3.5460306798034678`*^9, 3.546671104109014*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.7", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}, {
3.5459730205185947`*^9, 3.5459730208687*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977482157877*^9, 3.546030310949024*^9,
3.546030381568923*^9, 3.5466711041659718`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.7", ",", "300"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.7", ",", "issues21", ",", "300"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.545973028695661*^9,
3.545973033706944*^9}, {3.546030717168154*^9, 3.546030725804112*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.01277383428005192`"},
{"0.06337549705012817`"},
{"0.06738635667774052`"},
{"0.03406870756438407`"},
{"0.034725876412977495`"},
{"0.01124219366557894`"},
{"0.010105901119981432`"},
{"0.011112728915562453`"},
{"0.0064502535877505205`"},
{"0.007913040022767954`"},
{"0.07285960782312716`"},
{"0.015724955149220166`"},
{"0.014592739067187728`"},
{"0.00759502177246554`"},
{"0.008443874823987388`"},
{"0.02200317734589631`"},
{"0.029546818929890792`"},
{"0.03108944060746927`"},
{"0.03241722495871513`"},
{"0.49724226738809757`"},
{"0.009330482837019417`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.08590632628272356`"},
{"0.010249933706438152`"},
{"0.019369144910211196`"},
{"0.06933703713959931`"},
{"0.033782819059046135`"},
{"0.042262234103462325`"},
{"0.024076786746887388`"},
{"0.01150017235118349`"},
{"0.006126694545915766`"},
{"0.015897509748706344`"},
{"0.051389235723498114`"},
{"0.006748268189853551`"},
{"0.012889233282113582`"},
{"0.005275859280267499`"},
{"0.0065834422547594584`"},
{"0.031117238105526683`"},
{"0.09634991069115773`"},
{"0.02796658960073372`"},
{"0.06817076393275048`"},
{"0.36569455248886806`"},
{"0.009306247856297448`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.20339580676600422`"},
{"0.05537684709531628`"},
{"0.004826310867957182`"},
{"0.03412486561760455`"},
{"0.03472388092412605`"},
{"0.011046674180338138`"},
{"0.00917597989204767`"},
{"0.01120999235429893`"},
{"0.010761849352714176`"},
{"0.007208420622436722`"},
{"0.13523258847013372`"},
{"0.01993322046609752`"},
{"0.013251772613679144`"},
{"0.0064493481748522955`"},
{"0.006709324288753081`"},
{"0.023665333468764864`"},
{"0.031924938042876355`"},
{"0.050237356676772586`"},
{"0.036064491007592944`"},
{"0.2853934157979929`"},
{"0.009287583319640682`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015750862260836475`"},
{"0.030738515998175966`"},
{"0.005894088569844576`"},
{"0.028932073523049228`"},
{"0.19371379000137312`"},
{"0.05179340679602782`"},
{"0.07192775186156278`"},
{"0.0488761226284378`"},
{"0.006767099649750918`"},
{"0.025412810671900737`"},
{"0.026857865152232138`"},
{"0.008550297497332578`"},
{"0.01384403708022991`"},
{"0.005143935344611066`"},
{"0.006827424783646466`"},
{"0.028509575631589103`"},
{"0.03585211754187833`"},
{"0.030411536886266487`"},
{"0.018394814251265174`"},
{"0.33197912929073065`"},
{"0.013822744579258658`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015660877079323923`"},
{"0.0109999483838291`"},
{"0.005293785769618663`"},
{"0.23192405966759216`"},
{"0.032224365326373676`"},
{"0.025255726389680495`"},
{"0.030515303220016977`"},
{"0.10448038926655581`"},
{"0.02244176684149011`"},
{"0.015656344346370817`"},
{"0.02798375412116437`"},
{"0.010942381728938078`"},
{"0.03234167188064912`"},
{"0.014236864527445168`"},
{"0.016807492827927973`"},
{"0.027564940063497204`"},
{"0.0262151654952841`"},
{"0.020782225196414407`"},
{"0.014042051446734108`"},
{"0.20380643736310433`"},
{"0.11082444905798944`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.023360855193793953`"},
{"0.07532189014362212`"},
{"0.009182592470446485`"},
{"0.19183187306228866`"},
{"0.08279283613988532`"},
{"0.0068033104911306205`"},
{"0.03630303330727758`"},
{"0.021320512938059595`"},
{"0.00789750406370785`"},
{"0.018464444186053114`"},
{"0.07740300898102492`"},
{"0.013387896656666301`"},
{"0.014560058111583986`"},
{"0.005731238328625799`"},
{"0.006518698532993254`"},
{"0.029791343167662233`"},
{"0.056018401186214734`"},
{"0.029334776054414993`"},
{"0.020377918366586666`"},
{"0.26211847752301054`"},
{"0.011479331094951292`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017106361220892034`"},
{"0.03594819629715731`"},
{"0.0055740566343965925`"},
{"0.29748276628750925`"},
{"0.10962704841412385`"},
{"0.03166585722524102`"},
{"0.007819653598693669`"},
{"0.04427992180053096`"},
{"0.017141332140230826`"},
{"0.03402769889014695`"},
{"0.021647524772143687`"},
{"0.006534226037011006`"},
{"0.013423432327268406`"},
{"0.0054019420375621095`"},
{"0.006685740174044584`"},
{"0.07134221614012724`"},
{"0.03876555216819504`"},
{"0.023747009587381317`"},
{"0.02082468281170719`"},
{"0.18029842885309688`"},
{"0.010656352582540047`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013097647634838727`"},
{"0.011390319868948208`"},
{"0.00499525696610682`"},
{"0.19575226660430423`"},
{"0.37076418833522323`"},
{"0.02002334267133979`"},
{"0.0625441105576639`"},
{"0.01101623145524836`"},
{"0.04935620872820861`"},
{"0.027027096351647212`"},
{"0.017450981242961308`"},
{"0.00880404102557861`"},
{"0.019545837435195425`"},
{"0.011176611393343975`"},
{"0.007096280236441068`"},
{"0.03257956667988178`"},
{"0.025086708284849893`"},
{"0.017007221026996273`"},
{"0.01224235345855452`"},
{"0.07197872834772889`"},
{"0.011065001694939177`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015966241527679184`"},
{"0.01124216839151149`"},
{"0.014403532610838975`"},
{"0.05080437723314414`"},
{"0.17674550423922958`"},
{"0.01495689116412458`"},
{"0.052427073788512475`"},
{"0.11847956191253911`"},
{"0.005782194247114486`"},
{"0.07318511013305086`"},
{"0.07737371160459995`"},
{"0.008029831422465543`"},
{"0.08819550421454372`"},
{"0.021709122358979316`"},
{"0.04741727712878799`"},
{"0.047004159759193226`"},
{"0.02906107170880749`"},
{"0.038250110457158065`"},
{"0.012590190908238237`"},
{"0.07457360825154921`"},
{"0.021802756937932377`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017286926598697596`"},
{"0.055048604697657204`"},
{"0.0054077522096231895`"},
{"0.2388047101815414`"},
{"0.097954924617569`"},
{"0.04213279391807469`"},
{"0.0848744752109079`"},
{"0.05390445232385053`"},
{"0.057779662801817434`"},
{"0.0063171204868040925`"},
{"0.10799660631857659`"},
{"0.010063959793525406`"},
{"0.038417387906617924`"},
{"0.01359044052065914`"},
{"0.009660894747587198`"},
{"0.022229225845491293`"},
{"0.027408243650717756`"},
{"0.017821422673135783`"},
{"0.012392520714307057`"},
{"0.06977628120332786`"},
{"0.011131593579510973`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09055268788191094`"},
{"0.05754853943842886`"},
{"0.06579648902442503`"},
{"0.06497002859663559`"},
{"0.06714884247587019`"},
{"0.03541485193187423`"},
{"0.013609738803960903`"},
{"0.014008098225194138`"},
{"0.02228103235710674`"},
{"0.03002935906155235`"},
{"0.012058784943685364`"},
{"0.09178724736839504`"},
{"0.018741106308819557`"},
{"0.010108367414514116`"},
{"0.00721267488146482`"},
{"0.027120076415890648`"},
{"0.06855908309579739`"},
{"0.027454600091040747`"},
{"0.018699687262169248`"},
{"0.21447791356028714`"},
{"0.04242079086097696`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05813580428560644`"},
{"0.02366411626522356`"},
{"0.02837133339464977`"},
{"0.06377438667493468`"},
{"0.130292624290763`"},
{"0.02036869961660121`"},
{"0.011211000880061316`"},
{"0.019073381365758757`"},
{"0.012478485057458251`"},
{"0.012451786906602896`"},
{"0.23992708093825424`"},
{"0.00466486162091248`"},
{"0.015076163677631685`"},
{"0.0058779777414309405`"},
{"0.009025721905442603`"},
{"0.02280562964538746`"},
{"0.02664776793784762`"},
{"0.02058931606129288`"},
{"0.01481576114717768`"},
{"0.2337000964544763`"},
{"0.027048004132486245`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021079553146968008`"},
{"0.012195417404995074`"},
{"0.0054748054341428225`"},
{"0.04087933880008468`"},
{"0.150125665878663`"},
{"0.013836982324374874`"},
{"0.009515716310256113`"},
{"0.02046928686233904`"},
{"0.05444422880973697`"},
{"0.020135043166298123`"},
{"0.02590164972187884`"},
{"0.00531335618709812`"},
{"0.012224839848711115`"},
{"0.0936350040827664`"},
{"0.10040875491201247`"},
{"0.06532530411362619`"},
{"0.05129685585773946`"},
{"0.08731378259629888`"},
{"0.014385374866592034`"},
{"0.17766140041158937`"},
{"0.018377639263828432`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021814714783196576`"},
{"0.013551820498890981`"},
{"0.005612474389969761`"},
{"0.0330987401897159`"},
{"0.17562059174146802`"},
{"0.011520291623206093`"},
{"0.009627829699322599`"},
{"0.03357912453700936`"},
{"0.020876533869755996`"},
{"0.017637875203785222`"},
{"0.03328520003802499`"},
{"0.00466486162091248`"},
{"0.27362421091789346`"},
{"0.0048411327127325515`"},
{"0.0480648615243578`"},
{"0.03646726230367692`"},
{"0.08686159102441789`"},
{"0.030846064462183003`"},
{"0.015967845142803926`"},
{"0.10768499792275785`"},
{"0.014751975793918619`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02870617923724549`"},
{"0.011200027671775383`"},
{"0.005045563321496543`"},
{"0.03594815203630878`"},
{"0.20718782325078378`"},
{"0.007461067851748704`"},
{"0.009573673227008557`"},
{"0.012624082781203673`"},
{"0.07755083070566532`"},
{"0.014064040511861515`"},
{"0.027406456691440637`"},
{"0.009926920505857143`"},
{"0.25216010817195184`"},
{"0.05000713814184092`"},
{"0.006476811209892396`"},
{"0.02254896683883414`"},
{"0.02549104649824352`"},
{"0.021529739445865472`"},
{"0.013723495210897605`"},
{"0.0788887260681014`"},
{"0.08247915062197714`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013396402373437134`"},
{"0.014439298168176155`"},
{"0.005332147443832668`"},
{"0.033078204089413255`"},
{"0.037178969736231006`"},
{"0.0086104873177627`"},
{"0.01686418451092886`"},
{"0.012187870019883033`"},
{"0.00788768495182698`"},
{"0.006546260132286151`"},
{"0.013718966526045935`"},
{"0.005092877185114814`"},
{"0.017542608979709818`"},
{"0.005965213992455854`"},
{"0.006658393570463083`"},
{"0.020429526454620317`"},
{"0.2642280146023898`"},
{"0.07683073682267211`"},
{"0.034489184740973414`"},
{"0.3893013745960319`"},
{"0.010221593785744965`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013663176054399331`"},
{"0.023675048614078424`"},
{"0.005023605118239031`"},
{"0.030212968501802155`"},
{"0.03252485964603372`"},
{"0.010958630931682176`"},
{"0.009109654465921142`"},
{"0.011049619712988365`"},
{"0.0059612767204472415`"},
{"0.00639300289075865`"},
{"0.018818389487957325`"},
{"0.004707355767127032`"},
{"0.014024770470513214`"},
{"0.007415063854871134`"},
{"0.006543587725372406`"},
{"0.1353913684457746`"},
{"0.024833289137625437`"},
{"0.10363450622894899`"},
{"0.06613177431595434`"},
{"0.46063976191961836`"},
{"0.009288289989886938`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.019484357004222796`"},
{"0.01414020257500646`"},
{"0.009194265010170913`"},
{"0.033013416501075706`"},
{"0.035094298450435366`"},
{"0.010089785173811117`"},
{"0.009199208668981645`"},
{"0.011054446277139992`"},
{"0.007471289374724695`"},
{"0.006382085684019869`"},
{"0.013682914874079796`"},
{"0.0047565771934524005`"},
{"0.01842710544172326`"},
{"0.005540463953349448`"},
{"0.006599098639945624`"},
{"0.0711520595513857`"},
{"0.150647947251451`"},
{"0.016852353770359103`"},
{"0.025678084174283085`"},
{"0.5222453515042815`"},
{"0.009294688926100528`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.029500822361662585`"},
{"0.04824653326202363`"},
{"0.01138395008417158`"},
{"0.03398728866007704`"},
{"0.033809275433437175`"},
{"0.009537133129336801`"},
{"0.010547584377765784`"},
{"0.01103979889178462`"},
{"0.005876463993259527`"},
{"0.006387822796412873`"},
{"0.01541714465010244`"},
{"0.004888752268006951`"},
{"0.012578351396755017`"},
{"0.005206427979044585`"},
{"0.006576972815171502`"},
{"0.05251069943960449`"},
{"0.19029436919957413`"},
{"0.04477387420669335`"},
{"0.012115643884942292`"},
{"0.4460545844529408`"},
{"0.009266506717232764`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.052015354217615925`"},
{"0.041257255499939215`"},
{"0.011438932503112616`"},
{"0.08035041725486317`"},
{"0.040209090161373924`"},
{"0.019889606601963535`"},
{"0.01542069480013547`"},
{"0.011332020454061896`"},
{"0.0061137726958686986`"},
{"0.006481330766187131`"},
{"0.02404297744865904`"},
{"0.007042752781978403`"},
{"0.014613783624735512`"},
{"0.0056748156696002855`"},
{"0.006724705573961021`"},
{"0.10421150572983945`"},
{"0.24967189840287465`"},
{"0.16544370927208013`"},
{"0.07757238755901195`"},
{"0.049508897293827035`"},
{"0.010984091688310946`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013106394434315117`"},
{"0.010523806774654903`"},
{"0.0051197462981894155`"},
{"0.04348647086256799`"},
{"0.5297539184661327`"},
{"0.009229043381050414`"},
{"0.00889558350954519`"},
{"0.011876975383929577`"},
{"0.011787839385867525`"},
{"0.007666923465872365`"},
{"0.060182195501771604`"},
{"0.016500090640279217`"},
{"0.0159808133556837`"},
{"0.005291067039088642`"},
{"0.031770945295910895`"},
{"0.024322436495701278`"},
{"0.02514628692987315`"},
{"0.017986970767257072`"},
{"0.012115643884942292`"},
{"0.13000801698753633`"},
{"0.009248831139830568`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03306916223805603`", "0.030276957564006318`", "0.01224756099557418`",
"0.07945168559651654`", "0.0803475749806604`", "0.020233566217483498`",
"0.02205924216428297`", "0.025190146398993876`", "0.012487160745630659`",
"0.012570214415410948`", "0.031245583522209686`",
"0.01023338681041959`", "0.022817011925876946`", "0.00964529810222619`",
"0.011198205766322345`", "0.06650858399481677`", "0.12247173509564127`",
"0.07651912063209039`", "0.042194113292864606`", "0.2583307280469862`",
"0.020902961493929992`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw91vc/FYzjBfAGPSSRUSLxZESPlZKiOjJanpJRQkpUshMurqzruta99p73
mtfes4xSkUqXJNlpKFIyQh76+uH7+vxw/oHzep336/xt6WRwc8O6desE/z/S
KV0b/5ENBX+lsrXFkTIsZYoT1DXKcaEk9W9XZwYmIzh5EtoY2LOLo1xqUxAa
Ely3W1eQcWB4h5rOIwpcrpq3xtoR0VE3qlFz0A9oeGExlVsBB12r0QPCkXjc
YXf6xRgNqcnr9syL+MKsqLWcXdcfNwycjq4Ljse312yugSfS8bM/a/PXNxkY
LdoSvZJIR1bDXvWu7hE0hIirDIoEgHFtfGVupRoxus6siRUy+Oxb9fzfxCCF
MnGXr6UcmTNbzi/rMlAplK95MysHR5tKOuPyEnHESW69NS0IQjz6XOeFPKEQ
+qbL6VQktrMlpZXpFYBOfn+XL9sLvDaXUgpvhmIsg69cItUNozeHDY4tEHH8
ILuf8lAGbovc0LIqqMPq8uDWk1mpiHbMZGS5lIP4iyUWav0WF2uDnPfyBICX
W7h8hKMDds1uuaamRZA8azPf8tgFGyvTvFgeDMz8M7nTaK1PnlNFpKwMCihX
rsgNdJBglXerSmueAm+C6OL5zRR062kXx1C8oRdrK3dO7yFK/2Nvv2YTi8Vt
k6+aJMJgpTpUy7AlQpnXgnLUywurNko59eqJIBtny7pfpmOhZGqhui4fT43f
kbjcM5En3ds0ptUNkW0/jK6yB6BDWt5zVTwSPWcffZjwzMD9RVPTW5Ie4Oc2
ib9KT0NVsN2WtOftmGooulxALoBazKTDgE0Fbkp5B5/dlA+NwFliV60XTn+e
7mexJ+Ob52gX3S8FP7f/9usi+cMiieOglikVBn3HGZ3b3HBhX/wY34IXJiLf
qqftT8Ora4V3VMwyQZizKj8gmYE3Cn7bd/RGY1sQy0oKb2B3XefaTj0qEqhB
hdackajJCRKQDKKgz2bzix8lbpB+XMNeVvoS1jvtT9b40sEXHCiSNZiEUH7H
i9bIAJ/k0la15gYkH0kkLv2Ox4zyEy9VjkgMygvMPslLBR1GafO3KWj7vcVx
ewQdUsvGqaoyNMifFGpZVokC21Yz1vKRVBhT+5ak+pJhu02N8uNUHIKFB48J
PKKifV+intH2DgyKn6tbufoA2R4nXL9MJoD+uzdd93Ql5vleVxh0kpDKFmU5
Q2vHdbNI3a/7q5H7if3hsyEvaLQn5evFZ0JT4ZA115s4vM6y4o6S8wPHTOGI
8ZdolN1TXFfKqkRwkx2fqF0YDuLSZH4XDXl8q9FZnu5gf6/IMqkkgpblpJzh
n445Q4lM55IiCEjI+P7gTAeloW12ZigWfiMysdSnLCRO8DR6koKQrrbibkSO
wofEj+dfWmcixPaQU3cPAVR2QZl5ztfw2FFRSOZ9ABNd837/Q3TE0dokWjb6
4fiN9fSBwlyYs70y9KVFgWnaLiJgz8CSbNPzx/viccVcYobRSkTwQmt8k3cY
HvyUf3pZnAApO9Maf0svjFtIPfHSqsBbOaqgwLssUH4c7t2jnwiDUb9OXsM4
MAfr3rIJtGHFvdzxT3cgRiUX/ae7QzG3mNHfaRgEmu2IwBc3Vxh5JPxls/UZ
IiwGapMa3uK2YV3bH79YSPJYc3/cUIbXIcnhxREUJKiUUlV18nE4s+n+SlEK
yDNjlMLhKCgbHrbs/4uEZHe1me6NsbD8dsGq9QMFqe3ph1d4vfF7iNWvXUJH
rHaCj1FZEtjNHE4b20aBXblviMwXAvqAZpGyQwVWo09ZIZ+CHo1OI1eTSDzi
yfh3z5qPSZcF7ZN8adAMtGPn2FgAacFDLYkZT6FVojxbywjHM2J5Sd3bAhRl
Mw8UGzWBrrRldlupO86YxdzSfFCBZ85fPVo7KzGYx2r46ewHTbcTm5ZjajDN
qRY6oRaPbJltL/lPMfFAauz9FC8T/wydIyk+SoNc/a8GclwWog6ndo21h+BW
R1zwiR2VuGPApUEwjMf4roj1BZVRMO69n2+kWISlDlnHO9IEyEoqCO+N6sS/
0zVT0fz1GDvyY8EhOgcubbrWFxuqsTJdfMo8qRDHpFUf68YV4847o93LI55Q
z1C9UZBzH5dSXbpsUsngVL3AcC7MQoVf4pbzb8KQEzJlvONZAP49v11IszUe
vEFeQl94U5Hio+zYhmiolBKWcD0EnzZ1Ng4MlqOmY8MB2RcUKAazrSco1IJX
Jpu2zr0Yi0q0L5x9ZWBObz44yigD3+TNzAKlcmiKlRz79HcmuBMjDtuPhIHF
wb37VBkViwvyT3pZ8fA1MZNja0mHvFtl7cmKYKgKZ3le9a1F3v1m02GlGEzW
lYlUVJLhl1ZXyBnmDfF2wUDzJynw824M204rx0kZ3k08oqmI2D3zeIN0DOYv
qkludH2OA8q9ofJ1OWBqa39cai2GOr1j3nrN3YPVunPXuNOQem1HPtmwDJbR
u1sciltQQR48GzwQiyP8gtuer/lOZzyaWwyKQXbmy6/64SFgKRlSDfxCcHN5
k/r36k5co2aeIIi44KJXuJPGaDhclZiZ/vweIPdrfOC/R4K4w8InM9ME+D5S
daKdScEfy8BUc8E49Fo1vqg3DsdHjiLfsa8vIadS2uNRkQL7vMCh0bg4NK4Y
qH5dCkacXcHHZnsCqpZcV/d8z4ZycvoVfdVW2LxzN4q8RMWNuZfdS/cC4FkR
F/95PhYlB63kREcLoeOeOnIqPRYFUiNnfgUmg1X8Qcmt1Q2lAx1qlzhD0N+v
W0ZYrEWxduxVq6p6uP54/ECmvgyKwwmDsVoFID1oVFI2rcGN0UYjAQINhg+1
+lIan6I9heAT3xWNOwuaDYmX4pFFagnf+jAM2sM6YiIrBBQxzzvoz9BRaMB2
7gHxKQ6WCl2dTQjClGqgw8PaAAzMO7ic3s+A7OtPHkyLOKTqlj7O54nGYX2V
5YebGf/r0/6CgRhPQBfu7Owp0O1xAedsgfh8ChNlO6d1egszQfNoKIo4WgO7
/ecu74rPgJVM1czI2q7Pi5h4HI+6j6OFZUWnD4XD3GebwN6baXA8RtbePE0B
f+7ZHcwCV+j8Ku9+vubp9ISP49+BHXBZypf2jfCB/sq/hVdSAhAb6Fud1x8C
uSgm57X+SoQ6WUamvKTCPuCh3J21XVjGXa+NNCJDVsBb+oYECwTSE9GQ5Hzc
/U/ziUMQEW3BFCr/jgRYrByQMxROxvjQcbOPXPHIeD99mVeEin0X7ilzK1eh
ajaQYipaDdOSjLJopzC8Kjr53CSaBhPZw46yb93QF0A1of+gI81J/ZAYZxaO
xblxWWT6gz7eodWnHYVMD6kjc/PB+C5xcq/d3jX3DYYNNFhE3GAGkMuEqGj7
fOyV9qArhkZsI8p+RcGVU2H6t6MHcoN4J3p0vDCNZT3iZCyyRkzSd31lQU58
eUi+sBIbHLeuj2IyIHqd68KFiT68zFQQ4vlBhsw5/7t3lsPgYy6arnM8EV2N
3PcZMa5QuBu4KjWdjpv7l5R25tFhIFYaRnSmQNWWT1yQSQKXh3W/AmPNbdMv
HP22HpCttc+hKhJxVYTZKK4TAyZNfD/7aRdsauHsYaungn833xbNaz4wqCbM
3X1JhLh+l6i/0UM4LHZ0f3JIQgttxacjqAEp777ybPxehuKcf5TFvIbw68y0
fOPaXxqluPNWz8bgUMbMYMg8FUzdo1ece0hrf8f6zp5xOg51HNN4v8AA9/Sj
zXP5ZMTz8nzgeEuCXf1Yfk0WBadfX1s8lOwDQkmZgLAkEatmis3P2KlQf/ts
geHlAsfaqV3hw9E4VtW8kFhOgKaFOzfzLy/4zbM82FUrsLfNMMbxdCs001X1
m05EwTJ0A4+ZbjL8zKXH1GtGQXKv+UuIMwBVt1eLCCrp+G92A/uTSiYawu5N
uF8IwtZC6r72Www89o7hcNFjgK1H2PhgcAAcbDNfLSYFQjUlvJ4jlYKm+0Vn
J7d54OkJbvHd+4jYLxEhvikmAk97m53VNrkiaHRHc/GjEJAPWg5fNHSDZqR5
hes0EUMrkeUlYwWgpckOR5q1o6p4aCLpWy6GP3Epb2et+XtANEiGOojeciui
/m8SvuuRCh4yCjCbpvS0UCwHuyXYgnUdgiBsYXS+L6oKz+56K5yJz4bin9Dx
afNYiPM9Sx+LjcAf72XO4ypBUFwNvfJwsyd0ZTt/76MSQaFfGa9LTwThxjxt
sO8e5hK+vumZomGnhdV9z+Pu2MuF2+ZhXphb93s6ubgBKk6KpZh/hdxAQ3tN
+ScYIWZVtg9UwmXQc0rNJB86fek9r30o2PtftRflbSgIKTZO/rRAGM0zHJ0X
XfGx8HLPgFYuFIuNvZtmR3GzZl69+DMJ9m1sG96pkvCZ/Dx3ziAYYtOH2Y9I
BuPTt2YhU2tfpEf/sjzAKsGR6/WXbn2KRHbUuNpJ80h8Ezu3Kljkhh2xbJtO
a9NR7a4uuDyeCH7pyeaZ5iQ0ar2Qk7eL/l+fJTPxZ4WzW/A8W06Y+ycJ/wex
GZud
"], {0.03306916223805603, 0.030276957564006318`, 0.01224756099557418,
0.07945168559651654, 0.0803475749806604, 0.020233566217483498`,
0.02205924216428297, 0.025190146398993876`, 0.012487160745630659`,
0.012570214415410948`, 0.031245583522209686`, 0.01023338681041959,
0.022817011925876946`, 0.00964529810222619, 0.011198205766322345`,
0.06650858399481677, 0.12247173509564127`, 0.07651912063209039,
0.042194113292864606`, 0.2583307280469862,
0.020902961493929992`}}]]], "Output",
CellChangeTimes->{3.5316147892594643`*^9, 3.531614848354909*^9,
3.531615686153913*^9, 3.53161609681293*^9, 3.5316165784832153`*^9,
3.531622867149292*^9, 3.5316270390623198`*^9, 3.5316295261202383`*^9,
3.531630115731564*^9, 3.531713251970915*^9, 3.531776067575654*^9,
3.531790200919943*^9, 3.531790879208127*^9, 3.532036627503133*^9,
3.532039842501646*^9, 3.532054644558632*^9, 3.532124851586048*^9,
3.5420646297607613`*^9, 3.544839544215102*^9, 3.5448492082894917`*^9,
3.5449089530969353`*^9, 3.545943794207575*^9, 3.5459443716475286`*^9,
3.545958494473638*^9, 3.545967535420192*^9, 3.54597169437216*^9,
3.5459725945278482`*^9, 3.545972676380354*^9, 3.5459727305065193`*^9,
3.545972839130014*^9, 3.545972943437286*^9, 3.545973034770153*^9,
3.545977482418326*^9, 3.5460303112169123`*^9, 3.546030381964459*^9,
3.546030727367309*^9, 3.546671104349041*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.7", ",", "300"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.7", ",", "300"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.545973039894758*^9, 3.54597304369166*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "18", ",", "4", ",", "3", ",", "15", ",", "13", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"19", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.545973044043651*^9, 3.5459774824360247`*^9, 3.546030311352853*^9,
3.5460303821992617`*^9, 3.5460307317621193`*^9, 3.546671104426601*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.8", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}, {
3.5459730205185947`*^9, 3.5459730208687*^9}, {3.545973144320849*^9,
3.545973144748294*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977482479601*^9, 3.546030311374524*^9,
3.546030382268553*^9, 3.5466711044617443`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.8", ",", "300"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.8", ",", "issues21", ",", "300"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.545973028695661*^9,
3.545973033706944*^9}, {3.545973080140368*^9, 3.5459730868593407`*^9}, {
3.5459731549178057`*^9, 3.545973181728496*^9}, {3.5460307528355923`*^9,
3.5460307625850677`*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.00851588952003461`"},
{"0.06754821867327117`"},
{"0.07471473578981909`"},
{"0.025158487919748826`"},
{"0.024341780030843953`"},
{"0.009608549669647064`"},
{"0.00782595670917227`"},
{"0.00745443711528644`"},
{"0.004618292554041316`"},
{"0.006035321698970949`"},
{"0.07752584468181896`"},
{"0.015750014636769488`"},
{"0.010856063767875916`"},
{"0.0063747235910403535`"},
{"0.006565946841751111`"},
{"0.015418142464538483`"},
{"0.021942417282910694`"},
{"0.027505858898841492`"},
{"0.03127890286474953`"},
{"0.5447012116369558`"},
{"0.006259203651912395`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09209588038023077`"},
{"0.006833289137625434`"},
{"0.01983792234121414`"},
{"0.06546515029142337`"},
{"0.023264000197779536`"},
{"0.045060024455799506`"},
{"0.02379268313992193`"},
{"0.007897229613139052`"},
{"0.004248510791944452`"},
{"0.015160429957186252`"},
{"0.052988276567957196`"},
{"0.005490943826064781`"},
{"0.008909200013505465`"},
{"0.0037242521713854505`"},
{"0.004439738191204906`"},
{"0.02583421190411605`"},
{"0.09828880786721578`"},
{"0.023936886319715148`"},
{"0.0721400902636471`"},
{"0.3943609660378364`"},
{"0.006231506531087288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.22636957236112298`"},
{"0.058406904439200436`"},
{"0.00321754057863812`"},
{"0.025222668552000796`"},
{"0.024339499472156585`"},
{"0.00938509882937186`"},
{"0.006763189591533683`"},
{"0.007565595330985271`"},
{"0.009545830571142635`"},
{"0.005230042384306684`"},
{"0.14880925113554075`"},
{"0.020559460713200747`"},
{"0.009323530678151821`"},
{"0.0050653823366252175`"},
{"0.004583603372911904`"},
{"0.017317749462102544`"},
{"0.024660267697751335`"},
{"0.04938919154947386`"},
{"0.03544720692060989`"},
{"0.3025882383911218`"},
{"0.0062101756320509845`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.011918207212359816`"},
{"0.030248811756754368`"},
{"0.004437857952223713`"},
{"0.019288049015366144`"},
{"0.2060422527032961`"},
{"0.055952793247302936`"},
{"0.07847950041383668`"},
{"0.05061260135857256`"},
{"0.004980402339184627`"},
{"0.026035059583694134`"},
{"0.024952424486510368`"},
{"0.007550405891755098`"},
{"0.010000404354209838`"},
{"0.0035734819592066693`"},
{"0.004718575367075771`"},
{"0.02285402621961596`"},
{"0.029148472839467882`"},
{"0.026731111788895454`"},
{"0.015253290627663868`"},
{"0.3558290538113936`"},
{"0.011393217071614385`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.011815367004916897`"},
{"0.007690448768929373`"},
{"0.003751797609108384`"},
{"0.25127889032341527`"},
{"0.021482910217582443`"},
{"0.02562401564004884`"},
{"0.031150987680641472`"},
{"0.11416033465927886`"},
{"0.022894307701172276`"},
{"0.014884812354517078`"},
{"0.02623915473671863`"},
{"0.010284216442161383`"},
{"0.03114055841183179`"},
{"0.013965401025302786`"},
{"0.016124367417683208`"},
{"0.02177444271322522`"},
{"0.0181348133576459`"},
{"0.01572618414335022`"},
{"0.010278704565342647`"},
{"0.2093459773226778`"},
{"0.12225230790444958`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02061534199288265`"},
{"0.08120123935154998`"},
{"0.008196148124340183`"},
{"0.2054592484887827`"},
{"0.0792754482901672`"},
{"0.004535540327420412`"},
{"0.037765536351796435`"},
{"0.01912047599814032`"},
{"0.006272293097992549`"},
{"0.018094069314153992`"},
{"0.08271830314798784`"},
{"0.013079090645279354`"},
{"0.010818714104328784`"},
{"0.004244685369509221`"},
{"0.004365745366329244`"},
{"0.024318903403699542`"},
{"0.052195654147280904`"},
{"0.025500527981065176`"},
{"0.01751969533088843`"},
{"0.27598830893399917`"},
{"0.008715030232405968`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013467348880994741`"},
{"0.03620273209844732`"},
{"0.004072107168854589`"},
{"0.3262031264604634`"},
{"0.1099431194607255`"},
{"0.03294987945211802`"},
{"0.005213102399129111`"},
{"0.04535980041239331`"},
{"0.016836668042590236`"},
{"0.03588064611883267`"},
{"0.018997749766409278`"},
{"0.005246324222816158`"},
{"0.00951971320796812`"},
{"0.003868346751150719`"},
{"0.004556650098959335`"},
{"0.07180561537223099`"},
{"0.03247811241240126`"},
{"0.01911450916159812`"},
{"0.01803028326816903`"},
{"0.18247968188266928`"},
{"0.00777448336107883`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008885961925505245`"},
{"0.008136587609065498`"},
{"0.003410621833666278`"},
{"0.2099396982510862`"},
{"0.4083855650848391`"},
{"0.01964414853337375`"},
{"0.06775533892366653`"},
{"0.007344154303498903`"},
{"0.053653669857421996`"},
{"0.02787995750340439`"},
{"0.014201700018772273`"},
{"0.007840398495464848`"},
{"0.016516747617027573`"},
{"0.010467968872044282`"},
{"0.005025838741698175`"},
{"0.02750544456052188`"},
{"0.016845147974292523`"},
{"0.011411893664015208`"},
{"0.008221906864565977`"},
{"0.05868573844796299`"},
{"0.008241510918106406`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01216435494589434`"},
{"0.007967271634852106`"},
{"0.014162936856217313`"},
{"0.044284967541188894`"},
{"0.1866499261179892`"},
{"0.01385391823941351`"},
{"0.05619301118749347`"},
{"0.1301593891118312`"},
{"0.00385479616474299`"},
{"0.08063197325357999`"},
{"0.08268482043207358`"},
{"0.006955587520478486`"},
{"0.0949735096505685`"},
{"0.022505124261341814`"},
{"0.05110697804723752`"},
{"0.04399069379402067`"},
{"0.02138727760167263`"},
{"0.03568948158420012`"},
{"0.008619435378490223`"},
{"0.0616513154809005`"},
{"0.020513231195812925`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013673709312772526`"},
{"0.0580317702704472`"},
{"0.003882044969113557`"},
{"0.2591424909107858`"},
{"0.09660354940751996`"},
{"0.0449120928153565`"},
{"0.09327575567023108`"},
{"0.056359263867615673`"},
{"0.06328047451297494`"},
{"0.004211413657869393`"},
{"0.11768241439090403`"},
{"0.009280305658832614`"},
{"0.03808423387008186`"},
{"0.013226630731833042`"},
{"0.007956826754436609`"},
{"0.01567648360693275`"},
{"0.019498331249570077`"},
{"0.012342409831031792`"},
{"0.008393526585426019`"},
{"0.056168655997218965`"},
{"0.008317615929045603`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09740600792215921`"},
{"0.06088883854561481`"},
{"0.07289774418602996`"},
{"0.06047428338517914`"},
{"0.0613965983884356`"},
{"0.0372344448311274`"},
{"0.011830342633720237`"},
{"0.010763430612008365`"},
{"0.02271061114759128`"},
{"0.03131111488615312`"},
{"0.008039189962456906`"},
{"0.10267834860154079`"},
{"0.015597054901169437`"},
{"0.009247118610524442`"},
{"0.005158861193153891`"},
{"0.021266027115960585`"},
{"0.06652786204394681`"},
{"0.023351755451494607`"},
{"0.015601716925839951`"},
{"0.22154195011945815`"},
{"0.04407669853643531`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.06035814095495408`"},
{"0.022163783490523045`"},
{"0.03012613775200108`"},
{"0.059107835474663806`"},
{"0.1335609204625988`"},
{"0.02003884218510109`"},
{"0.00908892786354928`"},
{"0.016552325629796503`"},
{"0.011507699947993007`"},
{"0.011222460994782312`"},
{"0.26846009967053563`"},
{"0.003109907747274985`"},
{"0.011408549036954724`"},
{"0.00441238755557224`"},
{"0.0072309149348427845`"},
{"0.01633523080681408`"},
{"0.018629216149147063`"},
{"0.015505716560354193`"},
{"0.011162944222992445`"},
{"0.24351015914138863`"},
{"0.026507799418160206`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.018008139653653`"},
{"0.009056699078833344`"},
{"0.003958677225707424`"},
{"0.03294206647483523`"},
{"0.15622725370591312`"},
{"0.012574022422556702`"},
{"0.007151459783771904`"},
{"0.018147646197316826`"},
{"0.05946854995059726`"},
{"0.020003325291576855`"},
{"0.023859606851820883`"},
{"0.003851044394344288`"},
{"0.008149893232474073`"},
{"0.10470613194566993`"},
{"0.11166866694235121`"},
{"0.06492914448480121`"},
{"0.04679960234330917`"},
{"0.0917622497432182`"},
{"0.01067107418803742`"},
{"0.179465935092375`"},
{"0.016598810996836983`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01884832438077136`"},
{"0.010606874043285811`"},
{"0.004116013175223924`"},
{"0.024049953777270906`"},
{"0.18536431183483312`"},
{"0.009926375906935236`"},
{"0.0072795893712764605`"},
{"0.033130317825511485`"},
{"0.02110547001919043`"},
{"0.017149419048704977`"},
{"0.03229795007027362`"},
{"0.003109907747274985`"},
{"0.3068920315972539`"},
{"0.003227421808488367`"},
{"0.0518470744993173`"},
{"0.03194852527343061`"},
{"0.08744501396237024`"},
{"0.027227714732800046`"},
{"0.0124796116465653`"},
{"0.09949290367656752`"},
{"0.01245519560265434`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.026724283756827262`"},
{"0.007919110812296555`"},
{"0.0034681148112545327`"},
{"0.027306424459091348`"},
{"0.22144114784547972`"},
{"0.00528726302526965`"},
{"0.007217696260060412`"},
{"0.009181698676019263`"},
{"0.08587609497451539`"},
{"0.013065036543649305`"},
{"0.02557938624560579`"},
{"0.009123689330068888`"},
{"0.28236162845903495`"},
{"0.05484571372746937`"},
{"0.004317874139928263`"},
{"0.01604190188503886`"},
{"0.017307248789599522`"},
{"0.016580486142722867`"},
{"0.009914640295815218`"},
{"0.0665828786998173`"},
{"0.08985768112043552`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009227395912474854`"},
{"0.01162113423675458`"},
{"0.003795639522495819`"},
{"0.024026483948353605`"},
{"0.027145315257419388`"},
{"0.006600885272142788`"},
{"0.015549709155969331`"},
{"0.00868316980593853`"},
{"0.006261071255842984`"},
{"0.004473287538420316`"},
{"0.009936540342297559`"},
{"0.003599068392077653`"},
{"0.014227343667901161`"},
{"0.0045120861281721415`"},
{"0.004525396837723334`"},
{"0.013619684303080205`"},
{"0.290149498051481`"},
{"0.07978162600193046`"},
{"0.033646856901616146`"},
{"0.4213401913031665`"},
{"0.007277616164741593`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009532280119288795`"},
{"0.022176277603500032`"},
{"0.003443019721817376`"},
{"0.020751928991083773`"},
{"0.021826332297193926`"},
{"0.009284477973765049`"},
{"0.006687389104531938`"},
{"0.0073823123123446235`"},
{"0.004059461848551853`"},
{"0.0042981364052460305`"},
{"0.01576445229876772`"},
{"0.0031584724858059014`"},
{"0.0102069568002479`"},
{"0.00616905739950389`"},
{"0.004394190157619703`"},
{"0.1450046465786851`"},
{"0.016555526091750285`"},
{"0.11041450532338976`"},
{"0.06980981641588006`"},
{"0.5028697768158368`"},
{"0.006210983255189562`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.016185058347658467`"},
{"0.011279310701703502`"},
{"0.008209488169739527`"},
{"0.023952440990253548`"},
{"0.02476283378793866`"},
{"0.00829151139334098`"},
{"0.0067897367651725115`"},
{"0.007387828385660771`"},
{"0.005785190596297514`"},
{"0.0042856595975445675`"},
{"0.009895338454336256`"},
{"0.003214725544463466`"},
{"0.0152381967673451`"},
{"0.004026657512050534`"},
{"0.004457631202846237`"},
{"0.07158829355652636`"},
{"0.16034370679326523`"},
{"0.011234902513572731`"},
{"0.023577027682541482`"},
{"0.5732761649125946`"},
{"0.006218296325147951`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.027632447327589654`"},
{"0.05025797434400884`"},
{"0.010711985397168859`"},
{"0.025065437743397926`"},
{"0.02329423605422644`"},
{"0.007659909056798905`"},
{"0.008330737575211529`"},
{"0.007371088516683201`"},
{"0.0039625330174801795`"},
{"0.004292216297422285`"},
{"0.01187731534121928`"},
{"0.0033657827725258097`"},
{"0.008553906430238534`"},
{"0.0036449021128449758`"},
{"0.004432344545961526`"},
{"0.050283882000204984`"},
{"0.20565390330540595`"},
{"0.04314521158366902`"},
{"0.008077095923294858`"},
{"0.48620100256820525`"},
{"0.006186088086441934`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05336334087725062`"},
{"0.04227022833019808`"},
{"0.01077482244738719`"},
{"0.0780518704231535`"},
{"0.0306083100290113`"},
{"0.019491307311229458`"},
{"0.013900006629348314`"},
{"0.007705056016428659`"},
{"0.004233742963319233`"},
{"0.004399082548592866`"},
{"0.021735409968141106`"},
{"0.00582749764563604`"},
{"0.01088011469078767`"},
{"0.004180202330622921`"},
{"0.004601181984578121`"},
{"0.1093705177604735`"},
{"0.27351393668060653`"},
{"0.18105359451553965`"},
{"0.08288480297937449`"},
{"0.03300593152921801`"},
{"0.008149042339102715`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008895958267763978`"},
{"0.007146286929873149`"},
{"0.0035528953560463867`"},
{"0.03592164597481616`"},
{"0.5900881138058786`"},
{"0.0073078064873287486`"},
{"0.006442736582959421`"},
{"0.00832786165056315`"},
{"0.010718390609032178`"},
{"0.005754045633947419`"},
{"0.06303737345741262`"},
{"0.0166358837694084`"},
{"0.012442434383299884`"},
{"0.003741632467181042`"},
{"0.033225455952520834`"},
{"0.018068724350029874`"},
{"0.016913237854319103`"},
{"0.012531607652884694`"},
{"0.008077095923294858`"},
{"0.12500492546488579`"},
{"0.006165887426553711`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03199494250820359`", "0.030061188393528504`", "0.01156079805592929`",
"0.07374870870164008`", "0.07044850977580136`", "0.019386559530177996`",
"0.020472758868830064`", "0.021731581745667333`",
"0.010519570384340579`", "0.01064965538713221`", "0.028801927639952738`",
"0.009055812859941037`", "0.018743207852808946`",
"0.008033183641307604`", "0.008892766796585357`", "0.06941804109371533`",
"0.13442003595646906`", "0.08327946370400689`", "0.04452466338244743`",
"0.2763174224728962`", "0.017939201248617868`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9luk7FIzDhRktngolS01EpKJIlpB0UEqPsq8JJYqyDFkSxswwdhnL2NPY
sy+RJaEiQkibfUsJRaVHivL24b1+H84/cF/Xuc/ZZetqaE9gY2Pj//8I8o6b
tZKoOPuCyP3233JI7GzUpIregx/ROELiSTIG7mcqcH1Owv2ahsqc4kDM57Lv
4l5PQVfQJ5WIUDIcjtZ5Z8y4I1NOwIRccwOfeyhvH/TdwwO+HYktogxIarYc
rlQNBvQCX18Uuon2V2rzk5M3YV0vzxUZFw0xHUoF740ErP4o+kqWSgO5vvrF
Mw4WtPU1jx5yGcd944aD6lk+eGFsfDMprhpP7D7xq/z2xWHjShc7/Xj8pof8
MHxchmapbayg3kQEbmwP3sGbhwOm4/M7rJKw+6OpktMBCmKSQuYmLrtBg2/M
y2VTNIjRQ/RTuwpRFBNIKPL3gpJ6KHPlGA1RBR/uGtJc8POAucSVg+4YWbOS
pu2Rgspj56I9JGvRLJyDaVoSysocx1q8K7AwufJUUa0fweOCZxSDfSA6sim1
+GcnPqYMUGhTxZCuGf9aaHkVfEOHMpdeJkMubH6fx6ckyLWYZJOVAyE82zFe
fc8Xqp5mnMTfZMyxz5U9iQyE39T37m1OngC/n4/MpifQG43gCudi4odLM1Fp
WyCcCNlKpEYPyPOdy9d46o59Pw3IDQ9icHlFICpcPRkxCosnwk/n41vbzKTY
nkwM9RJ4Uq1eYk/4qNFbVx9wjGSUxzqEouf1gl3Ez3R8VNR1cpF2RxXnB240
xaFU6WZZok07/KdV5fpyipC8uTREVbASg77ygu+n88G5XBJrfNkDdtf7tObv
piDTlzIkGpUMzbR1uQc+kzFoeDBK0DcI5R61QWInnbFRTmquzeg6AoZa6zde
SUROhs6Hbf23IclfHHHZJhWkSiWOnWrRkAvXUplqeYMh0aYqI5MQVDwlVOfJ
hUKJ+4TIWkoAeIc42QXrXXBPbz33d74ehHQeuXd7lYk52YJ4GbUULJ7Wtd/4
4Q4OFw8lpqk8xFFtq+UUt0S4uu2r+Ox7C5W7x4ZdR1LQ3KIlNclDR+XKqwC9
d3eQwOZqP5kciebt07+maAwYi1kLbziTgElhydq5mFj8yDI/F0xkQDuSZcPG
RYeo4laz/o52TNrpXfis0whHjjsyskJMzPc7PEh5VolZf+mLu59RENDsuc3/
TDtYh9oM7HUq4TzH8WYwzh2FfwRF2E2z0HPC1skgPg6tv1mDP8t8sPis11U9
JBZDQs/frJOuAr05/5Xis3DQLYhHRPYFo/YqhWvM1g0DBPH+nnE3CAQdWOaa
SkJFulDIpdoCEFzfeHULpYCU/rm/5EsMytqPjrTnv8Dm5LxbB/upOPSYZ6k5
PgL72FuFpMIyofHv4NfpYhJCNrDxBY69ApOT6qUqUY/St7r+XSMsEHk30E3O
eeLlplzTyyp5CDX2LshQi4FLxKl736wzUbb89IqERxzu7rjout/fE6nrpU7x
BgSCLCTRTytzxarcDfc/+e7YcLHcYOBiBZzP6txeYrHQlTH9pyk2DpnP3r8M
8YqFqMt8ENmyFQ/1vVfE+gIwG/4x/bkcDZdKPc7O5FOgQaDlJX65BgNnntdn
R9vRkR+p+FtsANI9nOQk4Xhk+3R9dzQvhwBXl8MUHxlSMhVXyTcKYRj35CQj
Mg2yt9dNt/JHoe80uw+Lm4KbA1f2N08z8C9f2eoREh1EWX/9n0wPRDTbi1/6
66H91syGAcRATyWetNMmBLvymu7mvKFgs35TOvemEnxVmBr5NEYB8ZglP2s6
FPWW49skDCjg+/ZBwZM9CimkhLmgolyY7lLbLDHZCrZvW13cbCJR3c6KNW4p
woJpk+Dm/CaQZ+vmBONdUfBajPNMdiVKMzMEX0tVoc2nU9fL3w+cAfP8B/Vr
4Hyr1ZC5MREXhtLTy6UKID5r3vCNnotbmy5PRXxgQlXdRXtSKxOGQn6cW/Ko
iBz1H33MKMXyYb/sa+xMXG2lyi2yRSKUMS5gdr8YuSMTa9Weu6Kye9i2ndmD
S2y2twkPasC8WfSk+k8uxDiEKbNj1SguPikgMliECTma7B75MqSrvmtYgRt8
o0ROu4o2wPW2Y3gUeyC+yM69fhqQBeVkVyOGQAT2ptMVC3UooPZnsAdwMRBH
PzBk/SMOVkt3FH6dDINfm+cWliwVwitiFuKPi2A2IRX4kpOKh3memcnzNcix
9LfrPVCK3TKq8s75Fejtf3rEb7EEvd+NVmxcS8FUKsyx25yFsY6KKuqRUITq
tsiLbwwGf2WK/nWNRGB6tIjAyULrUmd3vxcF+qrqr0VP1+HT/moti6/RMGYI
q+/9QsOvU40anrs88dBuZvbxUyYK7Jv0ltaXIyh5tJU+nQjbvvzV9oVofNA4
Eudn2YkbcZ5M5Zhc2L56L3Z8qgQrlr+NiRUJ2Hokedy2Px0M0ZS+i8dL8C6i
UiF42yOcbzSd56HHY27GFUq3achvI7QILjBgp+BiZhETgqcKLKXny8EgXhXU
ui7zAr6bZQgLPo4o8NkSamUVAsvyn8dred1Rsz3nm2S6P+pXLNpk6hh4ZukW
GrY1Dm+GlTd5PYqGguQsIXkoGOotYyfM9ncjnP+87tDuVIwpB3TUkmKhzXgZ
axBJwzpSkNHPwyRoEs2N24ZZ6I2vlNVYfQJ98aIah6YwHD2pZt3/rz9mBgtm
dZixqDCwvJrvXgKB7Y9cm3zj0bxIFspzSYKFskm1SqQr2qYO7Z0so8Dgvr3d
2q466J2nmhsk1EMtYae23J0y9NJ5tu5czENDVB7/A/9qiAwpmFQP0CE9vnzh
4dJT8AuHWZxaZYCTIJ/180wcJpjrw7hr6QjqyhpdGCShzvTp1ihWEpQiEyLX
1LWC0kW8c8o4CJPu7pPyL/zxXVRs1WORhbNCq8JFaUxwp79Znx4dA3vZaGvL
MNb/eD481uqzM/sljnm3vLMjXcWSSb3YvYgC2Aw7pN+yZGFvvtS7Dtv7EP58
mp05noo/SkIi07fCYMv0mbe6UQurhiPcQrQwFHj/MkyzSoWSWDrPeyUK1i1J
L0o6OmE7p6Co0mIqCvn/LMuYd0JO12to211PkLeoJpxl+OPEHu36gec0PPdx
6vi5XAUvPwf620fh4C6kRvkeSoEih8kAqZQGt51L1MO8vSBzxbbU8xWB9Zsa
mF7qhuYffd2nnRlQ/ije9bsmBtscvyT4/GJgsSaOLKobBBr8TeM2lv/9O5W1
02zVeD9iLdzzngZlnhnV3s4QdMbUXefc5grRvQc3Xk5Jwp77fFrLHam4e/F9
Tsg/vgg7eCYzuC8aj/LrDX3bqEgQowUp5vigl3vuV7yhO5Ja3EZSLYJQwaG9
q8PXGa9atzeoiEchW7X6/XFfd7hsuL+oHOaOqVVd/qzJCJw+piXfHdOLnNWA
2BinSpyfIByQPJKBsM7Q/qM/BvBwufawWLc/iISFX3fpgRg0V+q8UJUAQpqF
eJiCE5amL178AyY6RzKssi0S8HmMJ/whRyCijP6YHbXzxWijgs3MUTJG53jI
eSwSEqyqFD6luCGGR93v1m4G+ubWsHeOOiI5SzbKdioIn5rc62tP+EDukh4p
e9UNEg6O4oHRj3FKPyRy7m8f6+Wt2UVP1INjv7s192g5dE9UWNIEx0DcpC9S
RvIBcV5ivCeWgaWYEo/U7SGobsjpF+uhYDa1n/g7OAl0QWKOs2UyjIP39Iov
U1ASXMx/q9sXa5+M8d3TJKPtRtLJwxXeoG7g+P0m6u9+x57rYz8RBMmxkMxm
k6voOym6R0ExGvbiKjkaZBIchx8el9J0x/CGlONpRhXQWbCn7A5uBtvL7wJG
hBA4XTGJiNudBPP1fhqnzCeQpZenaHnDBx+tDfeU6KRBy9GszfFBPubX55pJ
faHDIOcG16OCZGSL7K1xG0gEKfCIzKpNANZIBRRW8lDhYPGWKnGIjHV5NMs1
qiTEia7+Ux3vhkCvrFNiRqGIqBsZvhV7DdLZPyaqgqgQq3o/Oz3ojGXqtHPu
XndITDhu727Ih+FH8q9hw3aIyntt2SWYC7XkCq/acAo61hp3zwiP4r9XZheY
pj54vbYxkWRYCNXkCIpbdg6If9RlhbYEQ+vToIDi8j38GlebaTO7AwXCa/+Q
/+IA7u16qd6R+Hi3UMU0OgD/feOtvWzmhomEwbqWNe7Q75wu7NJIwIzTu5XY
EW90ecqe1NcORkF6d5CmiBuGp81ty/r+/i76587K1Qewa9VMVqe+wAa1zIwn
B1rR2LDr2BelKuh8XNbe+4GF8rs139z+eq1wLk13ozIN53c4tztp+aPxRcj+
RaIz0o3OOxvaZWJr4wtvtokJuBe/t2qf84d+Qt1cxaWbYLncLJTjpsLGgeuf
4AU6nL34hqNivLF7wilDSbwMWdKzmqucMUhR4T15zTcMbQuMzJZcF3hOXzv7
mZCBssY8RiolFmvze6QrDWJgm6D9cX9B2P94Ev47ZyDJ1oSaQcbzyxo++D9e
v5Bp
"], {0.03199494250820359, 0.030061188393528504`, 0.01156079805592929,
0.07374870870164008, 0.07044850977580136, 0.019386559530177996`,
0.020472758868830064`, 0.021731581745667333`, 0.010519570384340579`,
0.01064965538713221, 0.028801927639952738`, 0.009055812859941037,
0.018743207852808946`, 0.008033183641307604, 0.008892766796585357,
0.06941804109371533, 0.13442003595646906`, 0.08327946370400689,
0.04452466338244743, 0.2763174224728962,
0.017939201248617868`}}]]], "Output",
CellChangeTimes->{
3.5316147892594643`*^9, 3.531614848354909*^9, 3.531615686153913*^9,
3.53161609681293*^9, 3.5316165784832153`*^9, 3.531622867149292*^9,
3.5316270390623198`*^9, 3.5316295261202383`*^9, 3.531630115731564*^9,
3.531713251970915*^9, 3.531776067575654*^9, 3.531790200919943*^9,
3.531790879208127*^9, 3.532036627503133*^9, 3.532039842501646*^9,
3.532054644558632*^9, 3.532124851586048*^9, 3.5420646297607613`*^9,
3.544839544215102*^9, 3.5448492082894917`*^9, 3.5449089530969353`*^9,
3.545943794207575*^9, 3.5459443716475286`*^9, 3.545958494473638*^9,
3.545967535420192*^9, 3.54597169437216*^9, 3.5459725945278482`*^9,
3.545972676380354*^9, 3.5459727305065193`*^9, 3.545972839130014*^9,
3.545972943437286*^9, 3.545973034770153*^9, 3.545973088395207*^9, {
3.545973156257985*^9, 3.545973182136806*^9}, 3.545977482757964*^9,
3.546030311600095*^9, 3.5460303826147842`*^9, 3.546030763934485*^9,
3.5466711046501293`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.8", ",", "300"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.8", ",", "300"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.545973039894758*^9, 3.54597304369166*^9}, {
3.5459730928582697`*^9, 3.545973096961998*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "4", ",", "5", ",", "13", ",", "12", ",",
"11", ",", "18", ",", "17", ",", "10", ",", "19", ",", "14", ",", "21",
",", "20", ",", "6", ",", "2", ",", "3", ",", "7", ",", "1", ",", "15"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.545973044043651*^9, 3.545973097589384*^9, {3.545973163392593*^9,
3.545973171338997*^9}, 3.545977482908741*^9, 3.546030311633621*^9,
3.546030382704801*^9, 3.5460307676310587`*^9, 3.546671104684074*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.9", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}, {
3.5459730205185947`*^9, 3.5459730208687*^9}, {3.545973144320849*^9,
3.545973144748294*^9}, {3.545973195372752*^9, 3.5459731959166594`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977482925749*^9, 3.546030311655251*^9,
3.5460303827811737`*^9, 3.546671104732156*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.9", ",", "300"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.9", ",", "issues21", ",", "300"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.545973028695661*^9,
3.545973033706944*^9}, {3.545973080140368*^9, 3.5459730868593407`*^9}, {
3.5459731549178057`*^9, 3.5459732057670097`*^9}, {3.546030775012808*^9,
3.5460307840278893`*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.004257944760017305`"},
{"0.07172094029641417`"},
{"0.08204311490189767`"},
{"0.016248268275113588`"},
{"0.013957683648710417`"},
{"0.00797490567371519`"},
{"0.005546012298363109`"},
{"0.0037961453150104295`"},
{"0.002786331520332111`"},
{"0.004157603375173947`"},
{"0.08219208154051076`"},
{"0.015775074124318805`"},
{"0.00711938846856411`"},
{"0.005154425409615169`"},
{"0.004688018859514835`"},
{"0.008833107583180665`"},
{"0.014338015635930602`"},
{"0.023922277190213722`"},
{"0.030140580770783937`"},
{"0.592160155885814`"},
{"0.003187924466805375`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09828543447773797`"},
{"0.003416644568812717`"},
{"0.020306699772217083`"},
{"0.061593263443247455`"},
{"0.01274518133651295`"},
{"0.04785781480813669`"},
{"0.023508579532956476`"},
{"0.00429428687509462`"},
{"0.00237032703797314`"},
{"0.014423350165666163`"},
{"0.05458731741241628`"},
{"0.004233619462276013`"},
{"0.004929166744897353`"},
{"0.0021726450625034026`"},
{"0.002296034127650355`"},
{"0.020551185702705428`"},
{"0.10022770504327382`"},
{"0.019907183038696583`"},
{"0.07610941659454369`"},
{"0.4230273795868047`"},
{"0.0031567652058771298`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.24934333795624172`"},
{"0.061436961783084595`"},
{"0.00160877028931906`"},
{"0.016320471486397054`"},
{"0.01395511802018713`"},
{"0.0077235234784055855`"},
{"0.0043503992910197`"},
{"0.0039211983076716155`"},
{"0.008329811789571095`"},
{"0.0032516641461766485`"},
{"0.16238591380094777`"},
{"0.021185700960303977`"},
{"0.005395288742624503`"},
{"0.0036814164983981403`"},
{"0.0024578824570707274`"},
{"0.010970165455440233`"},
{"0.017395597352626326`"},
{"0.048541026422175136`"},
{"0.03482992283362684`"},
{"0.31978306098425086`"},
{"0.003132767944461288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00808555216388316`"},
{"0.029759107515332762`"},
{"0.002981627334602852`"},
{"0.009644024507683072`"},
{"0.21837071540521905`"},
{"0.06011217969857804`"},
{"0.08503124896611056`"},
{"0.052349080088707305`"},
{"0.003193705028618336`"},
{"0.02665730849548753`"},
{"0.023046983820788593`"},
{"0.00655051428617762`"},
{"0.006156771628189772`"},
{"0.0020030285738022735`"},
{"0.002609725950505078`"},
{"0.01719847680764283`"},
{"0.02244482813705744`"},
{"0.02305068669152443`"},
{"0.012111767004062565`"},
{"0.3796789783320566`"},
{"0.008963689563970114`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.007969856930509878`"},
{"0.004380949154029649`"},
{"0.0022098094485981067`"},
{"0.2706337209792383`"},
{"0.010741455108791221`"},
{"0.02599230489041719`"},
{"0.03178667214126596`"},
{"0.12384028005200191`"},
{"0.023346848560854443`"},
{"0.014113280362663343`"},
{"0.024494555352272896`"},
{"0.00962605115538469`"},
{"0.029939444943014468`"},
{"0.013693937523160405`"},
{"0.015441242007438447`"},
{"0.015983945362953243`"},
{"0.010054461220007709`"},
{"0.010670143090286043`"},
{"0.006515357683951192`"},
{"0.21488551728225125`"},
{"0.1336801667509097`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01786982879197135`"},
{"0.08708058855947783`"},
{"0.007209703778233879`"},
{"0.21908662391527664`"},
{"0.07575806044044905`"},
{"0.002267770163710206`"},
{"0.0392280393963153`"},
{"0.016920439058221045`"},
{"0.0046470821322772485`"},
{"0.017723694442254866`"},
{"0.08803359731495074`"},
{"0.012770284633892405`"},
{"0.0070773700970735865`"},
{"0.0027581324103926443`"},
{"0.0022127921996652356`"},
{"0.018846463639736855`"},
{"0.048372907108347095`"},
{"0.021666279907715368`"},
{"0.0146614722951902`"},
{"0.2898581403449878`"},
{"0.005950729369860646`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009828336541097452`"},
{"0.03645726789973734`"},
{"0.002570157703312588`"},
{"0.3549234866334175`"},
{"0.11025919050732716`"},
{"0.03423390167899501`"},
{"0.0026065511995645553`"},
{"0.04643967902425565`"},
{"0.016532003944949646`"},
{"0.03773359334751838`"},
{"0.01634797476067487`"},
{"0.003958422408621313`"},
{"0.005615994088667839`"},
{"0.0023347514647393294`"},
{"0.0024275600238740877`"},
{"0.07226901460433473`"},
{"0.026190672656607496`"},
{"0.014482008735814926`"},
{"0.015235883724630871`"},
{"0.18466093491224167`"},
{"0.004892614139617614`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0046742762161717695`"},
{"0.00488285534918279`"},
{"0.0018259867012257376`"},
{"0.2241271298978681`"},
{"0.44600694183445494`"},
{"0.019264954395407714`"},
{"0.07296656728966915`"},
{"0.0036720771517494517`"},
{"0.057951130986635374`"},
{"0.028732818655161568`"},
{"0.01095241879458324`"},
{"0.006876755965351089`"},
{"0.013487657798859725`"},
{"0.009759326350744587`"},
{"0.002955397246955282`"},
{"0.022431322441161985`"},
{"0.008603587663735158`"},
{"0.005816566301034153`"},
{"0.004201460270577437`"},
{"0.0453927485481971`"},
{"0.005418020141273638`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008362468364109503`"},
{"0.004692374878192724`"},
{"0.013922341101595653`"},
{"0.03776555784923367`"},
{"0.1965543479967488`"},
{"0.01275094531470244`"},
{"0.059958948586474464`"},
{"0.14183921631112328`"},
{"0.001927398082371495`"},
{"0.08807883637410911`"},
{"0.08799592925954719`"},
{"0.005881343618491431`"},
{"0.10175151508659325`"},
{"0.023301126163704312`"},
{"0.054796678965687046`"},
{"0.04097722782884813`"},
{"0.013713483494537784`"},
{"0.03312885271124218`"},
{"0.004648679848742216`"},
{"0.0487290227102518`"},
{"0.019223705453693472`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01006049202684746`"},
{"0.06101493584323721`"},
{"0.0023563377286039268`"},
{"0.2794802716400302`"},
{"0.09525217419747092`"},
{"0.047691391712638295`"},
{"0.10167703612955427`"},
{"0.05881407541138081`"},
{"0.06878128622413243`"},
{"0.0021057068289346966`"},
{"0.12736822246323146`"},
{"0.008496651524139826`"},
{"0.037751079833545795`"},
{"0.01286282094300694`"},
{"0.00625275876128602`"},
{"0.009123741368374214`"},
{"0.01158841884842241`"},
{"0.00686339698892781`"},
{"0.004394532456544985`"},
{"0.04256103079111008`"},
{"0.0055036382785802335`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.10425932796240747`"},
{"0.06422913765280078`"},
{"0.07999899934763488`"},
{"0.05597853817372268`"},
{"0.05564435430100102`"},
{"0.03905403773038056`"},
{"0.010050946463479572`"},
{"0.007518762998822596`"},
{"0.023140189938075824`"},
{"0.03259287071075388`"},
{"0.004019594981228453`"},
{"0.11356944983468652`"},
{"0.012453003493519322`"},
{"0.008385869806534767`"},
{"0.003105047504842963`"},
{"0.015411977816030532`"},
{"0.06449664099209623`"},
{"0.019248910811948475`"},
{"0.012503746589510659`"},
{"0.22860598667862914`"},
{"0.04573260621189365`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0625804776243017`"},
{"0.02066345071582253`"},
{"0.03188094210935239`"},
{"0.05444128427439294`"},
{"0.13682921663443462`"},
{"0.01970898475360097`"},
{"0.006966854847037246`"},
{"0.014031269893834252`"},
{"0.010536914838527764`"},
{"0.009993135082961728`"},
{"0.29699311840281706`"},
{"0.0015549538736374924`"},
{"0.007740934396277769`"},
{"0.002946797369713541`"},
{"0.005436107964242969`"},
{"0.009864831968240714`"},
{"0.010610664360446519`"},
{"0.010422117059415509`"},
{"0.007510127298807215`"},
{"0.25332022182830094`"},
{"0.02596759470383416`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01493672616033799`"},
{"0.005917980752671616`"},
{"0.0024425490172720263`"},
{"0.0250047941495858`"},
{"0.1623288415331632`"},
{"0.011311062520738532`"},
{"0.004787203257287698`"},
{"0.015826005532294615`"},
{"0.06449287109145756`"},
{"0.019871607416855595`"},
{"0.021817563981762926`"},
{"0.0023887326015904586`"},
{"0.0040749466162370365`"},
{"0.11577725980857342`"},
{"0.12292857897268995`"},
{"0.06453298485597622`"},
{"0.042302348828878886`"},
{"0.09621071689013751`"},
{"0.006956773509482811`"},
{"0.18127046977316058`"},
{"0.014819982729845535`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015881933978346145`"},
{"0.007661927587680641`"},
{"0.0026195519604780898`"},
{"0.01500116736482593`"},
{"0.1951080319281982`"},
{"0.008332460190664385`"},
{"0.004931349043230324`"},
{"0.0326815111140136`"},
{"0.021334406168624868`"},
{"0.016660962893624724`"},
{"0.03131070010252225`"},
{"0.0015549538736374924`"},
{"0.3401598522766144`"},
{"0.0016137109042441834`"},
{"0.055629287474276805`"},
{"0.02742978824318431`"},
{"0.0880284369003226`"},
{"0.023609365003417097`"},
{"0.008991378150326674`"},
{"0.09130080943037722`"},
{"0.010158415411390063`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024742388276409035`"},
{"0.004638193952817728`"},
{"0.0018906663010125242`"},
{"0.018664696881873926`"},
{"0.23569447244017563`"},
{"0.003113458198790599`"},
{"0.004861719293112269`"},
{"0.005739314570834856`"},
{"0.09420135924336544`"},
{"0.012066032575437098`"},
{"0.023752315799770947`"},
{"0.008320458154280633`"},
{"0.312563148746118`"},
{"0.059684289313097806`"},
{"0.0021589370699641314`"},
{"0.00953483693124359`"},
{"0.009123451080955535`"},
{"0.011631232839580268`"},
{"0.006105785380732833`"},
{"0.05427703133153321`"},
{"0.0972362116188939`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00505838945151258`"},
{"0.008802970305333006`"},
{"0.0022591316011589713`"},
{"0.014974763807293966`"},
{"0.017111660778607787`"},
{"0.00459128322652288`"},
{"0.014235233801009804`"},
{"0.005178469591994032`"},
{"0.004634457559858988`"},
{"0.0024003149445544856`"},
{"0.006154114158549186`"},
{"0.0021052595990404942`"},
{"0.010912078356092512`"},
{"0.0030589582638884303`"},
{"0.0023924001049835867`"},
{"0.0068098421515401025`"},
{"0.3160709815005722`"},
{"0.08273251518118882`"},
{"0.03280452906225888`"},
{"0.45337900801030107`"},
{"0.004333638543738223`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0054013841841782624`"},
{"0.02067750659292164`"},
{"0.001862434325395723`"},
{"0.011290889480365406`"},
{"0.011127804948354138`"},
{"0.007610325015847923`"},
{"0.004265123743142736`"},
{"0.003715004911700887`"},
{"0.002157646976656466`"},
{"0.002203269919733413`"},
{"0.01271051510957812`"},
{"0.0016095892044847735`"},
{"0.006389143129982592`"},
{"0.004923050944136647`"},
{"0.002244792589867002`"},
{"0.1546179247115956`"},
{"0.008277763045875143`"},
{"0.11719450441783051`"},
{"0.07348785851580579`"},
{"0.545099791712055`"},
{"0.003133676520492188`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.012885759691094144`"},
{"0.008418418828400543`"},
{"0.0072247113293081415`"},
{"0.0148914654794314`"},
{"0.014431369125441965`"},
{"0.006493237612870845`"},
{"0.004380264861363382`"},
{"0.003721210494181552`"},
{"0.004099091817870335`"},
{"0.0021892335110692673`"},
{"0.006107762034592722`"},
{"0.0016728738954745336`"},
{"0.01204928809296694`"},
{"0.0025128510707516215`"},
{"0.0023161637657468526`"},
{"0.07202452756166702`"},
{"0.17003946633507944`"},
{"0.0056174512567863655`"},
{"0.02147597119079988`"},
{"0.6243069783209076`"},
{"0.003141903724195376`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.025764072293516734`"},
{"0.05226941542599405`"},
{"0.010040020710166143`"},
{"0.016143586826718827`"},
{"0.012779196675015718`"},
{"0.005782684984261011`"},
{"0.006113890772657277`"},
{"0.0037023781415817863`"},
{"0.002048602041700833`"},
{"0.0021966097984317`"},
{"0.008337486032336121`"},
{"0.0018428132770446704`"},
{"0.004529461463722054`"},
{"0.0020833762466453687`"},
{"0.002287716276751553`"},
{"0.048057064560805475`"},
{"0.22101343741123775`"},
{"0.04151654896064469`"},
{"0.004038547961647429`"},
{"0.5263474206834696`"},
{"0.0031056694556511064`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05471132753688531`"},
{"0.04328320116045694`"},
{"0.010110712391661763`"},
{"0.07575332359144385`"},
{"0.021007529896648683`"},
{"0.019093008020495385`"},
{"0.012379318458561158`"},
{"0.004078091578795426`"},
{"0.002353713230769768`"},
{"0.0023168343309986033`"},
{"0.01942784248762318`"},
{"0.004612242509293679`"},
{"0.0071464457568398325`"},
{"0.0026855889916455556`"},
{"0.0024776583951952214`"},
{"0.11452952979110755`"},
{"0.29735597495833843`"},
{"0.19666347975899914`"},
{"0.088197218399737`"},
{"0.016502965764609006`"},
{"0.005313992989894484`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004685522101212845`"},
{"0.0037687670850913967`"},
{"0.0019860444139033597`"},
{"0.02835682108706434`"},
{"0.6504223091456244`"},
{"0.005386569593607084`"},
{"0.003989889656373655`"},
{"0.004778747917196732`"},
{"0.009648941832196832`"},
{"0.0038411678020224757`"},
{"0.06589255141305363`"},
{"0.016771676898537584`"},
{"0.008904055410916075`"},
{"0.002192197895273443`"},
{"0.03467996660913077`"},
{"0.011815012204358481`"},
{"0.008680188778765063`"},
{"0.007076244538512325`"},
{"0.004038547961647429`"},
{"0.12000183394223525`"},
{"0.0030829437132768554`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03109564996814888`", "0.030032159219448098`", "0.010840022282247029`",
"0.06583431852650876`", "0.05698839675769404`", "0.018203491156779248`",
"0.01824309993239232`", "0.01713450395302838`", "0.00801763344416323`",
"0.008310975580619587`", "0.025768902821364674`",
"0.007648022486919122`", "0.0139088487597918`", "0.0060840906162185435`",
"0.006163484461558441`", "0.0739873568531069`", "0.14988596077367383`",
"0.09206473096203698`", "0.047963144192373325`", "0.2978000730293914`",
"0.014025134222533892`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9luk7FAobxqUyspZCytaCEUKlJM5daXVUUtJq540Yy9izDYMsw9jXRMjI
vk8TIlvZ9yIph2ynUGgReX14r/fD8wfcv+u6f8+9y8RW15ydjY1N8H8nLDCi
32Rnj8BZ9rILt4uhm3CHv4mtDDffknpM0umoSTKLfRsTir/1nJhSej44by2m
b1XhDHKi7qqwiC1Yh/Zfv91jgdJ5KyKdYI+kiUMXg7nKwDncfUFfho7dZA0t
VVlPjK3nCGoXdcKwzoJ79UEyfvU8SBMW9kUp9ccI7tDAL1j+dpt3PFTjG3bL
v0/BX3Vzg7++/YN5OZfpcDErsGnVfj8m+wx1Zp8Fj67cww31TNrZlmjUcp3/
KR1UAPpH+XNSO4Jx5c90c5cPA2IzW7c8FojH3pfs7/6JtYfwKY/0WStTELcJ
aq0E0SC+Q5I0/C0Hz1OkIk/r2+PlfkeJJCVHXBdkzN5pNYbsZPrsrg4T+PZ9
e2bAHYNVY513/oxnCIWNXahJNNq+KUlM3i+BdQ+RNCLwDk2M41ZHhiyhWLBK
vT/dAQtn3HrqWAAF5sjXnFs3IaVLvKBTTgfBaYu6T3QocgP+hJQ89oay2Aer
Z132KEsaycrlt4MRrdpSlZ8CnT9an46lW0ExltbI/7oec7VbrpQWxeBb3LEW
AxFnfE7sI3kSSbBSYsTTdpshe/NEfoBLAJrOf2qU7oyAHOtPhMEgAxJqy2fU
+tKw1VvR8IpLLxTHan+PZlvCkTRlRwz3QbOR1LicWwr2j/suf7a+izLOcT7U
+CF7/MHVyPkWcG9v4eZoysd3mkNaUn0ZLnVPZXq3PcXjkd6rBbJW8GGrKeTV
ToK+p+REakIcMrhEtMp73VGyPbf1zRE31KguNmbdNUIE2WN+xcgcwkSmhnty
BPL8jv/b+DsWwyrfzRMS46DKbTvA2/4AV2gsvmztt7j4UY0n7JYv1By/C/no
+mBDl6vgy6/2cB1btry4wwS6GgdFNut2IbBVreThqj9aBtp5WQ8ToXQ8jqV/
JhW3DtdIrpa8wPC13R7qk3FY9mi0tp4IBW1n7isRwQRM/X2korvcD0Pr6Xsc
GCkgcATsj+AOBXOQfI/xKBxPDhtbbTegY8pgfo4URwWPzcxttUF/CC2/Zh8o
cIcrwgwMKC1w7iVSSaK1UAxbnnTRjoTGs6U3U1rlqO3il/gc6AlD6s12Ancr
hgls10fMSmAzs77/XZQJhFVio4sFM2B4K8w+7koEJkvck7s4yRhN+7VKlI4E
ocoqzyCoHJTmidiLMsEonqjcIrvigUT/jZuPxlvA7Lx8fbikCVLNpuo8tKNA
nhK01qtnYJ5FJRUoxoK5QcanjyMMH8t0iJto3RAI96ppNnQFkV+KbUSSCpJl
9nTA08f4foVtip3PHBT+f1c3V/Sj+NelE9+OVmKD2XHJnYFp2CHA5a930xwW
ZVq8XxuzUJIhsa7+Cx0HKxu1ui6n425bx/qAKjp+DKR8Lj1sB1NFydkWNhcE
6s1IXZU0Rdmi3J3v/5hCwVhjWNWnGFxD27RYXYlQZBy6VM2gYdw8pnjlYDji
V6UO/HzcBN+ikJ1nuRyxMFLkoidFRmZLpA83myMGDYK1qqfvQNsk8PGBwlYQ
5jVKjEKG8E37xiFlVhT2jKkMzeYVQ4i3/e7ENhIqpcvONeTk4R71Vddu64e4
oXe2XpUUADZKtETbPg+Uu+97bfUoBMrq/MnFy344oFjROa1yF3vbZCPUf8au
+VB6pTaFggNuSamiPS7wVNWdCFWxx+jk0liFRhZa83jLDik7I3xJhKIvSQHp
0tnmS6pk0EOYKzp+oVi8Vftm3bV0BCicMioivka1yuLkPrFgZOygO88V54N+
KzfmtcxLeP3LmhGONgS3TnG2Xmg5ontulI8HlGMw/YfMJmFXtD54KGXKw8K0
gN7O40NxEKXL213iy0VIYUfij6UMTLosx3cKhkKr6VOf5vdUKLAxvby4yLi4
rzOPfZ6BgJ1fOI0LorBJ75NxfCIVLC0C9YZGAQxlHBQTLpjiKi1Ddd1oF9w3
815wMGHizHPL8HX3GOj6ayaeQmDhttWHsY+i+cjonvR6klSElGOj1cswxvuq
9cKJF2oQnGKoWWRBQf++UC7Rq+moLDqT2K2/5mHzY9JeyW5weH2z36XAFwc5
nyPneSAEJspEWkQ9EFI3pcvG5gCH6ezD4c2ZmJvPfPI72Hktx7hmVSELKWdz
xHTtC6EjN+XZ6V4K3W4XXtXsXPhuHSqx8szF+CUG79ifdJSu9h2Ii6GCSvwd
+afFCwfsCEP8xXGolorUXF+YiqafrR0Dznb4z+33SqMCVaB9nOlb9AlC5X+C
zZLlKZgeCymotbUEi90rU4cejt4LdVsHfQtRz1UQtFwWBQbZ1omeFIR+BTX2
7yfbULmwLVXTKgu8xXVKZzYWokpYqbSVGAM3Q/JEsW4qpigbDVkfcmDur5Wd
4lcLwlJnVNz+aJzxj3l3JsgDFh/899lUhkKqka/BKNoflapf/jnrQoXvtRzr
2XU9uL95P/u82w1smCOeWCz1RoBZbPPInruw9nolLn/KGcztbnrrD1EhP62n
yf3cH4WLFh+Urvtj33tlh7mXXmiv4dpocbgT44ucrxCXCEb0VwepuDAwTjOG
yBqumJuspJqzmyHDyfnqu8QE2Ic3b1BuqoeqzUfRE/sCUZo+LPQiiYzbG2uO
Fx2i41aFbG/iGo8p1qdV1RvRGG4Sn9XXj4Ww4ChPUIQpXk0oy4wV2qExwnt7
dHoVvpJJunB9AQ4N155j/oVwVgg8n8XIxC+DiCXNNCZYBfo5pV4e4FhXOjV8
sAkN6kcs526EIY1nT+hNTTpO6j7kEDPxRpjn+uMJTuY4zhxOmGGG4WUDsVX7
1yt0fBH9mLSZgjmnwS9jBxzBo90fnPY8Ffbm2+sK3sbAa25FK5I/ApH8U7UL
hNT/8+RTUO9VaOjDXy4No2Z2NzHBbNtrfz8X4ifrvtCEklE7kCjCuebbLsaZ
p7wK8Tgi0XldwMoXrvyJFp6GFfDuqredbaPih91oxJZrCWDnsyvzXnVA31na
fcKSAXL2NCf2i0bB/LhnkLpcO6ZP++81p1jCgDjUNzJFxjRtV8BOXxfYmCjR
osWYMAsiuW8tf4Di7hMzAbrx4LQ/t6LDRQGTSH7Pua4X/vEGNnNh+Uhdofil
FBgjuO2aNFugH6SfyHzUWetT7KRmplh3IJIlbc4Zs7uh/M7ywoHmHEQPjX52
HWNiQlx9206mIx7b03K1CL6Y6tzAXU0xgTQtuFEoJwzCtGIxpn8EBuM/HLrU
7oDucPaq2zI01Jdlvd1w2AmXV1xY0b8d0Bv7+3RPtimSG17Y8am4Yejotgye
tf5/67hzR+BGAHLe+ZSL8FvCdkcFh1qCKSZWLwqmj93HXLLSK4paL8Q/bDi7
qFCG8ms/rtW2pGLhCIep7Ib3GCkS0pCusYcY6TVHnYQzVK9eXrovH4NWV8W0
h34GCK3zeJAnEYi0ssfF8s0BEDg9snmdvDfyu9/YXnS1xy0Jla0zJBLOcNiO
T+Uag5tzOTCOxwTBhEKnn4RgtFIjsNPwJgz4CkJ95NzRaNpjrbzPEbK7dd7m
mJpAznudrH9zHc7qBIbOzPugYqDaz4mtGvc8lnJFOovXOFwUd7IfQQynd0NL
jiVy8xmmA6bBYFGtePI0KAg1Fc9nxHliZmtztpV3GE6q2Ecph9GgdnTbwax4
dxz6rG7OtbZXbKV/5ny9T4KWeFe0SrMdRNueNsvMGsMhinuUvMENL/f8fBp8
9xb6xM0FtPMeQFTKPLM3xgx7yzgXrv8ygZqkKd9Bu2KQJFxtBusawNazIHSF
3QXOpxiE1pUYKBV1peoujSLYqK6Cp8oSEnpPHn0yTkT4cE4IX91TyFA76ofC
qQheeNPwNZCOoMCL1UtywWv/FPkxBS5Q66ngG+FyQ/vP3bvIV0lI2Vv0Vu2V
ERr+jEw8+mOM/tcVpL+2UiARfr/wsrIBnnbk83rQHHB8HWEncYsxbCamdQur
TGDTeJIym8iA0MFeITmtVoQy+VQZJzKhkVDs/CzYDorWDSH9bz7CN7Qzjt/e
Es+f/6ZKrM+FX/S42hHZJxAa8Hz7uZQKB1fTDxFrO8ls2Mdl1TcGahsltonT
omDAZbl65WYQ3ugZGSqV2sG1Q0Vu+zlT/ODsXqxZMoHoT2e7sbEoGDl13Ts/
5gC9rBnruNOecGa5JAuxWUA24hOTQ9sMxlwjjPbLVdj/5svNEUIPbBbm+k/J
v8ZD9tRXwtHl+Hvy9zmZcTrUvmXskqx3gtlLgqakMhnJq7zWeR9IGGS2uG06
bYTi7y94Ijc9xI/Ovx1Odo5BdOaDptpmZzQ/vDdQom+HykJdo5FIMh59HOHp
eemHudWuk34utvjlbhChN1wIviVRxXj5CHy9pCekpe4LVlbgOcNFY/T81RMd
WZuG2/zE7a4HHmBe3/rIv40UPNT6+mXpt8f/eebNaBTaMavBfEdvszhhif8C
5mONXg==
"], {0.03109564996814888, 0.030032159219448098`,
0.010840022282247029`, 0.06583431852650876, 0.05698839675769404,
0.018203491156779248`, 0.01824309993239232, 0.01713450395302838,
0.00801763344416323, 0.008310975580619587, 0.025768902821364674`,
0.007648022486919122, 0.0139088487597918, 0.0060840906162185435`,
0.006163484461558441, 0.0739873568531069, 0.14988596077367383`,
0.09206473096203698, 0.047963144192373325`, 0.2978000730293914,
0.014025134222533892`}}]]], "Output",
CellChangeTimes->{
3.5316147892594643`*^9, 3.531614848354909*^9, 3.531615686153913*^9,
3.53161609681293*^9, 3.5316165784832153`*^9, 3.531622867149292*^9,
3.5316270390623198`*^9, 3.5316295261202383`*^9, 3.531630115731564*^9,
3.531713251970915*^9, 3.531776067575654*^9, 3.531790200919943*^9,
3.531790879208127*^9, 3.532036627503133*^9, 3.532039842501646*^9,
3.532054644558632*^9, 3.532124851586048*^9, 3.5420646297607613`*^9,
3.544839544215102*^9, 3.5448492082894917`*^9, 3.5449089530969353`*^9,
3.545943794207575*^9, 3.5459443716475286`*^9, 3.545958494473638*^9,
3.545967535420192*^9, 3.54597169437216*^9, 3.5459725945278482`*^9,
3.545972676380354*^9, 3.5459727305065193`*^9, 3.545972839130014*^9,
3.545972943437286*^9, 3.545973034770153*^9, 3.545973088395207*^9, {
3.545973156257985*^9, 3.54597320847223*^9}, 3.545977483191482*^9,
3.546030311875103*^9, 3.546030383008245*^9, 3.546030785261778*^9,
3.546671104922565*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.9", ",", "300"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.9", ",", "300"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.545973039894758*^9, 3.54597304369166*^9}, {
3.5459730928582697`*^9, 3.545973096961998*^9}, {3.5459732137077103`*^9,
3.545973218514949*^9}, {3.545973255400517*^9, 3.5459732601142597`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "5", ",", "6", ",", "12", ",", "11", ",",
"13", ",", "18", ",", "17", ",", "10", ",", "19", ",", "15", ",", "21",
",", "20", ",", "4", ",", "2", ",", "3", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.545973044043651*^9, 3.545973097589384*^9, {3.545973163392593*^9,
3.545973171338997*^9}, 3.545973219254294*^9, 3.5459774832089357`*^9,
3.546030311908402*^9, 3.5460303830966883`*^9, 3.54603078954641*^9,
3.546671104963058*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Chek", "Subsection",
CellChangeTimes->{{3.545973245907465*^9, 3.545973246652129*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.9", ",", "300"}], "]"}]], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "5", ",", "6", ",", "12", ",", "11", ",",
"13", ",", "18", ",", "17", ",", "10", ",", "19", ",", "15", ",", "21",
",", "20", ",", "4", ",", "2", ",", "3", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{3.545973264247458*^9, 3.545977483226006*^9,
3.5460303119299*^9, 3.546030383123394*^9, 3.546030794364159*^9,
3.5466711050143833`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.8", ",", "300"}], "]"}]], "Input",
CellChangeTimes->{{3.546030891073947*^9, 3.546030899930382*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "4", ",", "5", ",", "13", ",", "12", ",",
"11", ",", "18", ",", "17", ",", "10", ",", "19", ",", "14", ",", "21",
",", "20", ",", "6", ",", "2", ",", "3", ",", "7", ",", "1", ",", "15"}],
"}"}]], "Output",
CellChangeTimes->{3.546030901215538*^9, 3.546671105063211*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.7", ",", "300"}], "]"}]], "Input",
CellChangeTimes->{{3.5460309186403437`*^9, 3.5460309331665382`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "18", ",", "4", ",", "3", ",", "15", ",", "13", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"19", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{{3.5460309266902437`*^9, 3.546030934349687*^9},
3.5466711051162167`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.6", ",", "300"}], "]"}]], "Input",
CellChangeTimes->{{3.5460309435055437`*^9, 3.546030953000017*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{3.546030953897167*^9, 3.546671105163741*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.5", ",", "300"}], "]"}]], "Input",
CellChangeTimes->{{3.545973270848626*^9, 3.545973271276124*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "21", ",", "12", ",", "20", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{3.545973271514847*^9, 3.545977483243143*^9,
3.546030311949183*^9, 3.5460303831426497`*^9, 3.5460307969296427`*^9,
3.546671105213859*^9}]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell["\<\
Eigen score and ranking (zero self-link, compere with prof. Onodera\
\[CloseCurlyQuote]s results)\
\>", "Section",
CellChangeTimes->{{3.5316429672611217`*^9, 3.531642981085814*^9}, {
3.531801401883176*^9, 3.531801404074361*^9}, {3.545967656431315*^9,
3.545967675513389*^9}, {3.54597263632019*^9, 3.545972638963667*^9}, {
3.54597284833316*^9, 3.545972850488763*^9}, {3.546669350268754*^9,
3.5466693515052223`*^9}, {3.546669590524241*^9, 3.5466696155317783`*^9}}],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.5", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977481421817*^9, 3.546030310322204*^9,
3.546030380521142*^9, 3.54666915943137*^9, 3.546671105265382*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"escoreOnodera", "[", "0.5", "]"}], "=",
RowBox[{"{",
RowBox[{
"0.03551", ",", "\n", "0.03106", ",", "\n", "0.01351", ",", "\n",
"0.08696", ",", "\n", "0.09351", ",", "\n", "0.02134", ",", "\n",
"0.02408", ",", "\n", "0.03004", ",", "\n", "0.01537", ",", "\n",
"0.01563", ",", "\n", "0.03494", ",", "\n", "0.01214", ",", "\n",
"0.02941", ",", "\n", "0.01217", ",", "\n", "0.01495", ",", "\n",
"0.06394", ",", "\n", "0.10528", ",", "\n", "0.06695", ",", "\n",
"0.03969", ",", "\n", "0.22845", ",", "\n", "0.02508"}], "}"}]}],
"\n"}]], "Input",
CellChangeTimes->{{3.546669679111063*^9, 3.5466697399238873`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.03551`", ",", "0.03106`", ",", "0.01351`", ",", "0.08696`", ",",
"0.09351`", ",", "0.02134`", ",", "0.02408`", ",", "0.03004`", ",",
"0.01537`", ",", "0.01563`", ",", "0.03494`", ",", "0.01214`", ",",
"0.02941`", ",", "0.01217`", ",", "0.01495`", ",", "0.06394`", ",",
"0.10528`", ",", "0.06695`", ",", "0.03969`", ",", "0.22845`", ",",
"0.02508`"}], "}"}]], "Output",
CellChangeTimes->{{3.546669713074407*^9, 3.546669741437155*^9},
3.546671105312406*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.5", ",", "50"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.5", ",", "issues21", ",", "50"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.546030607518526*^9, 3.546030639170212*^9}, {3.546669566112083*^9,
3.546669580398917*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.02128972380008653`"},
{"0.05503005380384217`"},
{"0.05272959845358341`"},
{"0.05188914685365455`"},
{"0.05549406917724456`"},
{"0.014509481657442692`"},
{"0.014665789941599755`"},
{"0.018429312516114474`"},
{"0.01011417565516893`"},
{"0.011668476670361957`"},
{"0.06352713410574355`"},
{"0.015674836174121527`"},
{"0.02206608966581134`"},
{"0.01003561813531591`"},
{"0.012199730788459939`"},
{"0.03517324710861195`"},
{"0.044755622223850974`"},
{"0.03825660402472481`"},
{"0.03469386914664632`"},
{"0.4023243788903812`"},
{"0.015473041207233456`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.07352721808770912`"},
{"0.017083222844063585`"},
{"0.018431590048205312`"},
{"0.07708081083595114`"},
{"0.0548204567815793`"},
{"0.03666665339878797`"},
{"0.024644993960818293`"},
{"0.018706057827272356`"},
{"0.009883062053858391`"},
{"0.017371669331746522`"},
{"0.04819115403457995`"},
{"0.009262916917431087`"},
{"0.02084929981932981`"},
{"0.008379073498031594`"},
{"0.01087085038186856`"},
{"0.041683290508347924`"},
{"0.09247211633904165`"},
{"0.03602599616277085`"},
{"0.06023211127095729`"},
{"0.30836172539093154`"},
{"0.015455730506717764`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.15744827557576677`"},
{"0.04931673240754796`"},
{"0.008043851446595302`"},
{"0.05192925974881203`"},
{"0.05549264382806495`"},
{"0.014369824882270689`"},
{"0.014001560493075639`"},
{"0.018498786400926243`"},
{"0.013193886915857255`"},
{"0.011165177098696792`"},
{"0.10807926313931968`"},
{"0.018680739971891066`"},
{"0.021108256484733783`"},
{"0.009217279851306449`"},
{"0.010960766120435434`"},
{"0.03636050148208948`"},
{"0.04645427873312638`"},
{"0.05193368693137004`"},
{"0.03729905918155904`"},
{"0.25100377061173496`"},
{"0.015442398694820074`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.023416172357789786`"},
{"0.031717924481019164`"},
{"0.008806549805086297`"},
{"0.04822012253841537`"},
{"0.16905686459752714`"},
{"0.04347463389347761`"},
{"0.058824254757015006`"},
{"0.045403165168168294`"},
{"0.0103404942708835`"},
{"0.024168312848313948`"},
{"0.03066874648367568`"},
{"0.010550080708487534`"},
{"0.021531302532270043`"},
{"0.008284842115419857`"},
{"0.01104512361678785`"},
{"0.039820674455535374`"},
{"0.04925940694669922`"},
{"0.03777238708100854`"},
{"0.02467786149846778`"},
{"0.2842792802494048`"},
{"0.018681799594547202`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02335189722813796`"},
{"0.017618947613628547`"},
{"0.008377762090639217`"},
{"0.19321439835594606`"},
{"0.053707275543956115`"},
{"0.0245191478889438`"},
{"0.029243934298768003`"},
{"0.08512049848110974`"},
{"0.02153668512212578`"},
{"0.01719940833007829`"},
{"0.03147295289005585`"},
{"0.012258712302491462`"},
{"0.03474389881828376`"},
{"0.01477979153172993`"},
{"0.0181737436484175`"},
{"0.03914593476404116`"},
{"0.04237586977056048`"},
{"0.03089430730254277`"},
{"0.02156874520951702`"},
{"0.19272735744395741`"},
{"0.08796873136506919`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.028851881595616555`"},
{"0.06356319172776642`"},
{"0.01115548116265909`"},
{"0.1645771222093007`"},
{"0.08982761183932159`"},
{"0.011338850818551034`"},
{"0.03337802721823986`"},
{"0.02572058681789815`"},
{"0.01114792599513845`"},
{"0.019205193929851358`"},
{"0.0667724206470991`"},
{"0.014005508679440195`"},
{"0.022042746126094383`"},
{"0.008704344246858951`"},
{"0.010824604866321271`"},
{"0.040736222695587604`"},
{"0.06366389526408237`"},
{"0.037003272201114615`"},
{"0.02609436443798313`"},
{"0.23437881470103328`"},
{"0.01700793282004194`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024384385900686614`"},
{"0.035439124694577266`"},
{"0.008577955565480595`"},
{"0.24004204594160114`"},
{"0.10899490632092051`"},
{"0.029097812771487035`"},
{"0.013032755997822781`"},
{"0.042120164576806264`"},
{"0.017750660335512005`"},
{"0.03032180443277553`"},
{"0.026947074783612503`"},
{"0.009110029665400697`"},
{"0.02123087056586897`"},
{"0.008469132610384887`"},
{"0.01094392032421508`"},
{"0.07041541767591976`"},
{"0.05134043167978258`"},
{"0.033012010438947706`"},
{"0.026413481898783505`"},
{"0.1759359227939521`"},
{"0.016420091025462477`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021521019053505678`"},
{"0.017897784388713624`"},
{"0.0081645272309879`"},
{"0.16737740331074039`"},
{"0.2955214348359915`"},
{"0.02078173094727187`"},
{"0.05212165382565866`"},
{"0.018360385758747263`"},
{"0.04076128646978185`"},
{"0.02532137404813286`"},
{"0.023949543691339375`"},
{"0.010731326085806129`"},
{"0.025604017071531128`"},
{"0.012593896435943363`"},
{"0.011237163225926853`"},
{"0.04272781091860157`"},
{"0.04156982890596462`"},
{"0.028197875752958387`"},
{"0.020283246646531597`"},
{"0.09856470814726065`"},
{"0.016711983248604713`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.023570014691248864`"},
{"0.017791961904830254`"},
{"0.014884724120082297`"},
{"0.06384319661705459`"},
{"0.15693666048171034`"},
{"0.01716283701354672`"},
{"0.04489519899055051`"},
{"0.09511990751395495`"},
{"0.009636990411857477`"},
{"0.05829138389199261`"},
{"0.06675149394965268`"},
{"0.010178319226439652`"},
{"0.0746394933424942`"},
{"0.02011711855425432`"},
{"0.040037875291888944`"},
{"0.05303109168953832`"},
{"0.04440865992307719`"},
{"0.043371368203073954`"},
{"0.020531701967734253`"},
{"0.1004181937928466`"},
{"0.02438180842217129`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02451336117054773`"},
{"0.04908227355207719`"},
{"0.00845916669064245`"},
{"0.19812914872305265`"},
{"0.10065767503766707`"},
{"0.03657419612351108`"},
{"0.0680719142922615`"},
{"0.048994829236320245`"},
{"0.046778039379502444`"},
{"0.010528534144673486`"},
{"0.08862499017392172`"},
{"0.011631268062910982`"},
{"0.03908369597969005`"},
{"0.014318060098311339`"},
{"0.013069030733888374`"},
{"0.03533471032260836`"},
{"0.043228068453013094`"},
{"0.02877944835734375`"},
{"0.020390508972069125`"},
{"0.09699153161554563`"},
{"0.01675954888044171`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.07684604780141441`"},
{"0.050867941224056946`"},
{"0.051593978701215196`"},
{"0.07396151901954849`"},
{"0.07865333065073934`"},
{"0.031775666133367894`"},
{"0.017168531144442233`"},
{"0.020497433451565676`"},
{"0.021421874776137658`"},
{"0.027465847412350815`"},
{"0.02009797490614227`"},
{"0.07000504490210359`"},
{"0.02502920912411979`"},
{"0.011830865022493463`"},
{"0.011320302258086676`"},
{"0.03882817501575076`"},
{"0.07262152519949855`"},
{"0.03566028937013301`"},
{"0.02489562793482783`"},
{"0.20034984044194512`"},
{"0.039108975510060276`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05369113094691119`"},
{"0.026664781814624592`"},
{"0.02486172467994715`"},
{"0.07310748907547641`"},
{"0.12375603194709134`"},
{"0.021028414479601458`"},
{"0.015455146913085386`"},
{"0.024115492837683262`"},
{"0.014420055276388736`"},
{"0.01491043873024406`"},
{"0.18286104347369148`"},
{"0.007774769368187464`"},
{"0.022411392958985598`"},
{"0.008809158113148339`"},
{"0.012615335846642236`"},
{"0.0357464273225342`"},
{"0.04268487151524871`"},
{"0.030756515063170252`"},
{"0.02212139499554814`"},
{"0.2140799710806517`"},
{"0.028128413561138335`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.027222380133598022`"},
{"0.01847285405731853`"},
{"0.008507061851013617`"},
{"0.056753883450583555`"},
{"0.13792249022416278`"},
{"0.016362902128011215`"},
{"0.014244229363224527`"},
{"0.025112568192383465`"},
{"0.044395586528016395`"},
{"0.02039847891574065`"},
{"0.029985735461994754`"},
{"0.00823797977260578`"},
{"0.02037473308118519`"},
{"0.07149274835695939`"},
{"0.077888930851335`"},
{"0.06611762337127615`"},
{"0.060291362886600024`"},
{"0.07841684830246025`"},
{"0.02181397622370125`"},
{"0.17405233105001816`"},
{"0.021935295797811324`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.027747495588046997`"},
{"0.01944171341010132`"},
{"0.008605396819461429`"},
{"0.05119631301460585`"},
{"0.15613315155473778`"},
{"0.014708123055747799`"},
{"0.014324310355414874`"},
{"0.034476737960005124`"},
{"0.020418661570887127`"},
{"0.018614787513945723`"},
{"0.035259699973527715`"},
{"0.007774769368187464`"},
{"0.2070885695591726`"},
{"0.008068554521220917`"},
{"0.04050043557443881`"},
{"0.045504736364169525`"},
{"0.08569474514851319`"},
{"0.038082763920948906`"},
{"0.022944312135281173`"},
{"0.12406918641513849`"},
{"0.019345536176447173`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.03266997019808194`"},
{"0.017761861390733037`"},
{"0.00820046034198056`"},
{"0.05323160719074362`"},
{"0.1786811740613919`"},
{"0.011808677504706808`"},
{"0.014285627160904844`"},
{"0.01950885099157249`"},
{"0.06090030216796522`"},
{"0.01606204844828593`"},
{"0.03106059758311032`"},
{"0.011533382857433654`"},
{"0.1917570675977857`"},
{"0.04032998697058404`"},
{"0.010794685349820659`"},
{"0.03556309674642468`"},
{"0.04185864191553149`"},
{"0.03142824605215067`"},
{"0.021341205041062374`"},
{"0.1035004208046696`"},
{"0.0677220896250604`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021734415295361683`"},
{"0.0200756260310193`"},
{"0.008405163286506364`"},
{"0.05118164437153254`"},
{"0.05724627869385421`"},
{"0.01262969140900252`"},
{"0.019493135220847918`"},
{"0.01919727044777203`"},
{"0.011140912343794973`"},
{"0.010692205320017812`"},
{"0.021283818893542677`"},
{"0.008080494771189132`"},
{"0.02417313960332712`"},
{"0.008871469721023277`"},
{"0.010924387035942578`"},
{"0.034049210757700524`"},
{"0.2123850477042074`"},
{"0.07092895846415542`"},
{"0.03617384041968795`"},
{"0.32522374118176284`"},
{"0.016109549027751704`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021924967924620398`"},
{"0.026672590635235208`"},
{"0.008184775911082336`"},
{"0.04913504752323889`"},
{"0.05392191434371329`"},
{"0.014306936847516431`"},
{"0.013954185188699548`"},
{"0.018384234514275836`"},
{"0.009764906464238016`"},
{"0.010582735861783883`"},
{"0.024926263866336527`"},
{"0.007805122329769287`"},
{"0.02166039781104383`"},
{"0.00990707676560562`"},
{"0.01084238286087781`"},
{"0.11616481217995359`"},
{"0.04138881522937572`"},
{"0.09007450804006747`"},
{"0.0587756901161029`"},
{"0.37617973212718175`"},
{"0.015442903459281686`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.026082954317351442`"},
{"0.019861986321612377`"},
{"0.01116381869103368`"},
{"0.05113536752272`"},
{"0.05575722777542875`"},
{"0.013686332734751389`"},
{"0.014018152476599906`"},
{"0.01838768206009843`"},
{"0.010843486931579055`"},
{"0.01057493785697047`"},
{"0.021258067713566864`"},
{"0.007840280491430264`"},
{"0.02480492279047958`"},
{"0.008568076835947272`"},
{"0.010882033514144393`"},
{"0.07027959154110437`"},
{"0.13125642816782257`"},
{"0.028087256283931838`"},
{"0.029880197157766287`"},
{"0.4201837246876554`"},
{"0.01544747412800568`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.03323757242980843`"},
{"0.044223651098053214`"},
{"0.012727879458177015`"},
{"0.05183099049343524`"},
{"0.05483935419185861`"},
{"0.013291581274412592`"},
{"0.014981277982874294`"},
{"0.01837721964198745`"},
{"0.00970432594481822`"},
{"0.010579035794394044`"},
{"0.022496803267868754`"},
{"0.007934691258969229`"},
{"0.020627241329787976`"},
{"0.008329479711443799`"},
{"0.010866229353591448`"},
{"0.0569643343184035`"},
{"0.1595753009879105`"},
{"0.04803119945274202`"},
{"0.02019273980823715`"},
{"0.3657617482224121`"},
{"0.015427343978814418`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.04931938089834653`"},
{"0.03923130983942148`"},
{"0.01276715261456347`"},
{"0.08494751091828247`"},
{"0.05941065042609915`"},
{"0.020686205183431686`"},
{"0.018462071141709783`"},
{"0.01858594932932836`"},
{"0.009873832160967629`"},
{"0.010645827201375656`"},
{"0.028658112409694896`"},
{"0.009473263054663124`"},
{"0.022081121492631188`"},
{"0.008664042347555013`"},
{"0.01097175275272682`"},
{"0.09389348166857134`"},
{"0.20198782184741088`"},
{"0.13422393878516115`"},
{"0.06694755671828691`"},
{"0.08251482882304505`"},
{"0.016654190386727406`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021527266767417386`"},
{"0.017278846464218407`"},
{"0.008253448182475469`"},
{"0.05861612063807163`"},
{"0.4090855277866412`"},
{"0.013071517168493745`"},
{"0.013801277362716725`"},
{"0.01897520285066242`"},
{"0.01392673693953822`"},
{"0.011492679129722252`"},
{"0.05447183959048959`"},
{"0.01622850438202085`"},
{"0.023057571300451322`"},
{"0.00838993618290384`"},
{"0.028861923982691016`"},
{"0.03682986078704407`"},
{"0.04161238508098123`"},
{"0.028897696996001816`"},
{"0.02019273980823715`"},
{"0.1400142000328374`"},
{"0.015414718566384279`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.035515138098443796`", "0.03106322209779578`", "0.013511116204110794`",
"0.08695741111770378`", "0.09350738443399145`", "0.021337137381933113`",
"0.02407754209768402`", "0.030039281163864538`",
"0.015371173267122206`", "0.015628951095450122`",
"0.034938781657474036`", "0.012138245274081614`",
"0.029408491689604657`", "0.012172849580469023`",
"0.014954329031397047`", "0.06394031740815628`", "0.1052788606845205`",
"0.06695158850966161`", "0.03968720868019803`", "0.22844083969920048`",
"0.02508013082713701`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9l3k4FIr3xkuLkC1bbkIilK1CruS1ZWlRUiJKKZQll6SQZSxj38YY+zYY
jCH7EpEQUhLKchMqS4osJVeWnz9+z/eP8/d53vec9zyfs8/K6YI106ZNm/j+
v9JNBmT/exUH9enmI+MyDOiYtdZYrtPhMksYUI6h48uS+1LVHQaWPyXlS1RF
4Lz7lc2CLJH4EiqrKjZMwsm3RoVPKwNQ/TvMMXssCJ/Db907r12M7uoFFy72
aCw7flDyTqAgP8FrKCIiALoK7AdkVoJhvZf9oioTFfXzRE+lKRrudOmnXaNk
ITuicpd1UyZezTg+K2oYgJt+ltPF4iho3GffVtRdiuX6skJt7xi8Sh7lrt3o
3xtUfCemtgx7CzlOOXIzwHvU9slSCxVmkQbhIWqJeFxvf6pIMha71pzFSCcC
oBeasTbSHgOOGe7Xfow8aFZ05jst+cHyqntPgFkcwpKklHZKE/DO/td7V20i
PNvZ9vtfzkF374MCDUYVjlnQ3q87U1HcK6lf/74IoYLub4/U9eCBjs8Ozdwo
LNgpDmlLNsNpB2OOVSMfe3lkH5x298W8Wm7XQwod6ctvxYM3/Gw9ZYZpxwi4
HjTIGmCE477G3VDTORISLR8RrbeFQS16rqx5iIiP4lHifAW1cDq2rMa2LxZ/
DgnttU2NQ26XpIXfiB8EtiqLJroQ0Z3j9l9fKhXirO9/DLblojnrw1X2eDoc
7lfWf9idBbXOR8IuXF2Qzp+ma2dEwYwyVnN7OR53kx7PXjyRATmo7jnE4rcx
1/Ruw+I8PD1o2Jyb1YKuq5E5hlo0rCq0uyoLF8HjIZc9H3LRd6Y+x1o2ENyv
9m0jNyTA1y2jLsM2HVF5Ex/0kgNxJHZI4+xOCvaFEh5n//aFHXuVdU/ahp5H
f4Su38xGq1elfZBKPogDt9fGTbLA3q+vIXkyEW99x6szD3dDZ07S7MKGXs7h
2NNRX+Ph6iwdVcZKQo1C2GELKQLo7MwDqG0D3YdFNNCnAKbKatLhexJRSStU
EplPRQf3kVXXlxUwFeJwr2SnwEZSsrE6JQb8ovUcf+/NwKWjzv6794QgfcHo
5UJ7JrRnpVk/6kRiLc3t1P4UEopdDib/YM1GcnnyiVOlOTD8vjLUSE0HIVl6
dS8/Bbv5qRqnCtrQmaB/WziwEoI3ieumYanYqlZmXXiyGDtOCJs87idiMKB1
8QNXC74UiWJurRKsUwEd3SpBsDNPrf/On4kDmz9a+JgkoXQ65ExNLxEyWtca
iPRYmKr9vLAuUILI0h8R34rCobdtgmZJogAlK4ZxPQQUdIoPKx0iQm3Oo+v6
v9lQtdz9XfdMMZJaxloF5jf2c95T0rM6CRq7mDaJbupEr+7sziC7GOROTzip
LCXgcptIGY8EFaGXFsuNYgg4+tsro7SmE2pKvPwCE7W4Zv1T6m1HKrIoZ8an
ikPBx1N95EV0DphvedNUZUlQm48dKNyZjlAiI3ZLQjIsZ3s89fL8UPTtT1LY
0ziYWZTWaZsSUOXIKdJ8h4jM6+yM+u2lyPvGvv20AR0eLfZaC+MZeMxe1SS2
MxnVNae9uANfICWsM9exKxo3GGziySwUsOp6LncYb8xDOPJ0dLUvrkbmOqQ7
tECg82Fd99dujJgJmHfqxeG0q4JX8WM65Nt8M7lek3BPJ78r/2M2tj8rz+mf
ToS5KrVAlZiAT9Y0RcPlQAyWDPvMHktCbArpYO/LELxZ+SfAb0sQbrzb6Wg/
koOS4LPrWfo5qOsruz0xnIIvWVuy97WQ8Uprh03I8RqESm5VnheKwfUAzq91
YgkYP85+hUOFBKqEy+CoZyR0+0IFmU2L8WJFUtSXvxm3eKq9xWJjMDfYPe67
QsPfpKXjrWbVUOhR/BVZ5w+O15O61/oLscLpfjyDvwTtXjmj1/o37uqNsXHS
njIsbhL5j5xIhlzjL+l+n2x8T/op9eVAARQaOCxq62jgKGDOaFGkIUBl5rD2
9jhk+Wg/2VxRA4sQ6QdhvxNgEHWom/mvRCzc+OfNuX35ENU8K8ZqTABDlqfp
tEU7hLuuR5Y118C72vX6YA0VvOfzlaQdS5D24BF9gC8fR3NTQk8t5CKINWXm
T1Qg6p7bJokWV0I0KchSrDsIatq8Kq1M2cg7N+XdfiEC6defpvxoCsVMso/Y
LQEqmFrC9Vf30fCP/28+i4epMFKv+4JRMqJ364049VbjyVkzAzvpGPAaiNXL
Mcow9mxu2IKNDi1HKxrRjg7JJbMb4j9KYfVqaCpdrBxpM2WO4zoZOJognp5B
jkGRuqG73ioZDT4Xi1J/xMHPlvR2s2gKlpWfaUeTyWDpv/184FsJmJmDX2pm
JkKQta+7VTUYJ7PfQVA+CM56leYGo1mQKazaYhxfis9UlUYuLSr0/WXOnfBO
BI+3qi5XTjvoTvH3BbZnQ0Vis62tVwFqpKyPbTFMhltBseCV+4nQXisQk6kq
RZ36WKF7UQOucU5udg+Ow5ubluXztChEGGtdrC1JgJhPOId2cARGpWqUroZE
os2gKmXVthUp5JrnTv0+MIaOyJYFCi7EMymEsPrh7f29VdzvQzB3IJHL/CwV
C3pWaS8Hc3Dg9OV2qvdGDr8rFK/SKJCJ1vq1ZNMBV9dLoyWvU+AfQNosP5KM
C9+lNMKnSDA97Ol/wIGAuOqiC/0chVjIdil3zm3EayrzC6fGaMxQZP7ilYkA
xdL++56qROQtuxRvraUh86hxg8lnMtz807PJ5WkImaRP7xr2Rd2NNYW9Q2T8
2L9b3+xsKez4ntgFzZZhNJObxjddjInIPCe/j0Vg+2vKRpSnHK4/J6RtTSjI
IPS8MNV7AZlEozZFNwrUPllNvr+Tgl1ygmeDJmMxvKbzpjydAN0sCUVbZTpI
w8OvD600IeEf3g+nRCLxSXHvLS6TCNDTt1n8oGXik0aZXOYkGbW06+qNnLEY
IhEUo9ip//OTMtHVO0J4iSA7cw4QfSErGyzkXpcNI9Ia2fpMLq4IDEJgtgJM
Q9L+cT5ZkNbcVFPpHQ8Jyd2h688b8Eir8+f5N7EYbRE5LfwkA9N/S10+qECC
wGq/pG2HL8oG1y7LaBbAI87XePvwCyzlBg9JyAfDZbzAvk0zAoJiv3tEl2Mx
4KO501juMfoPHuqJcYmGuKKmvVlnOupqPJy70oKgvM4+7B3WhtsOMp37aNlg
8bISJ+4h4ua7WT9jJSre8Rz86X03B42fp+csBDLwIPHd9oeDcXB39pja5PME
71mlRNVMSpBOi/4WpknB6sK6a3kkGcK/3L7VKBNgc8tts6ciHYyE1KtW5wrB
fs3zUcJQCEyDeKWZFmOhEPaH6V5eLI4anJ9je0tEkIMloWMsEH8qjScdOuJw
rl+FRgj3xbO+A7N9zxIQ0h3hp3jIDyyNVreJlkTMWxpNj93NBENn+9e78h1Q
uzHnaiNVCsNAiYLrgdQN/uI68aCrFxcXJ4O3+UQjY66z2OceBc02XzU5zyej
snNiu1yTLww0bVJUpfJhWWGglJtcAKGU6cifZyIg8E1lxxZyOIR7N+026iGB
NfFMVPq6P8QrHJtsGIFYPPJQ4yRxI99PLEjaSz5wXBkqFpejQN4h75L0qQC0
MqzWghSJOKirJbFc9xRXxPPlpxRy8FJTzUOEswoJjqVj/QJF6BmukbzI048X
b33tgjZ46XblX05eFUkYsHhqUmZCRrD1nRscG3w2lmeubCdHh6Be+h7lcAa8
mv54kpnDwV3gExteEY6U8puuKr0k7Nf5LSukRITcn21i5/MCIfrA4QWjOQ6N
3XbUaA5fOA/nKbjZJOKXnU3n/nAClo7c7zIyIKLlpfrnvtUSjNyVr2F6/QxN
zKUfJp6n4GyXBf9UQhoyeBZ1T30ZxCj/o9Hv1CiIqx8a8t+aiTssV7w9s2k4
EyvNxcMdinfmsi7xIXRkmcXemOBhIHmJry9VJQzq3yYFCEWREFKzu+TxlgSK
iy/5w7A/eJ/zHnCjB+Kk+tGvNizxGLlVfJxLwxfJMoxaQ5E4HHXN6GPjJMD6
PTV1hyYRZ5SGRx0PFmLrDp+cRYdmfKQyUsPi8xABy17bQjK4Ix8vZt3uQ6hG
D4dlQhREv+zournBx1a5Hkai/Nk44Bh6jC4Rika9k0+FGypwzU01c5d9EcT/
W3zSJBeHuXDe9OoJEoJv758/vCMWRqFPjWpVArAz1+ypx+tAzOhrXYswTUVz
/s7+Kht/CM8ULt9NocDD+SSvaz0BH2jbnpg/JIL4e9fftizV4FDwz6sbbMcI
f+VmDblG7FugpbnvL4HlJ9U9JSIVqExWetXBHoMItp926mwU+P070RhWEgMh
Znku+Qlf3LUwos4wFaFrVyvXfblB1N3/c+lESyh+NhgL9GuHo7K/0lDtbiwy
1qNW0wLDMenApu8eEoTT8gpZtZ8LcKvtkrdiWjQMPbPtbFPisap0SKZejoDK
bvuZ5YhUDN07zHn1Xyr4uLjmjxlu/B+KQmnm8an/83PbDMeJlW+NyN31y/dZ
TBT+DyHSk2Y=
"], {0.035515138098443796`, 0.03106322209779578,
0.013511116204110794`, 0.08695741111770378, 0.09350738443399145,
0.021337137381933113`, 0.02407754209768402, 0.030039281163864538`,
0.015371173267122206`, 0.015628951095450122`, 0.034938781657474036`,
0.012138245274081614`, 0.029408491689604657`, 0.012172849580469023`,
0.014954329031397047`, 0.06394031740815628, 0.1052788606845205,
0.06695158850966161, 0.03968720868019803, 0.22844083969920048`,
0.02508013082713701}}]]], "Output",
CellChangeTimes->{{3.546030620572571*^9, 3.546030640131021*^9},
3.546669162432852*^9, 3.546669581312173*^9, 3.5466711053934*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"1", "-",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.5", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "/",
RowBox[{"escoreOnodera", "[", "0.5", "]"}]}]}]], "Input",
CellChangeTimes->{{3.5466697782136393`*^9, 3.5466698077990723`*^9}, {
3.5466701788431177`*^9, 3.5466701790580053`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.00014469440844266934`"}], ",",
RowBox[{"-", "0.00010373785562700633`"}], ",",
RowBox[{"-", "0.00008262058555108531`"}], ",", "0.000029770955568331203`",
",", "0.00002797097645756974`", ",", "0.00013414330210359537`", ",",
"0.00010207235531467518`", ",", "0.000023929298783809116`", ",",
RowBox[{"-", "0.00007633488108038655`"}], ",", "0.00006710841649903987`",
",", "0.000034869562849593194`", ",", "0.00014454084994952598`", ",",
"0.00005128563057954505`", ",",
RowBox[{"-", "0.00023414794322285104`"}], ",",
RowBox[{"-", "0.00028956731752827203`"}], ",",
RowBox[{"-", "4.96415633866043`*^-6"}], ",", "0.000010821765572877062`",
",",
RowBox[{"-", "0.00002372680599882493`"}], ",", "0.00007032803733864057`",
",", "0.000040097617857393075`", ",",
RowBox[{"-", "5.216393022644539`*^-6"}]}], "}"}]], "Output",
CellChangeTimes->{{3.546669779517268*^9, 3.546669808112933*^9},
3.546670180524582*^9, 3.546671105514636*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.5", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "-",
RowBox[{"escoreOnodera", "[", "0.5", "]"}]}]], "Input",
CellChangeTimes->{{3.5466697782136393`*^9, 3.54666982846222*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"5.138098443796535`*^-6", ",", "3.222097795779061`*^-6", ",",
"1.1162041107948967`*^-6", ",",
RowBox[{"-", "2.5888822962200075`*^-6"}], ",",
RowBox[{"-", "2.6155660085430688`*^-6"}], ",",
RowBox[{"-", "2.8626180668886447`*^-6"}], ",",
RowBox[{"-", "2.4579023159797264`*^-6"}], ",",
RowBox[{"-", "7.188361354631967`*^-7"}], ",", "1.173267122206445`*^-6",
",",
RowBox[{"-", "1.0489045498794647`*^-6"}], ",",
RowBox[{"-", "1.2183425259632008`*^-6"}], ",",
RowBox[{"-", "1.7547259183858105`*^-6"}], ",",
RowBox[{"-", "1.5083103953421328`*^-6"}], ",", "2.8495804690227555`*^-6",
",", "4.329031397047253`*^-6", ",", "3.174081562862252`*^-7", ",",
RowBox[{"-", "1.1393154795008575`*^-6"}], ",", "1.5885096616152783`*^-6",
",",
RowBox[{"-", "2.7913198019716146`*^-6"}], ",",
RowBox[{"-", "9.160300799504473`*^-6"}], ",", "1.3082713700915405`*^-7"}],
"}"}]], "Output",
CellChangeTimes->{3.546669829315069*^9, 3.5466711055666857`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.5", ",", "50"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.5", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.546670374118462*^9,
3.546670379556342*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "21", ",", "12", ",", "20", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545977481802333*^9,
3.54603031061419*^9, 3.54603038083032*^9, 3.5460306547474337`*^9,
3.546669166380673*^9, 3.546670380501446*^9, 3.546671105621249*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.6", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"escoreOnodera", "[", "0.6", "]"}], "=",
RowBox[{"{",
RowBox[{
"0.03425", ",", "\n", "0.03062", ",", "\n", "0.01290", ",", "\n",
"0.08370", ",", "\n", "0.08780", ",", "\n", "0.02086", ",", "\n",
"0.02322", ",", "\n", "0.02788", ",", "\n", "0.01407", ",", "\n",
"0.01420", ",", "\n", "0.03326", ",", "\n", "0.01125", ",", "\n",
"0.02633", ",", "\n", "0.01101", ",", "\n", "0.01319", ",", "\n",
"0.06478", ",", "\n", "0.11298", ",", "\n", "0.07120", ",", "\n",
"0.04065", ",", "\n", "0.24264", ",", "\n", "0.02322"}], "\n",
"}"}]}]], "Input",
CellChangeTimes->{{3.546669982378049*^9, 3.546670023561883*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.03425`", ",", "0.03062`", ",", "0.0129`", ",", "0.0837`", ",", "0.0878`",
",", "0.02086`", ",", "0.02322`", ",", "0.02788`", ",", "0.01407`", ",",
"0.0142`", ",", "0.03326`", ",", "0.01125`", ",", "0.02633`", ",",
"0.01101`", ",", "0.01319`", ",", "0.06478`", ",", "0.11298`", ",",
"0.0712`", ",", "0.04065`", ",", "0.24264`", ",", "0.02322`"}],
"}"}]], "Output",
CellChangeTimes->{{3.546670025568179*^9, 3.546670029410046*^9},
3.546671105682228*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977481846377*^9, 3.54603031063577*^9,
3.546030380910542*^9, 3.5466691704077053`*^9, 3.546671105732072*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.6", ",", "50"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.6", ",", "issues21", ",", "50"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.546030663765106*^9,
3.54603067183214*^9}, {3.54667007239073*^9, 3.5466700769424686`*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.017031779040069226`"},
{"0.05920277542698517`"},
{"0.060057977565661974`"},
{"0.042978927209019316`"},
{"0.04510997279511103`"},
{"0.012875837661510816`"},
{"0.012385845530790593`"},
{"0.014771020715838462`"},
{"0.008282214621459725`"},
{"0.009790758346564957`"},
{"0.06819337096443535`"},
{"0.01569989566167085`"},
{"0.018329414366499534`"},
{"0.008815319953890725`"},
{"0.010321802806223662`"},
{"0.02858821222725413`"},
{"0.03715122057687089`"},
{"0.03467302231609704`"},
{"0.033555547052680726`"},
{"0.4497833231392394`"},
{"0.012401762022126438`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.07971677218521633`"},
{"0.01366657827525087`"},
{"0.018900367479208258`"},
{"0.07320892398777523`"},
{"0.04430163792031272`"},
{"0.03946444375112514`"},
{"0.02436089035385284`"},
{"0.015103115089227922`"},
{"0.008004878299887079`"},
{"0.01663458954022643`"},
{"0.04979019487903903`"},
{"0.008005592553642318`"},
{"0.016869266550721698`"},
{"0.006827466389149548`"},
{"0.008727146318314009`"},
{"0.036400264306937304`"},
{"0.0944110135150997`"},
{"0.031996292881752285`"},
{"0.0642014376018539`"},
{"0.3370281389398998`"},
{"0.012380989181507608`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.1804220411708855`"},
{"0.05234678975143212`"},
{"0.006435081157276242`"},
{"0.043027062683208286`"},
{"0.045108262376095505`"},
{"0.012708249531304412`"},
{"0.011588770192561654`"},
{"0.014854389377612586`"},
{"0.011977868134285715`"},
{"0.009186798860566758`"},
{"0.12165592580472669`"},
{"0.019306980218994296`"},
{"0.017180014549206465`"},
{"0.007833314013079374`"},
{"0.008835045204594258`"},
{"0.030012917475427173`"},
{"0.039189608388001375`"},
{"0.05108552180407132`"},
{"0.036681775094575986`"},
{"0.26819859320486394`"},
{"0.01236499100723038`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01958351730931313`"},
{"0.03122822023959757`"},
{"0.0073503191874654365`"},
{"0.0385760980307323`"},
{"0.18138532729945012`"},
{"0.04763402034475271`"},
{"0.06537600330928889`"},
{"0.047139643898303045`"},
{"0.008553796960317208`"},
{"0.024790561760107344`"},
{"0.028763305817953912`"},
{"0.009550189102910056`"},
{"0.017687669806249976`"},
{"0.006714388730015462`"},
{"0.008936274200217158`"},
{"0.034165125043562235`"},
{"0.04255576224428878`"},
{"0.034091961983637516`"},
{"0.021536337874866477`"},
{"0.3081292047700678`"},
{"0.01625227208690293`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01950638715373094`"},
{"0.014309447998728825`"},
{"0.00683577393012894`"},
{"0.21256922901176914`"},
{"0.0429658204351649`"},
{"0.024887437139312147`"},
{"0.029879618759392493`"},
{"0.09480044387383277`"},
{"0.021989225981807945`"},
{"0.016427876338224554`"},
{"0.029728353505610115`"},
{"0.011600547015714769`"},
{"0.03354278534946644`"},
{"0.01450832802958755`"},
{"0.017490618238172738`"},
{"0.03335543741376918`"},
{"0.034295517632922295`"},
{"0.02583826624947859`"},
{"0.01780539832812556`"},
{"0.19826689740353085`"},
{"0.09939659021152931`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.026106368394705256`"},
{"0.06944254093569427`"},
{"0.010169036816552788`"},
{"0.17820449763579468`"},
{"0.08631022398960345`"},
{"0.009071080654840826`"},
{"0.03484053026275872`"},
{"0.023520549877978872`"},
{"0.00952271502942315`"},
{"0.018834819057952236`"},
{"0.07208771481406201`"},
{"0.013696702668053248`"},
{"0.018301402118839186`"},
{"0.007217791287742376`"},
{"0.008671651699657263`"},
{"0.035263782931624924`"},
{"0.05984114822514855`"},
{"0.033169024127764804`"},
{"0.0232361414022849`"},
{"0.24824864611202188`"},
{"0.014243631957496618`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.020745373560789322`"},
{"0.03569366049586729`"},
{"0.007076006099938594`"},
{"0.2687624061145552`"},
{"0.10931097736752218`"},
{"0.030381834998364027`"},
{"0.010426204798258225`"},
{"0.04320004318866861`"},
{"0.017445996237871415`"},
{"0.03217475166146124`"},
{"0.024297299777878097`"},
{"0.007822127851205852`"},
{"0.017327151446568687`"},
{"0.006935537323973499`"},
{"0.008814830249129832`"},
{"0.0708788169080235`"},
{"0.04505299192398882`"},
{"0.02837951001316451`"},
{"0.023619082355245347`"},
{"0.1781171758235245`"},
{"0.013538221804001264`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017309333344172204`"},
{"0.014644052128830918`"},
{"0.00657989209854736`"},
{"0.18156483495752232`"},
{"0.3331428115856074`"},
{"0.02040253680930583`"},
{"0.05733288219166128`"},
{"0.01468830860699781`"},
{"0.04505874759899523`"},
{"0.026174235199890036`"},
{"0.020700262467150343`"},
{"0.00976768355569237`"},
{"0.022574927253363276`"},
{"0.01188525391464367`"},
{"0.009166721731183962`"},
{"0.03765368879924168`"},
{"0.03332826859540726`"},
{"0.022602548389977332`"},
{"0.016262800052543058`"},
{"0.08527171824749477`"},
{"0.013888492471771947`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.019768128109464024`"},
{"0.014517065148170874`"},
{"0.014644128365460637`"},
{"0.05732378692509937`"},
{"0.16684108236046996`"},
{"0.016059864088835647`"},
{"0.04866113638953149`"},
{"0.10679973471324702`"},
{"0.007709592329485981`"},
{"0.06573824701252173`"},
{"0.07206260277712631`"},
{"0.009104075324452596`"},
{"0.08141749877851898`"},
{"0.02091312045661682`"},
{"0.043727576210338466`"},
{"0.05001762572436577`"},
{"0.03673486581594235`"},
{"0.040810739330116017`"},
{"0.016560946437986244`"},
{"0.0874959010221979`"},
{"0.023092282680051833`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.020900143884622663`"},
{"0.0520654391248672`"},
{"0.006933459450132819`"},
{"0.21846692945229704`"},
{"0.09930629982761803`"},
{"0.039353495020792884`"},
{"0.0764731947515847`"},
{"0.05144964078008538`"},
{"0.05227885109065994`"},
{"0.00842282731573879`"},
{"0.09831079824624915`"},
{"0.010847613928218194`"},
{"0.03875054194315399`"},
{"0.01395425030948524`"},
{"0.011364962740737786`"},
{"0.028781968084049828`"},
{"0.03531815605186543`"},
{"0.02330043551523977`"},
{"0.01639151484318809`"},
{"0.08338390640943674`"},
{"0.013945571229976344`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.08369936784166267`"},
{"0.0542082403312429`"},
{"0.05869523386282011`"},
{"0.06946577380809205`"},
{"0.07290108656330477`"},
{"0.03359525903262106`"},
{"0.015389134974201569`"},
{"0.017252765838379907`"},
{"0.0218514535666222`"},
{"0.028747603236951583`"},
{"0.01607837992491382`"},
{"0.08089614613524931`"},
{"0.021885157716469678`"},
{"0.01096961621850379`"},
{"0.009266488569775749`"},
{"0.03297412571582071`"},
{"0.07059030414764797`"},
{"0.03155744473058688`"},
{"0.02179765759849854`"},
{"0.20741387700111613`"},
{"0.04076488318551862`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.055913467616258816`"},
{"0.025164449039924076`"},
{"0.02661652903729846`"},
{"0.06844093787520555`"},
{"0.12702432811892717`"},
{"0.020698557048101335`"},
{"0.013333073896573351`"},
{"0.02159443710172101`"},
{"0.013449270166923493`"},
{"0.013681112818423477`"},
{"0.21139406220597287`"},
{"0.006219815494549972`"},
{"0.018743778318308642`"},
{"0.0073435679272896405`"},
{"0.010820528876042419`"},
{"0.02927602848396083`"},
{"0.03466631972654817`"},
{"0.025672915562231568`"},
{"0.01846857807136291`"},
{"0.22389003376756397`"},
{"0.027588208846812293`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024150966640283017`"},
{"0.015334135731156802`"},
{"0.006990933642578219`"},
{"0.04881661112533412`"},
{"0.1440240780514129`"},
{"0.015099942226193043`"},
{"0.01187997283674032`"},
{"0.02279092752736125`"},
{"0.04941990766887668`"},
{"0.02026676104101939`"},
{"0.0279436925919368`"},
{"0.0067756679798519496`"},
{"0.016299786464948153`"},
{"0.0825638762198629`"},
{"0.08914884288167373`"},
{"0.06572146374245116`"},
{"0.05579410937216975`"},
{"0.08286531544937957`"},
{"0.018099675545146642`"},
{"0.17585686573080375`"},
{"0.02015646753081988`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024781105185621786`"},
{"0.016496766954496152`"},
{"0.0071089356047155956`"},
{"0.042147526602160874`"},
{"0.16587687164810289`"},
{"0.013114207339476946`"},
{"0.011976070027368738`"},
{"0.03402793124850724`"},
{"0.020647597720321563`"},
{"0.018126331358865475`"},
{"0.034272450005776355`"},
{"0.006219815494549972`"},
{"0.24035639023853306`"},
{"0.006454843616976735`"},
{"0.044282648549398305`"},
{"0.040985999333923225`"},
{"0.08627816808646555`"},
{"0.034464414191565956`"},
{"0.01945607863904255`"},
{"0.11587709216894818`"},
{"0.017048755985182896`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.030688074717663712`"},
{"0.01448094453125421`"},
{"0.006623011831738551`"},
{"0.0445898796135262`"},
{"0.19293449865608783`"},
{"0.009634872678227754`"},
{"0.011929650193956701`"},
{"0.01606646688638808`"},
{"0.06922556643681527`"},
{"0.015063044480073725`"},
{"0.029233527137275478`"},
{"0.0107301516816454`"},
{"0.22195858788486877`"},
{"0.04516856255621248`"},
{"0.008635748279856527`"},
{"0.029056031792629413`"},
{"0.033674844206887516`"},
{"0.026478992749008074`"},
{"0.01753235012597999`"},
{"0.09119457343638551`"},
{"0.07510062012351877`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01756540883439941`"},
{"0.017257462099597727`"},
{"0.006868655365169516`"},
{"0.0421299242304729`"},
{"0.04721262421504261`"},
{"0.010620089363382608`"},
{"0.01817865986588839`"},
{"0.01569257023382753`"},
{"0.009514298647810976`"},
{"0.008619232726151983`"},
{"0.017501392709794308`"},
{"0.006586685978151974`"},
{"0.020857874291518468`"},
{"0.007418341856739567`"},
{"0.00879139030320283`"},
{"0.02723936860616042`"},
{"0.2383065311532986`"},
{"0.07387984764341377`"},
{"0.03533151258033068`"},
{"0.3572625578888974`"},
{"0.013165571406748337`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017794071989509865`"},
{"0.02517381962465682`"},
{"0.006604190514660684`"},
{"0.03967400801252052`"},
{"0.04322338699487351`"},
{"0.012632783889599304`"},
{"0.011531919827310345`"},
{"0.0147169271136321`"},
{"0.007863091592342629`"},
{"0.008487869376271268`"},
{"0.02187232667714693`"},
{"0.00625623904844816`"},
{"0.017842584140778522`"},
{"0.008661070310238378`"},
{"0.008692985293125108`"},
{"0.1257780903128641`"},
{"0.033111052183500585`"},
{"0.09685450713450823`"},
{"0.06245373221602862`"},
{"0.41840974702340006`"},
{"0.012365596724584314`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02278365566078712`"},
{"0.01700109444830942`"},
{"0.010179041850602297`"},
{"0.04207439201189785`"},
{"0.04542576311293206`"},
{"0.011888058954281251`"},
{"0.011608680572790776`"},
{"0.014721064168619211`"},
{"0.009157388153151874`"},
{"0.00847851177049517`"},
{"0.01747049129382333`"},
{"0.006298428842441333`"},
{"0.021616014116101423`"},
{"0.0070542703946483605`"},
{"0.008740566077045007`"},
{"0.07071582554624503`"},
{"0.14095218770963677`"},
{"0.022469805027145472`"},
{"0.027779140666024688`"},
{"0.47121453809596847`"},
{"0.012371081527053105`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.03136919739573551`"},
{"0.04623509218003842`"},
{"0.012055914771174295`"},
{"0.04290913957675614`"},
{"0.0443243148126479`"},
{"0.011414357201874696`"},
{"0.012764431180320038`"},
{"0.014708509266886034`"},
{"0.007790394969038873`"},
{"0.00848342929540346`"},
{"0.018956973958985598`"},
{"0.006411721763488091`"},
{"0.0166027963632715`"},
{"0.0067679538452441925`"},
{"0.008721601084381475`"},
{"0.054737516879003995`"},
{"0.1749348350937423`"},
{"0.04640253682971769`"},
{"0.01615419184658972`"},
{"0.40590816633767646`"},
{"0.012346925348023592`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.050667367557981235`"},
{"0.040244282669680345`"},
{"0.012103042558838043`"},
{"0.08264896408657282`"},
{"0.04980987029373654`"},
{"0.020287905892697612`"},
{"0.016941382970922625`"},
{"0.014958984891695127`"},
{"0.007993802428418163`"},
{"0.008563578983781394`"},
{"0.026350544929176968`"},
{"0.008258007918320764`"},
{"0.01834745255868335`"},
{"0.0071694290085776505`"},
{"0.00884822916334392`"},
{"0.09905249369920538`"},
{"0.22582986012514278`"},
{"0.14983382402862064`"},
{"0.07225997213864943`"},
{"0.06601186305843604`"},
{"0.013819141037519177`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01731683060086625`"},
{"0.013901326619436657`"},
{"0.006686597240332442`"},
{"0.05105129575031982`"},
{"0.469419723126387`"},
{"0.011150280274772079`"},
{"0.011348430436130957`"},
{"0.015426089117295996`"},
{"0.012857288162702873`"},
{"0.00957980129779731`"},
{"0.05732701754613061`"},
{"0.016364297511150032`"},
{"0.019519192328067512`"},
{"0.006840501610996242`"},
{"0.030316434639300956`"},
{"0.03057614864137267`"},
{"0.033379336005427196`"},
{"0.023442333881629446`"},
{"0.01615419184658972`"},
{"0.13501110851018688`"},
{"0.012331774853107425`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03425434733900781`", "0.030622524610880206`", "0.012897654895755492`",
"0.0836985256741471`", "0.08780253699769608`", "0.020860029975573804`",
"0.02321706289825326`", "0.02788227286567094`", "0.014072209765921467`",
"0.014202823378433394`", "0.03325751230456789`", "0.01124668114016019`",
"0.026328766711565744`", "0.011006393702725284`",
"0.013193980481730583`", "0.06478154472955346`", "0.1129782458438967`",
"0.07119670573371731`", "0.04064833091606902`", "0.24263201601837703`",
"0.023219834016298055`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9lmk8FI7zxxEqUiJFhFaEEsoV6iNHropIKREiSs6U3LvrvnfdN+smxIYc
KfcRkjulkCLpK11KKX8P/q/fg3k8M++Zz8xnr7WzkS0TAwMDz/8HH9f0hU4X
KugSCcQhg3KkGzAbLzwph7VBjK8JYwHs25oDCnkLEe1/tizfIhxBoXPsTeZh
+Ot5dExTLRpQI27UXCZC3VThghRHIKi5vB8Fb1dCmHxPIoebgnKJzVJf22Kx
+vW4YhsHGYZOHxaSRYKQ1KHppnwyA2blbbt9WHLxxaKPWtxEg3qGlZHsIRpq
h5/+RfcE+OatjHivhcHlhhfprH0V2mw+8Rz9G4GlgEGZzEtxUAo5vTjQSMdU
P8epqvICzIiG/iuXy4OemE/Ztq/J0F9m7LFajEa/Okf8hA0Rymwq9kWbqODy
NKnm8ytGV0OWq6otEd91Yg2lTlLh+7GSQ/Cn93r/h5vCJknokw2R3ZqbA8Ff
jj/PHqgFvyOb84BVNu4cfGVNcq4A06b8u2+oI5jz3XBMziwMTKr7O7fzduK/
Gc7ew30lkK6d/nLPzAu/PQgFeRsLoBtnIeS0zvNjF5NVF2s4fFsH7V42hEAs
nmbz2yEa7Aun8DIkFNwTulohz8loFKM/Htv3BJy7iWT59jj4vAxVz02iQkqB
PX2ejQhe1geV/LxkDLzc2lvVkIkRmcYtxZx5sJB4XzK9vwTJs53C3ztz4OZV
7CQpOQAR88W150ZhoFqEpTzgiMf4E4q13u8sRDbY6Vjw++HhptmtaMpF7fhl
+xzFTlhE7vH3uVqECR7xc96PKvD5WcfKfUIRGjamyxYGkiB1cbML3ToFinfV
OoXdM9A0uVS+JSYAXz67OD4UiF3nL8wQSfSG7naSw6HTZBTn3DLf5UdD76KM
05vufExfj3IgutPgGmBzIIsjEV8DzKKv1g7hr6FtoHMeBUPVUd7eK3Ew1HRM
0ToThXxbyq7hNW/Mf7D47CHfg7Be5QcZa/mQn7TM2eWTgr2vo7RakzOxmMoT
PKZZixXJoZULgYk4KHVH8O4gBayKOpsEXDPhVWfNubElBEc8pAWCDtJQ/UNt
KLwmColu2kHb5qkYX73XvMxNg81fjYxDMTRM+PHTTW+nwnqYfWu8Siychffo
9Ft2Y2RCj3OrWx0m/5upy25IhRG/Fnm1oxJrhXeZSUOBaNAsLbXr7wAhyFTL
kbcGTosbRl/FkTFC5ZfLHKWhahebdTtPMlq7lg/mEwOwe3eQgbNuHAInqBIX
3OmIqJUyZOaIhCuX7pnUxljE13vz2lF8kXQl86prCwlkq3E53q05kNss2eif
W47YhUetIX+ykT5K41DsSULWB4n49I5+7FW9u9B6IAqE+K+3Th5PQIYME8nl
ZA76w6mf6v/4II5BUtXuyAAuic1M9f1pwCa/MacbAlkQ4GILMrkUhOKGy/OG
ggU4XCX29/JrKmYkdAPlPbPXdV8tbTOdjJB+N+UtLETUfTt0S/4xFUom3UIu
9j7IPyvoS17XfZtlitIeUTrUtvRFSW8vxLFjoWWB2zLA8JO/O0U6GTL6ZMmI
3g6ka++/8l9dBK5PBtDD6qgIUu+xe/A3CstDf00Cv3nhYoCQcuCxThjvklRW
MBpB3qjddrt38dDVXdN/dKkMvBzP7Od2RIPlWGn50noeoco6GYe+VLgkqvPd
OpyA8MvO+jsYA1G/g6Nuek8SvNu+dOhfCEWMjCWFoYOM8vFFEVPtXPglnBKy
46TBKoViKiSahFtvPDYfLqRAIUZ0s8VwNdi+FM5RXSOR+nYxk/d4PLpaLxOF
GqIg+EQjt3G93rkUNYGIi2VY3iTtssWsHerV4qprrhS8lmx5KvCxCG5pzxWV
LzSAuFC/uCveHx+mNrQrDVfgrZrsy0o3Oga5VM6I55Ph5xC33DFWBfeg0mbc
SMC8e8Cf21cLcM7SgWU+rRjvRlOj55+t36fD/lKi7/NwTdLi9KUfFDDn36Tt
vVaDWcfUV8T8JPCefz3/4loCRAUSVY2KSpAuZn1R/ZoPFoqyneqWeyA/xX5c
5GYdZFZkD+4Ty0NbhNeZJ3EPcFqOxzPtQglqZ6/v128rQbbKzONVkPCnwsD/
vWQdVNJ8eU8qBkPkGP2mwFgupOyb29njI0G4beIVcDIEO1rDD7F4ZuCkpm2J
Ek8OWBl5WrZPJGH5acPS5y4K6mPY+vNNq7Hzwcu3fjGRoNnHXTFyrIbX96c1
h5rvIcXuscppjnLYu9P1yF2VqH9FO5lfTMcSa+WI7REalG1uNpwPjEGElWRg
dQkVEyrNR5UtE0GaWv7H5JKB7l+9/eN3KBBeYRFMr66C6XQuF+f1RJCnNX6q
egQjYOUFm8FvMpoThLetTmfjfEJ9pxwXHQFmwoRT4tn4ZLiNTdgoEcw3lKvD
Ip/i83MFImEyD0tVOfkV2aXwepeUWN2WAhOZf6zmJ9KwVD5taxpUiankUH0T
9SZs0rMuYFjfu0CV+rcWZyKQ5EXe91IgETOcUj56ERF4cZB1eow5EkmEyYUf
W3vgx3mI6ZunJ/wfB92jysYh6v55Rr0dfpAUl+7jkggG6XX8hrDfGUjdsVbS
9YQG7guLhxn0UqHSr63vOB+LkFMe9Y5FvRg4x2TGo5aOXzyRnzc2JEPWYfAV
0S4GBLvnt4NzfCA6Ti3y/VeEuKzQUCvnFpBiNJYefopGsZbvcvC5UGwMI54g
nU/CvV0Oi5TTxXAf8TDob4oH9Rw8tDLS4fpEILivyRtP52T3v6ugwHZNdnWO
UA12qUKb24M1KNFxkBUaqkCkgnABO7UU2gtD+sUK1TB2EympDY2FJy3CwIvc
Aa/dNrnvc+Mx+sloQNEyBfSHqnoh7yhgWpyzUBf0xYpoveHl+HwI8rlxuKu0
YzZm556sV+GwVxj48CE4FC1P6+b4b9LAGt47lLcvAQdXQkjVMbFgd3uVJB5J
+x9Ppbb6sLXWZ1DzaJ+xcfECPyVFULG0AIznPf7bs5qH79p6d4x31mBCuWjs
bD4NHXIvTfQ/xUGZpsQoVNIIjlNx+cq3qdgWJD5SeTMLeaY3PKWLoiBs6Hek
QdgbPvamPD7DBZBvWpvipnfBdNCp1q0hAG9dfSJinULh6mZ2of4WBZFF77Tb
aiuRaX057cp4NLrMGHttPmeAst8pvmIlCG3czIki13vh/PPXbRPhQtD+kgIy
75PQySen+7opA5qbCVrDx9b/lVGUkMGeNIiwFPIxfKdi0NJ7a4jpQ2itnTfu
OfoAs8eXaCWrVBzOP1u2dI+Kp5vjcs4QfCDkTirjiM2HaOCnbrWDRcjz/KWx
+iQIPg+dFRwzYtEk0hlTs50CioJ+pIpPAIb17EZ+FJCQ1K6X8HaBigc9Yxx5
v73w7FUX2swSoDmW97vS2g9O5GonJUYyPq6d4cl9l4YVxtdcw8RnqFK7I/F0
no6iFb7RXztzQP8R1XH19SgeaTPwRC2HY3fvxh9pSrEgWG9wkexMQVaZ07t/
W7wh4zvcJ2aYh6u39h6x3FuAh+ZnohQnw1BYIrpjS2YIRChyQR9EonHw6pRu
8G4izDdxRey0JuHAfs41um0ipnMfW+3LXp+7k2uUsVYsMhpfSL1/RELtBoNH
2X0k8Csf5fXna4KuYUjk4rdstM+lr7r31MKes5X8eeU+mlq+lh7tfInJKKVT
BOMw5Al2I+VcEpTPpxEe2VOR/GLwzZMXgVi4YmXcEZ6PotDFMnb1QrRdvKLR
ZhqKYXPtBr2OEBhtN+nmFovGTCL3CH8zGfIS0omHzEmgcDENdc1QceWxQaZV
rydc9HvEyIRE7NA6qbf0zgeRrskLsbMkEKY2ljvtpmND2omCWrYWbBj6vtOY
KQmmZfdjCW7pMLSjsViJv8Fh7RR3pvNhwNGRlKxt2aD7lZ8QLi0EeZuxb3tF
KNw2mD+T/pWPKgdu+bLKAhhc49113TIEIyXt31T3heNhmCzdTygat5+PHh38
4A+fSo60liskfLZrXHW/HgdNQ4q7lIYXXLam9xkxUHEneqCjptYbGv323rQJ
EuL5anWjWUvRZTTcrGHTAT1xrTaulkIcT6HfqQunIM9y9vi13+OQ9UzTNNUN
w6ZUrUauL8UoyRlhn03NA0Gnc9KrOxSLQ71B3uLViP/+aq6MWAzJVbWzlzri
wRCh+nPHRSpC9u/9+TwnGlWBjAxbrxAxbm65pyuMhHr3fkLun1QwlAdsi5sn
Yov5AL20Oxahe39+qTD3hVIilyKLEBmqPqw8JLM65BiMH/g31wuNZ8yKzVKt
YFAUlaD503Hqwx+d/bMVGN8YVCN/OhLPA+2GiQ1UHC9O9zx1NxIdjMROu6ve
kGQ2UbEVWffXCg0sK2xvwJn4S+fHSDAqNEojXxwLgXiaQE5NUgymPGwYP50L
R3mlvGRcZgCWLbkDfq77gmfxITf6minwZO0YHF2Nw/f2swe6mX3g5qvsq8We
hYfS/SmXDLJAGWAq5t1Fg46qu60mY/L/eF5aGtRg12le/4eUvmsnwvB/7y95
1Q==
"], {0.03425434733900781, 0.030622524610880206`,
0.012897654895755492`, 0.0836985256741471, 0.08780253699769608,
0.020860029975573804`, 0.02321706289825326, 0.02788227286567094,
0.014072209765921467`, 0.014202823378433394`, 0.03325751230456789,
0.01124668114016019, 0.026328766711565744`, 0.011006393702725284`,
0.013193980481730583`, 0.06478154472955346, 0.1129782458438967,
0.07119670573371731, 0.04064833091606902, 0.24263201601837703`,
0.023219834016298055`}}]]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGBQA+IO3xUerAGvHLOiuQNA9O03R3aA6DZmqTcguqHMX4MN
SDMcT7HiBIn/e+jMDaT/3ThcxQOkf2aUHwHRewTrY0yB9KHsIo4QIK1TIPs+
Ckj/WvHMORpIr5IscLoMpGt4A65cAdIBDyby3QHSLw4Uhf0D0hoRO/Z9Tn7l
KPeIbb1d5ivHFmfOdGcgLSGlPDkBSJcscbsXmf3KsW9HiVoUkObWOM+dCKTN
it6WpgLpPS9O16YDaaUnAe9A9B3tnh8gOsM04D+IFtZ8wpMBpO3/vZUE0b9F
nAOzgHREym2ZFpC89jJVED3zmpoXiO58t4BvT84rxwfX3tWD6PhqK4a9QBoA
FZWT2A==
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"1", "-",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.6", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "/",
RowBox[{"escoreOnodera", "[", "0.6", "]"}]}]}]], "Input",
CellChangeTimes->{{3.546670106225613*^9, 3.54667011977626*^9}, {
3.5466701639409437`*^9, 3.5466701641390667`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.0001269296060673053`"}], ",",
RowBox[{"-", "0.00008244973482041118`"}], ",", "0.00018179102670612401`",
",", "0.000017614406844779218`", ",",
RowBox[{"-", "0.000028895190160360684`"}], ",",
RowBox[{"-", "1.436988197767164`*^-6"}], ",", "0.0001264901699716825`",
",",
RowBox[{"-", "0.00008152315892906437`"}], ",",
RowBox[{"-", "0.00015705514722585967`"}], ",",
RowBox[{"-", "0.0001988294671404489`"}], ",", "0.00007479541287158664`",
",", "0.00029500976353868946`", ",", "0.000046839667081521874`", ",",
"0.00032754743639573647`", ",",
RowBox[{"-", "0.00030178026767124777`"}], ",",
RowBox[{"-", "0.000023845778843067933`"}], ",", "0.000015526253348441266`",
",", "0.00004626778486915839`", ",", "0.00004105987530078625`", ",",
"0.00003290463906602259`", ",", "7.148307577420354`*^-6"}],
"}"}]], "Output",
CellChangeTimes->{{3.546670114718402*^9, 3.546670120212647*^9},
3.54667016505064*^9, 3.546671105882545*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.6", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "-",
RowBox[{"escoreOnodera", "[", "0.6", "]"}]}]], "Input",
CellChangeTimes->{{3.546670106225613*^9, 3.546670132491914*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"4.347339007809703`*^-6", ",", "2.5246108802043365`*^-6", ",",
RowBox[{"-", "2.3451042445079423`*^-6"}], ",",
RowBox[{"-", "1.4743258529015257`*^-6"}], ",", "2.53699769607596`*^-6",
",", "2.997557380438054`*^-8", ",",
RowBox[{"-", "2.937101746740972`*^-6"}], ",", "2.272865670942259`*^-6",
",", "2.209765921468154`*^-6", ",", "2.8233784333930173`*^-6", ",",
RowBox[{"-", "2.4876954321101374`*^-6"}], ",",
RowBox[{"-", "3.3188598398091462`*^-6"}], ",",
RowBox[{"-", "1.2332884342554362`*^-6"}], ",",
RowBox[{"-", "3.6062972747167438`*^-6"}], ",", "3.9804817305831575`*^-6",
",", "1.5447295534515293`*^-6", ",",
RowBox[{"-", "1.754156103303539`*^-6"}], ",",
RowBox[{"-", "3.2942662826912494`*^-6"}], ",",
RowBox[{"-", "1.6690839309760341`*^-6"}], ",",
RowBox[{"-", "7.98398162296654`*^-6"}], ",",
RowBox[{"-", "1.659837019461763`*^-7"}]}], "}"}]], "Output",
CellChangeTimes->{3.546670133500551*^9, 3.546671105931905*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.6", ",", "50"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.6", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.546670388995852*^9, 3.54667039357952*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.54597748211395*^9, 3.546030310887601*^9, 3.546030381499298*^9,
3.5460306798034678`*^9, 3.546670394423853*^9, 3.546671105982011*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.7", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}, {
3.5459730205185947`*^9, 3.5459730208687*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"escoreOnodera", "[", "0.7", "]"}], "=",
RowBox[{"{",
RowBox[{
"0.03307", ",", "\n", "0.03028", ",", "\n", "0.01225", ",", "\n",
"0.07945", ",", "\n", "0.08035", ",", "\n", "0.02023", ",", "\n",
"0.02206", ",", "\n", "0.02519", ",", "\n", "0.01249", ",", "\n",
"0.01257", ",", "\n", "0.03125", ",", "\n", "0.01023", ",", "\n",
"0.02282", ",", "\n", "0.00965", ",", "\n", "0.01120", ",", "\n",
"0.06651", ",", "\n", "0.12247", ",", "\n", "0.07652", ",", "\n",
"0.04219", ",", "\n", "0.25833", ",", "\n", "0.02090"}], "\n",
"}"}]}]], "Input",
CellChangeTimes->{{3.546670236681065*^9, 3.546670266585691*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.03307`", ",", "0.03028`", ",", "0.01225`", ",", "0.07945`", ",",
"0.08035`", ",", "0.02023`", ",", "0.02206`", ",", "0.02519`", ",",
"0.01249`", ",", "0.01257`", ",", "0.03125`", ",", "0.01023`", ",",
"0.02282`", ",", "0.00965`", ",", "0.0112`", ",", "0.06651`", ",",
"0.12247`", ",", "0.07652`", ",", "0.04219`", ",", "0.25833`", ",",
"0.0209`"}], "}"}]], "Output",
CellChangeTimes->{3.5466702685774593`*^9, 3.546671106031712*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977482157877*^9, 3.546030310949024*^9,
3.546030381568923*^9, 3.5466711060829277`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.7", ",", "50"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.7", ",", "issues21", ",", "50"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.545973028695661*^9,
3.545973033706944*^9}, {3.546030717168154*^9, 3.546030725804112*^9}, {
3.546670289031418*^9, 3.546670295542734*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.01277383428005192`"},
{"0.06337549705012817`"},
{"0.06738635667774052`"},
{"0.03406870756438407`"},
{"0.034725876412977495`"},
{"0.01124219366557894`"},
{"0.010105901119981432`"},
{"0.011112728915562453`"},
{"0.0064502535877505205`"},
{"0.007913040022767954`"},
{"0.07285960782312716`"},
{"0.015724955149220166`"},
{"0.014592739067187728`"},
{"0.00759502177246554`"},
{"0.008443874823987388`"},
{"0.02200317734589631`"},
{"0.029546818929890792`"},
{"0.03108944060746927`"},
{"0.03241722495871513`"},
{"0.49724226738809757`"},
{"0.009330482837019417`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.08590632628272356`"},
{"0.010249933706438152`"},
{"0.019369144910211196`"},
{"0.06933703713959931`"},
{"0.033782819059046135`"},
{"0.042262234103462325`"},
{"0.024076786746887388`"},
{"0.01150017235118349`"},
{"0.006126694545915766`"},
{"0.015897509748706344`"},
{"0.051389235723498114`"},
{"0.006748268189853551`"},
{"0.012889233282113582`"},
{"0.005275859280267499`"},
{"0.0065834422547594584`"},
{"0.031117238105526683`"},
{"0.09634991069115773`"},
{"0.02796658960073372`"},
{"0.06817076393275048`"},
{"0.36569455248886806`"},
{"0.009306247856297448`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.20339580676600422`"},
{"0.05537684709531628`"},
{"0.004826310867957182`"},
{"0.03412486561760455`"},
{"0.03472388092412605`"},
{"0.011046674180338138`"},
{"0.00917597989204767`"},
{"0.01120999235429893`"},
{"0.010761849352714176`"},
{"0.007208420622436722`"},
{"0.13523258847013372`"},
{"0.01993322046609752`"},
{"0.013251772613679144`"},
{"0.0064493481748522955`"},
{"0.006709324288753081`"},
{"0.023665333468764864`"},
{"0.031924938042876355`"},
{"0.050237356676772586`"},
{"0.036064491007592944`"},
{"0.2853934157979929`"},
{"0.009287583319640682`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015750862260836475`"},
{"0.030738515998175966`"},
{"0.005894088569844576`"},
{"0.028932073523049228`"},
{"0.19371379000137312`"},
{"0.05179340679602782`"},
{"0.07192775186156278`"},
{"0.0488761226284378`"},
{"0.006767099649750918`"},
{"0.025412810671900737`"},
{"0.026857865152232138`"},
{"0.008550297497332578`"},
{"0.01384403708022991`"},
{"0.005143935344611066`"},
{"0.006827424783646466`"},
{"0.028509575631589103`"},
{"0.03585211754187833`"},
{"0.030411536886266487`"},
{"0.018394814251265174`"},
{"0.33197912929073065`"},
{"0.013822744579258658`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015660877079323923`"},
{"0.0109999483838291`"},
{"0.005293785769618663`"},
{"0.23192405966759216`"},
{"0.032224365326373676`"},
{"0.025255726389680495`"},
{"0.030515303220016977`"},
{"0.10448038926655581`"},
{"0.02244176684149011`"},
{"0.015656344346370817`"},
{"0.02798375412116437`"},
{"0.010942381728938078`"},
{"0.03234167188064912`"},
{"0.014236864527445168`"},
{"0.016807492827927973`"},
{"0.027564940063497204`"},
{"0.0262151654952841`"},
{"0.020782225196414407`"},
{"0.014042051446734108`"},
{"0.20380643736310433`"},
{"0.11082444905798944`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.023360855193793953`"},
{"0.07532189014362212`"},
{"0.009182592470446485`"},
{"0.19183187306228866`"},
{"0.08279283613988532`"},
{"0.0068033104911306205`"},
{"0.03630303330727758`"},
{"0.021320512938059595`"},
{"0.00789750406370785`"},
{"0.018464444186053114`"},
{"0.07740300898102492`"},
{"0.013387896656666301`"},
{"0.014560058111583986`"},
{"0.005731238328625799`"},
{"0.006518698532993254`"},
{"0.029791343167662233`"},
{"0.056018401186214734`"},
{"0.029334776054414993`"},
{"0.020377918366586666`"},
{"0.26211847752301054`"},
{"0.011479331094951292`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017106361220892034`"},
{"0.03594819629715731`"},
{"0.0055740566343965925`"},
{"0.29748276628750925`"},
{"0.10962704841412385`"},
{"0.03166585722524102`"},
{"0.007819653598693669`"},
{"0.04427992180053096`"},
{"0.017141332140230826`"},
{"0.03402769889014695`"},
{"0.021647524772143687`"},
{"0.006534226037011006`"},
{"0.013423432327268406`"},
{"0.0054019420375621095`"},
{"0.006685740174044584`"},
{"0.07134221614012724`"},
{"0.03876555216819504`"},
{"0.023747009587381317`"},
{"0.02082468281170719`"},
{"0.18029842885309688`"},
{"0.010656352582540047`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013097647634838727`"},
{"0.011390319868948208`"},
{"0.00499525696610682`"},
{"0.19575226660430423`"},
{"0.37076418833522323`"},
{"0.02002334267133979`"},
{"0.0625441105576639`"},
{"0.01101623145524836`"},
{"0.04935620872820861`"},
{"0.027027096351647212`"},
{"0.017450981242961308`"},
{"0.00880404102557861`"},
{"0.019545837435195425`"},
{"0.011176611393343975`"},
{"0.007096280236441068`"},
{"0.03257956667988178`"},
{"0.025086708284849893`"},
{"0.017007221026996273`"},
{"0.01224235345855452`"},
{"0.07197872834772889`"},
{"0.011065001694939177`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015966241527679184`"},
{"0.01124216839151149`"},
{"0.014403532610838975`"},
{"0.05080437723314414`"},
{"0.17674550423922958`"},
{"0.01495689116412458`"},
{"0.052427073788512475`"},
{"0.11847956191253911`"},
{"0.005782194247114486`"},
{"0.07318511013305086`"},
{"0.07737371160459995`"},
{"0.008029831422465543`"},
{"0.08819550421454372`"},
{"0.021709122358979316`"},
{"0.04741727712878799`"},
{"0.047004159759193226`"},
{"0.02906107170880749`"},
{"0.038250110457158065`"},
{"0.012590190908238237`"},
{"0.07457360825154921`"},
{"0.021802756937932377`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.017286926598697596`"},
{"0.055048604697657204`"},
{"0.0054077522096231895`"},
{"0.2388047101815414`"},
{"0.097954924617569`"},
{"0.04213279391807469`"},
{"0.0848744752109079`"},
{"0.05390445232385053`"},
{"0.057779662801817434`"},
{"0.0063171204868040925`"},
{"0.10799660631857659`"},
{"0.010063959793525406`"},
{"0.038417387906617924`"},
{"0.01359044052065914`"},
{"0.009660894747587198`"},
{"0.022229225845491293`"},
{"0.027408243650717756`"},
{"0.017821422673135783`"},
{"0.012392520714307057`"},
{"0.06977628120332786`"},
{"0.011131593579510973`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09055268788191094`"},
{"0.05754853943842886`"},
{"0.06579648902442503`"},
{"0.06497002859663559`"},
{"0.06714884247587019`"},
{"0.03541485193187423`"},
{"0.013609738803960903`"},
{"0.014008098225194138`"},
{"0.02228103235710674`"},
{"0.03002935906155235`"},
{"0.012058784943685364`"},
{"0.09178724736839504`"},
{"0.018741106308819557`"},
{"0.010108367414514116`"},
{"0.00721267488146482`"},
{"0.027120076415890648`"},
{"0.06855908309579739`"},
{"0.027454600091040747`"},
{"0.018699687262169248`"},
{"0.21447791356028714`"},
{"0.04242079086097696`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05813580428560644`"},
{"0.02366411626522356`"},
{"0.02837133339464977`"},
{"0.06377438667493468`"},
{"0.130292624290763`"},
{"0.02036869961660121`"},
{"0.011211000880061316`"},
{"0.019073381365758757`"},
{"0.012478485057458251`"},
{"0.012451786906602896`"},
{"0.23992708093825424`"},
{"0.00466486162091248`"},
{"0.015076163677631685`"},
{"0.0058779777414309405`"},
{"0.009025721905442603`"},
{"0.02280562964538746`"},
{"0.02664776793784762`"},
{"0.02058931606129288`"},
{"0.01481576114717768`"},
{"0.2337000964544763`"},
{"0.027048004132486245`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021079553146968008`"},
{"0.012195417404995074`"},
{"0.0054748054341428225`"},
{"0.04087933880008468`"},
{"0.150125665878663`"},
{"0.013836982324374874`"},
{"0.009515716310256113`"},
{"0.02046928686233904`"},
{"0.05444422880973697`"},
{"0.020135043166298123`"},
{"0.02590164972187884`"},
{"0.00531335618709812`"},
{"0.012224839848711115`"},
{"0.0936350040827664`"},
{"0.10040875491201247`"},
{"0.06532530411362619`"},
{"0.05129685585773946`"},
{"0.08731378259629888`"},
{"0.014385374866592034`"},
{"0.17766140041158937`"},
{"0.018377639263828432`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.021814714783196576`"},
{"0.013551820498890981`"},
{"0.005612474389969761`"},
{"0.0330987401897159`"},
{"0.17562059174146802`"},
{"0.011520291623206093`"},
{"0.009627829699322599`"},
{"0.03357912453700936`"},
{"0.020876533869755996`"},
{"0.017637875203785222`"},
{"0.03328520003802499`"},
{"0.00466486162091248`"},
{"0.27362421091789346`"},
{"0.0048411327127325515`"},
{"0.0480648615243578`"},
{"0.03646726230367692`"},
{"0.08686159102441789`"},
{"0.030846064462183003`"},
{"0.015967845142803926`"},
{"0.10768499792275785`"},
{"0.014751975793918619`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02870617923724549`"},
{"0.011200027671775383`"},
{"0.005045563321496543`"},
{"0.03594815203630878`"},
{"0.20718782325078378`"},
{"0.007461067851748704`"},
{"0.009573673227008557`"},
{"0.012624082781203673`"},
{"0.07755083070566532`"},
{"0.014064040511861515`"},
{"0.027406456691440637`"},
{"0.009926920505857143`"},
{"0.25216010817195184`"},
{"0.05000713814184092`"},
{"0.006476811209892396`"},
{"0.02254896683883414`"},
{"0.02549104649824352`"},
{"0.021529739445865472`"},
{"0.013723495210897605`"},
{"0.0788887260681014`"},
{"0.08247915062197714`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013396402373437134`"},
{"0.014439298168176155`"},
{"0.005332147443832668`"},
{"0.033078204089413255`"},
{"0.037178969736231006`"},
{"0.0086104873177627`"},
{"0.01686418451092886`"},
{"0.012187870019883033`"},
{"0.00788768495182698`"},
{"0.006546260132286151`"},
{"0.013718966526045935`"},
{"0.005092877185114814`"},
{"0.017542608979709818`"},
{"0.005965213992455854`"},
{"0.006658393570463083`"},
{"0.020429526454620317`"},
{"0.2642280146023898`"},
{"0.07683073682267211`"},
{"0.034489184740973414`"},
{"0.3893013745960319`"},
{"0.010221593785744965`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013663176054399331`"},
{"0.023675048614078424`"},
{"0.005023605118239031`"},
{"0.030212968501802155`"},
{"0.03252485964603372`"},
{"0.010958630931682176`"},
{"0.009109654465921142`"},
{"0.011049619712988365`"},
{"0.0059612767204472415`"},
{"0.00639300289075865`"},
{"0.018818389487957325`"},
{"0.004707355767127032`"},
{"0.014024770470513214`"},
{"0.007415063854871134`"},
{"0.006543587725372406`"},
{"0.1353913684457746`"},
{"0.024833289137625437`"},
{"0.10363450622894899`"},
{"0.06613177431595434`"},
{"0.46063976191961836`"},
{"0.009288289989886938`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.019484357004222796`"},
{"0.01414020257500646`"},
{"0.009194265010170913`"},
{"0.033013416501075706`"},
{"0.035094298450435366`"},
{"0.010089785173811117`"},
{"0.009199208668981645`"},
{"0.011054446277139992`"},
{"0.007471289374724695`"},
{"0.006382085684019869`"},
{"0.013682914874079796`"},
{"0.0047565771934524005`"},
{"0.01842710544172326`"},
{"0.005540463953349448`"},
{"0.006599098639945624`"},
{"0.0711520595513857`"},
{"0.150647947251451`"},
{"0.016852353770359103`"},
{"0.025678084174283085`"},
{"0.5222453515042815`"},
{"0.009294688926100528`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.029500822361662585`"},
{"0.04824653326202363`"},
{"0.01138395008417158`"},
{"0.03398728866007704`"},
{"0.033809275433437175`"},
{"0.009537133129336801`"},
{"0.010547584377765784`"},
{"0.01103979889178462`"},
{"0.005876463993259527`"},
{"0.006387822796412873`"},
{"0.01541714465010244`"},
{"0.004888752268006951`"},
{"0.012578351396755017`"},
{"0.005206427979044585`"},
{"0.006576972815171502`"},
{"0.05251069943960449`"},
{"0.19029436919957413`"},
{"0.04477387420669335`"},
{"0.012115643884942292`"},
{"0.4460545844529408`"},
{"0.009266506717232764`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.052015354217615925`"},
{"0.041257255499939215`"},
{"0.011438932503112616`"},
{"0.08035041725486317`"},
{"0.040209090161373924`"},
{"0.019889606601963535`"},
{"0.01542069480013547`"},
{"0.011332020454061896`"},
{"0.0061137726958686986`"},
{"0.006481330766187131`"},
{"0.02404297744865904`"},
{"0.007042752781978403`"},
{"0.014613783624735512`"},
{"0.0056748156696002855`"},
{"0.006724705573961021`"},
{"0.10421150572983945`"},
{"0.24967189840287465`"},
{"0.16544370927208013`"},
{"0.07757238755901195`"},
{"0.049508897293827035`"},
{"0.010984091688310946`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013106394434315117`"},
{"0.010523806774654903`"},
{"0.0051197462981894155`"},
{"0.04348647086256799`"},
{"0.5297539184661327`"},
{"0.009229043381050414`"},
{"0.00889558350954519`"},
{"0.011876975383929577`"},
{"0.011787839385867525`"},
{"0.007666923465872365`"},
{"0.060182195501771604`"},
{"0.016500090640279217`"},
{"0.0159808133556837`"},
{"0.005291067039088642`"},
{"0.031770945295910895`"},
{"0.024322436495701278`"},
{"0.02514628692987315`"},
{"0.017986970767257072`"},
{"0.012115643884942292`"},
{"0.13000801698753633`"},
{"0.009248831139830568`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.03306916223805604`", "0.030276957564006318`", "0.01224756099557418`",
"0.07945168559651655`", "0.0803475749806604`", "0.020233566217483498`",
"0.022059242164282972`", "0.025190146398993883`", "0.01248716074563066`",
"0.012570214415410948`", "0.031245583522209686`",
"0.010233386810419591`", "0.02281701192587695`", "0.009645298102226191`",
"0.011198205766322347`", "0.06650858399481677`", "0.12247173509564127`",
"0.0765191206320904`", "0.042194113292864606`", "0.2583307280469862`",
"0.020902961493929992`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw91vc/FYzjBfAGPSSRUSLxZESPlZKiOjJanpJRQkpUshMurqzruta99p73
mtfes4xSkUqXJNlpKFIyQh76+uH7+vxw/oHzep336/xt6WRwc8O6desE/z/S
KV0b/5ENBX+lsrXFkTIsZYoT1DXKcaEk9W9XZwYmIzh5EtoY2LOLo1xqUxAa
Ely3W1eQcWB4h5rOIwpcrpq3xtoR0VE3qlFz0A9oeGExlVsBB12r0QPCkXjc
YXf6xRgNqcnr9syL+MKsqLWcXdcfNwycjq4Ljse312yugSfS8bM/a/PXNxkY
LdoSvZJIR1bDXvWu7hE0hIirDIoEgHFtfGVupRoxus6siRUy+Oxb9fzfxCCF
MnGXr6UcmTNbzi/rMlAplK95MysHR5tKOuPyEnHESW69NS0IQjz6XOeFPKEQ
+qbL6VQktrMlpZXpFYBOfn+XL9sLvDaXUgpvhmIsg69cItUNozeHDY4tEHH8
ILuf8lAGbovc0LIqqMPq8uDWk1mpiHbMZGS5lIP4iyUWav0WF2uDnPfyBICX
W7h8hKMDds1uuaamRZA8azPf8tgFGyvTvFgeDMz8M7nTaK1PnlNFpKwMCihX
rsgNdJBglXerSmueAm+C6OL5zRR062kXx1C8oRdrK3dO7yFK/2Nvv2YTi8Vt
k6+aJMJgpTpUy7AlQpnXgnLUywurNko59eqJIBtny7pfpmOhZGqhui4fT43f
kbjcM5En3ds0ptUNkW0/jK6yB6BDWt5zVTwSPWcffZjwzMD9RVPTW5Ie4Oc2
ib9KT0NVsN2WtOftmGooulxALoBazKTDgE0Fbkp5B5/dlA+NwFliV60XTn+e
7mexJ+Ob52gX3S8FP7f/9usi+cMiieOglikVBn3HGZ3b3HBhX/wY34IXJiLf
qqftT8Ora4V3VMwyQZizKj8gmYE3Cn7bd/RGY1sQy0oKb2B3XefaTj0qEqhB
hdackajJCRKQDKKgz2bzix8lbpB+XMNeVvoS1jvtT9b40sEXHCiSNZiEUH7H
i9bIAJ/k0la15gYkH0kkLv2Ox4zyEy9VjkgMygvMPslLBR1GafO3KWj7vcVx
ewQdUsvGqaoyNMifFGpZVokC21Yz1vKRVBhT+5ak+pJhu02N8uNUHIKFB48J
PKKifV+intH2DgyKn6tbufoA2R4nXL9MJoD+uzdd93Ql5vleVxh0kpDKFmU5
Q2vHdbNI3a/7q5H7if3hsyEvaLQn5evFZ0JT4ZA115s4vM6y4o6S8wPHTOGI
8ZdolN1TXFfKqkRwkx2fqF0YDuLSZH4XDXl8q9FZnu5gf6/IMqkkgpblpJzh
n445Q4lM55IiCEjI+P7gTAeloW12ZigWfiMysdSnLCRO8DR6koKQrrbibkSO
wofEj+dfWmcixPaQU3cPAVR2QZl5ztfw2FFRSOZ9ABNd837/Q3TE0dokWjb6
4fiN9fSBwlyYs70y9KVFgWnaLiJgz8CSbNPzx/viccVcYobRSkTwQmt8k3cY
HvyUf3pZnAApO9Maf0svjFtIPfHSqsBbOaqgwLssUH4c7t2jnwiDUb9OXsM4
MAfr3rIJtGHFvdzxT3cgRiUX/ae7QzG3mNHfaRgEmu2IwBc3Vxh5JPxls/UZ
IiwGapMa3uK2YV3bH79YSPJYc3/cUIbXIcnhxREUJKiUUlV18nE4s+n+SlEK
yDNjlMLhKCgbHrbs/4uEZHe1me6NsbD8dsGq9QMFqe3ph1d4vfF7iNWvXUJH
rHaCj1FZEtjNHE4b20aBXblviMwXAvqAZpGyQwVWo09ZIZ+CHo1OI1eTSDzi
yfh3z5qPSZcF7ZN8adAMtGPn2FgAacFDLYkZT6FVojxbywjHM2J5Sd3bAhRl
Mw8UGzWBrrRldlupO86YxdzSfFCBZ85fPVo7KzGYx2r46ewHTbcTm5ZjajDN
qRY6oRaPbJltL/lPMfFAauz9FC8T/wydIyk+SoNc/a8GclwWog6ndo21h+BW
R1zwiR2VuGPApUEwjMf4roj1BZVRMO69n2+kWISlDlnHO9IEyEoqCO+N6sS/
0zVT0fz1GDvyY8EhOgcubbrWFxuqsTJdfMo8qRDHpFUf68YV4847o93LI55Q
z1C9UZBzH5dSXbpsUsngVL3AcC7MQoVf4pbzb8KQEzJlvONZAP49v11IszUe
vEFeQl94U5Hio+zYhmiolBKWcD0EnzZ1Ng4MlqOmY8MB2RcUKAazrSco1IJX
Jpu2zr0Yi0q0L5x9ZWBObz44yigD3+TNzAKlcmiKlRz79HcmuBMjDtuPhIHF
wb37VBkViwvyT3pZ8fA1MZNja0mHvFtl7cmKYKgKZ3le9a1F3v1m02GlGEzW
lYlUVJLhl1ZXyBnmDfF2wUDzJynw824M204rx0kZ3k08oqmI2D3zeIN0DOYv
qkludH2OA8q9ofJ1OWBqa39cai2GOr1j3nrN3YPVunPXuNOQem1HPtmwDJbR
u1sciltQQR48GzwQiyP8gtuer/lOZzyaWwyKQXbmy6/64SFgKRlSDfxCcHN5
k/r36k5co2aeIIi44KJXuJPGaDhclZiZ/vweIPdrfOC/R4K4w8InM9ME+D5S
daKdScEfy8BUc8E49Fo1vqg3DsdHjiLfsa8vIadS2uNRkQL7vMCh0bg4NK4Y
qH5dCkacXcHHZnsCqpZcV/d8z4ZycvoVfdVW2LxzN4q8RMWNuZfdS/cC4FkR
F/95PhYlB63kREcLoeOeOnIqPRYFUiNnfgUmg1X8Qcmt1Q2lAx1qlzhD0N+v
W0ZYrEWxduxVq6p6uP54/ECmvgyKwwmDsVoFID1oVFI2rcGN0UYjAQINhg+1
+lIan6I9heAT3xWNOwuaDYmX4pFFagnf+jAM2sM6YiIrBBQxzzvoz9BRaMB2
7gHxKQ6WCl2dTQjClGqgw8PaAAzMO7ic3s+A7OtPHkyLOKTqlj7O54nGYX2V
5YebGf/r0/6CgRhPQBfu7Owp0O1xAedsgfh8ChNlO6d1egszQfNoKIo4WgO7
/ecu74rPgJVM1czI2q7Pi5h4HI+6j6OFZUWnD4XD3GebwN6baXA8RtbePE0B
f+7ZHcwCV+j8Ku9+vubp9ISP49+BHXBZypf2jfCB/sq/hVdSAhAb6Fud1x8C
uSgm57X+SoQ6WUamvKTCPuCh3J21XVjGXa+NNCJDVsBb+oYECwTSE9GQ5Hzc
/U/ziUMQEW3BFCr/jgRYrByQMxROxvjQcbOPXPHIeD99mVeEin0X7ilzK1eh
ajaQYipaDdOSjLJopzC8Kjr53CSaBhPZw46yb93QF0A1of+gI81J/ZAYZxaO
xblxWWT6gz7eodWnHYVMD6kjc/PB+C5xcq/d3jX3DYYNNFhE3GAGkMuEqGj7
fOyV9qArhkZsI8p+RcGVU2H6t6MHcoN4J3p0vDCNZT3iZCyyRkzSd31lQU58
eUi+sBIbHLeuj2IyIHqd68KFiT68zFQQ4vlBhsw5/7t3lsPgYy6arnM8EV2N
3PcZMa5QuBu4KjWdjpv7l5R25tFhIFYaRnSmQNWWT1yQSQKXh3W/AmPNbdMv
HP22HpCttc+hKhJxVYTZKK4TAyZNfD/7aRdsauHsYaungn833xbNaz4wqCbM
3X1JhLh+l6i/0UM4LHZ0f3JIQgttxacjqAEp777ybPxehuKcf5TFvIbw68y0
fOPaXxqluPNWz8bgUMbMYMg8FUzdo1ece0hrf8f6zp5xOg51HNN4v8AA9/Sj
zXP5ZMTz8nzgeEuCXf1Yfk0WBadfX1s8lOwDQkmZgLAkEatmis3P2KlQf/ts
geHlAsfaqV3hw9E4VtW8kFhOgKaFOzfzLy/4zbM82FUrsLfNMMbxdCs001X1
m05EwTJ0A4+ZbjL8zKXH1GtGQXKv+UuIMwBVt1eLCCrp+G92A/uTSiYawu5N
uF8IwtZC6r72Www89o7hcNFjgK1H2PhgcAAcbDNfLSYFQjUlvJ4jlYKm+0Vn
J7d54OkJbvHd+4jYLxEhvikmAk97m53VNrkiaHRHc/GjEJAPWg5fNHSDZqR5
hes0EUMrkeUlYwWgpckOR5q1o6p4aCLpWy6GP3Epb2et+XtANEiGOojeciui
/m8SvuuRCh4yCjCbpvS0UCwHuyXYgnUdgiBsYXS+L6oKz+56K5yJz4bin9Dx
afNYiPM9Sx+LjcAf72XO4ypBUFwNvfJwsyd0ZTt/76MSQaFfGa9LTwThxjxt
sO8e5hK+vumZomGnhdV9z+Pu2MuF2+ZhXphb93s6ubgBKk6KpZh/hdxAQ3tN
+ScYIWZVtg9UwmXQc0rNJB86fek9r30o2PtftRflbSgIKTZO/rRAGM0zHJ0X
XfGx8HLPgFYuFIuNvZtmR3GzZl69+DMJ9m1sG96pkvCZ/Dx3ziAYYtOH2Y9I
BuPTt2YhU2tfpEf/sjzAKsGR6/WXbn2KRHbUuNpJ80h8Ezu3Kljkhh2xbJtO
a9NR7a4uuDyeCH7pyeaZ5iQ0ar2Qk7eL/l+fJTPxZ4WzW/A8W06Y+ycJ/wex
GZud
"], {0.03306916223805604, 0.030276957564006318`, 0.01224756099557418,
0.07945168559651655, 0.0803475749806604, 0.020233566217483498`,
0.022059242164282972`, 0.025190146398993883`, 0.01248716074563066,
0.012570214415410948`, 0.031245583522209686`, 0.010233386810419591`,
0.02281701192587695, 0.009645298102226191, 0.011198205766322347`,
0.06650858399481677, 0.12247173509564127`, 0.0765191206320904,
0.042194113292864606`, 0.2583307280469862,
0.020902961493929992`}}]]], "Output",
CellChangeTimes->{
3.5316147892594643`*^9, 3.531614848354909*^9, 3.531615686153913*^9,
3.53161609681293*^9, 3.5316165784832153`*^9, 3.531622867149292*^9,
3.5316270390623198`*^9, 3.5316295261202383`*^9, 3.531630115731564*^9,
3.531713251970915*^9, 3.531776067575654*^9, 3.531790200919943*^9,
3.531790879208127*^9, 3.532036627503133*^9, 3.532039842501646*^9,
3.532054644558632*^9, 3.532124851586048*^9, 3.5420646297607613`*^9,
3.544839544215102*^9, 3.5448492082894917`*^9, 3.5449089530969353`*^9,
3.545943794207575*^9, 3.5459443716475286`*^9, 3.545958494473638*^9,
3.545967535420192*^9, 3.54597169437216*^9, 3.5459725945278482`*^9,
3.545972676380354*^9, 3.5459727305065193`*^9, 3.545972839130014*^9,
3.545972943437286*^9, 3.545973034770153*^9, 3.545977482418326*^9,
3.5460303112169123`*^9, 3.546030381964459*^9, 3.546030727367309*^9, {
3.546670296524987*^9, 3.54667030023417*^9}, 3.546671106175839*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"1", "-",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.7", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "/",
RowBox[{"escoreOnodera", "[", "0.7", "]"}]}]}]], "Input",
CellChangeTimes->{{3.5466703166424847`*^9, 3.546670336685157*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.000025332988931481282`", ",", "0.00010047675012159196`", ",",
"0.00019910240210774255`", ",",
RowBox[{"-", "0.00002121581518621518`"}], ",", "0.000030180701177440206`",
",",
RowBox[{"-", "0.0001762836126295575`"}], ",", "0.00003435338699120383`",
",",
RowBox[{"-", "5.8117901500231994`*^-6"}], ",", "0.00022732220731302988`",
",",
RowBox[{"-", "0.000017057709701617796`"}], ",", "0.00014132728929006078`",
",",
RowBox[{"-", "0.0003310665121789569`"}], ",", "0.00013094102204425084`",
",", "0.0004872432926227299`", ",", "0.00016019943550471538`", ",",
"0.00002129010950580046`", ",",
RowBox[{"-", "0.000014167515646867912`"}], ",", "0.00001149200090966307`",
",",
RowBox[{"-", "0.00009749449785756426`"}], ",",
RowBox[{"-", "2.8182827631617613`*^-6"}], ",",
RowBox[{"-", "0.0001416982741624384`"}]}], "}"}]], "Output",
CellChangeTimes->{{3.5466703270664597`*^9, 3.546670337471849*^9},
3.546671106233568*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.7", ",", "50"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.7", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.545973039894758*^9, 3.54597304369166*^9}, {
3.5466703464376173`*^9, 3.5466703514773893`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "18", ",", "4", ",", "3", ",", "15", ",", "13", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"19", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.545973044043651*^9, 3.5459774824360247`*^9, 3.546030311352853*^9,
3.5460303821992617`*^9, 3.5460307317621193`*^9, 3.546670352678224*^9,
3.546671106283236*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.8", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}, {
3.5459730205185947`*^9, 3.5459730208687*^9}, {3.545973144320849*^9,
3.545973144748294*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"escoreOnodera", "[", "0.8", "]"}], "=",
RowBox[{"{",
RowBox[{
"0.03199", ",", "\n", "0.03006", ",", "\n", "0.01156", ",", "\n",
"0.07375", ",", "\n", "0.07045", ",", "\n", "0.01939", ",", "\n",
"0.02047", ",", "\n", "0.02173", ",", "\n", "0.01052", ",", "\n",
"0.01065", ",", "\n", "0.02880", ",", "\n", "0.00906", ",", "\n",
"0.01874", ",", "\n", "0.00803", ",", "\n", "0.00889", ",", "\n",
"0.06942", ",", "\n", "0.13442", ",", "\n", "0.08328", ",", "\n",
"0.04452", ",", "\n", "0.27632", ",", "\n", "0.01794"}], "}"}]}],
"\n"}]], "Input",
CellChangeTimes->{{3.546670572826152*^9, 3.546670600070407*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.03199`", ",", "0.03006`", ",", "0.01156`", ",", "0.07375`", ",",
"0.07045`", ",", "0.01939`", ",", "0.02047`", ",", "0.02173`", ",",
"0.01052`", ",", "0.01065`", ",", "0.0288`", ",", "0.00906`", ",",
"0.01874`", ",", "0.00803`", ",", "0.00889`", ",", "0.06942`", ",",
"0.13442`", ",", "0.08328`", ",", "0.04452`", ",", "0.27632`", ",",
"0.01794`"}], "}"}]], "Output",
CellChangeTimes->{{3.546670590354957*^9, 3.546670601335506*^9},
3.54667110633315*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977482479601*^9, 3.546030311374524*^9,
3.546030382268553*^9, 3.54667110638272*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.8", ",", "50"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.8", ",", "issues21", ",", "50"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.545973028695661*^9,
3.545973033706944*^9}, {3.545973080140368*^9, 3.5459730868593407`*^9}, {
3.5459731549178057`*^9, 3.545973181728496*^9}, {3.5460307528355923`*^9,
3.5460307625850677`*^9}, {3.546670607332176*^9, 3.546670612092209*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.00851588952003461`"},
{"0.06754821867327117`"},
{"0.07471473578981909`"},
{"0.025158487919748826`"},
{"0.024341780030843953`"},
{"0.009608549669647064`"},
{"0.00782595670917227`"},
{"0.00745443711528644`"},
{"0.004618292554041316`"},
{"0.006035321698970949`"},
{"0.07752584468181896`"},
{"0.015750014636769488`"},
{"0.010856063767875916`"},
{"0.0063747235910403535`"},
{"0.006565946841751111`"},
{"0.015418142464538483`"},
{"0.021942417282910694`"},
{"0.027505858898841492`"},
{"0.03127890286474953`"},
{"0.5447012116369558`"},
{"0.006259203651912395`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09209588038023077`"},
{"0.006833289137625434`"},
{"0.01983792234121414`"},
{"0.06546515029142337`"},
{"0.023264000197779536`"},
{"0.045060024455799506`"},
{"0.02379268313992193`"},
{"0.007897229613139052`"},
{"0.004248510791944452`"},
{"0.015160429957186252`"},
{"0.052988276567957196`"},
{"0.005490943826064781`"},
{"0.008909200013505465`"},
{"0.0037242521713854505`"},
{"0.004439738191204906`"},
{"0.02583421190411605`"},
{"0.09828880786721578`"},
{"0.023936886319715148`"},
{"0.0721400902636471`"},
{"0.3943609660378364`"},
{"0.006231506531087288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.22636957236112298`"},
{"0.058406904439200436`"},
{"0.00321754057863812`"},
{"0.025222668552000796`"},
{"0.024339499472156585`"},
{"0.00938509882937186`"},
{"0.006763189591533683`"},
{"0.007565595330985271`"},
{"0.009545830571142635`"},
{"0.005230042384306684`"},
{"0.14880925113554075`"},
{"0.020559460713200747`"},
{"0.009323530678151821`"},
{"0.0050653823366252175`"},
{"0.004583603372911904`"},
{"0.017317749462102544`"},
{"0.024660267697751335`"},
{"0.04938919154947386`"},
{"0.03544720692060989`"},
{"0.3025882383911218`"},
{"0.0062101756320509845`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.011918207212359816`"},
{"0.030248811756754368`"},
{"0.004437857952223713`"},
{"0.019288049015366144`"},
{"0.2060422527032961`"},
{"0.055952793247302936`"},
{"0.07847950041383668`"},
{"0.05061260135857256`"},
{"0.004980402339184627`"},
{"0.026035059583694134`"},
{"0.024952424486510368`"},
{"0.007550405891755098`"},
{"0.010000404354209838`"},
{"0.0035734819592066693`"},
{"0.004718575367075771`"},
{"0.02285402621961596`"},
{"0.029148472839467882`"},
{"0.026731111788895454`"},
{"0.015253290627663868`"},
{"0.3558290538113936`"},
{"0.011393217071614385`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.011815367004916897`"},
{"0.007690448768929373`"},
{"0.003751797609108384`"},
{"0.25127889032341527`"},
{"0.021482910217582443`"},
{"0.02562401564004884`"},
{"0.031150987680641472`"},
{"0.11416033465927886`"},
{"0.022894307701172276`"},
{"0.014884812354517078`"},
{"0.02623915473671863`"},
{"0.010284216442161383`"},
{"0.03114055841183179`"},
{"0.013965401025302786`"},
{"0.016124367417683208`"},
{"0.02177444271322522`"},
{"0.0181348133576459`"},
{"0.01572618414335022`"},
{"0.010278704565342647`"},
{"0.2093459773226778`"},
{"0.12225230790444958`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.02061534199288265`"},
{"0.08120123935154998`"},
{"0.008196148124340183`"},
{"0.2054592484887827`"},
{"0.0792754482901672`"},
{"0.004535540327420412`"},
{"0.037765536351796435`"},
{"0.01912047599814032`"},
{"0.006272293097992549`"},
{"0.018094069314153992`"},
{"0.08271830314798784`"},
{"0.013079090645279354`"},
{"0.010818714104328784`"},
{"0.004244685369509221`"},
{"0.004365745366329244`"},
{"0.024318903403699542`"},
{"0.052195654147280904`"},
{"0.025500527981065176`"},
{"0.01751969533088843`"},
{"0.27598830893399917`"},
{"0.008715030232405968`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013467348880994741`"},
{"0.03620273209844732`"},
{"0.004072107168854589`"},
{"0.3262031264604634`"},
{"0.1099431194607255`"},
{"0.03294987945211802`"},
{"0.005213102399129111`"},
{"0.04535980041239331`"},
{"0.016836668042590236`"},
{"0.03588064611883267`"},
{"0.018997749766409278`"},
{"0.005246324222816158`"},
{"0.00951971320796812`"},
{"0.003868346751150719`"},
{"0.004556650098959335`"},
{"0.07180561537223099`"},
{"0.03247811241240126`"},
{"0.01911450916159812`"},
{"0.01803028326816903`"},
{"0.18247968188266928`"},
{"0.00777448336107883`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008885961925505245`"},
{"0.008136587609065498`"},
{"0.003410621833666278`"},
{"0.2099396982510862`"},
{"0.4083855650848391`"},
{"0.01964414853337375`"},
{"0.06775533892366653`"},
{"0.007344154303498903`"},
{"0.053653669857421996`"},
{"0.02787995750340439`"},
{"0.014201700018772273`"},
{"0.007840398495464848`"},
{"0.016516747617027573`"},
{"0.010467968872044282`"},
{"0.005025838741698175`"},
{"0.02750544456052188`"},
{"0.016845147974292523`"},
{"0.011411893664015208`"},
{"0.008221906864565977`"},
{"0.05868573844796299`"},
{"0.008241510918106406`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01216435494589434`"},
{"0.007967271634852106`"},
{"0.014162936856217313`"},
{"0.044284967541188894`"},
{"0.1866499261179892`"},
{"0.01385391823941351`"},
{"0.05619301118749347`"},
{"0.1301593891118312`"},
{"0.00385479616474299`"},
{"0.08063197325357999`"},
{"0.08268482043207358`"},
{"0.006955587520478486`"},
{"0.0949735096505685`"},
{"0.022505124261341814`"},
{"0.05110697804723752`"},
{"0.04399069379402067`"},
{"0.02138727760167263`"},
{"0.03568948158420012`"},
{"0.008619435378490223`"},
{"0.0616513154809005`"},
{"0.020513231195812925`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.013673709312772526`"},
{"0.0580317702704472`"},
{"0.003882044969113557`"},
{"0.2591424909107858`"},
{"0.09660354940751996`"},
{"0.0449120928153565`"},
{"0.09327575567023108`"},
{"0.056359263867615673`"},
{"0.06328047451297494`"},
{"0.004211413657869393`"},
{"0.11768241439090403`"},
{"0.009280305658832614`"},
{"0.03808423387008186`"},
{"0.013226630731833042`"},
{"0.007956826754436609`"},
{"0.01567648360693275`"},
{"0.019498331249570077`"},
{"0.012342409831031792`"},
{"0.008393526585426019`"},
{"0.056168655997218965`"},
{"0.008317615929045603`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09740600792215921`"},
{"0.06088883854561481`"},
{"0.07289774418602996`"},
{"0.06047428338517914`"},
{"0.0613965983884356`"},
{"0.0372344448311274`"},
{"0.011830342633720237`"},
{"0.010763430612008365`"},
{"0.02271061114759128`"},
{"0.03131111488615312`"},
{"0.008039189962456906`"},
{"0.10267834860154079`"},
{"0.015597054901169437`"},
{"0.009247118610524442`"},
{"0.005158861193153891`"},
{"0.021266027115960585`"},
{"0.06652786204394681`"},
{"0.023351755451494607`"},
{"0.015601716925839951`"},
{"0.22154195011945815`"},
{"0.04407669853643531`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.06035814095495408`"},
{"0.022163783490523045`"},
{"0.03012613775200108`"},
{"0.059107835474663806`"},
{"0.1335609204625988`"},
{"0.02003884218510109`"},
{"0.00908892786354928`"},
{"0.016552325629796503`"},
{"0.011507699947993007`"},
{"0.011222460994782312`"},
{"0.26846009967053563`"},
{"0.003109907747274985`"},
{"0.011408549036954724`"},
{"0.00441238755557224`"},
{"0.0072309149348427845`"},
{"0.01633523080681408`"},
{"0.018629216149147063`"},
{"0.015505716560354193`"},
{"0.011162944222992445`"},
{"0.24351015914138863`"},
{"0.026507799418160206`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.018008139653653`"},
{"0.009056699078833344`"},
{"0.003958677225707424`"},
{"0.03294206647483523`"},
{"0.15622725370591312`"},
{"0.012574022422556702`"},
{"0.007151459783771904`"},
{"0.018147646197316826`"},
{"0.05946854995059726`"},
{"0.020003325291576855`"},
{"0.023859606851820883`"},
{"0.003851044394344288`"},
{"0.008149893232474073`"},
{"0.10470613194566993`"},
{"0.11166866694235121`"},
{"0.06492914448480121`"},
{"0.04679960234330917`"},
{"0.0917622497432182`"},
{"0.01067107418803742`"},
{"0.179465935092375`"},
{"0.016598810996836983`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01884832438077136`"},
{"0.010606874043285811`"},
{"0.004116013175223924`"},
{"0.024049953777270906`"},
{"0.18536431183483312`"},
{"0.009926375906935236`"},
{"0.0072795893712764605`"},
{"0.033130317825511485`"},
{"0.02110547001919043`"},
{"0.017149419048704977`"},
{"0.03229795007027362`"},
{"0.003109907747274985`"},
{"0.3068920315972539`"},
{"0.003227421808488367`"},
{"0.0518470744993173`"},
{"0.03194852527343061`"},
{"0.08744501396237024`"},
{"0.027227714732800046`"},
{"0.0124796116465653`"},
{"0.09949290367656752`"},
{"0.01245519560265434`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.026724283756827262`"},
{"0.007919110812296555`"},
{"0.0034681148112545327`"},
{"0.027306424459091348`"},
{"0.22144114784547972`"},
{"0.00528726302526965`"},
{"0.007217696260060412`"},
{"0.009181698676019263`"},
{"0.08587609497451539`"},
{"0.013065036543649305`"},
{"0.02557938624560579`"},
{"0.009123689330068888`"},
{"0.28236162845903495`"},
{"0.05484571372746937`"},
{"0.004317874139928263`"},
{"0.01604190188503886`"},
{"0.017307248789599522`"},
{"0.016580486142722867`"},
{"0.009914640295815218`"},
{"0.0665828786998173`"},
{"0.08985768112043552`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009227395912474854`"},
{"0.01162113423675458`"},
{"0.003795639522495819`"},
{"0.024026483948353605`"},
{"0.027145315257419388`"},
{"0.006600885272142788`"},
{"0.015549709155969331`"},
{"0.00868316980593853`"},
{"0.006261071255842984`"},
{"0.004473287538420316`"},
{"0.009936540342297559`"},
{"0.003599068392077653`"},
{"0.014227343667901161`"},
{"0.0045120861281721415`"},
{"0.004525396837723334`"},
{"0.013619684303080205`"},
{"0.290149498051481`"},
{"0.07978162600193046`"},
{"0.033646856901616146`"},
{"0.4213401913031665`"},
{"0.007277616164741593`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009532280119288795`"},
{"0.022176277603500032`"},
{"0.003443019721817376`"},
{"0.020751928991083773`"},
{"0.021826332297193926`"},
{"0.009284477973765049`"},
{"0.006687389104531938`"},
{"0.0073823123123446235`"},
{"0.004059461848551853`"},
{"0.0042981364052460305`"},
{"0.01576445229876772`"},
{"0.0031584724858059014`"},
{"0.0102069568002479`"},
{"0.00616905739950389`"},
{"0.004394190157619703`"},
{"0.1450046465786851`"},
{"0.016555526091750285`"},
{"0.11041450532338976`"},
{"0.06980981641588006`"},
{"0.5028697768158368`"},
{"0.006210983255189562`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.016185058347658467`"},
{"0.011279310701703502`"},
{"0.008209488169739527`"},
{"0.023952440990253548`"},
{"0.02476283378793866`"},
{"0.00829151139334098`"},
{"0.0067897367651725115`"},
{"0.007387828385660771`"},
{"0.005785190596297514`"},
{"0.0042856595975445675`"},
{"0.009895338454336256`"},
{"0.003214725544463466`"},
{"0.0152381967673451`"},
{"0.004026657512050534`"},
{"0.004457631202846237`"},
{"0.07158829355652636`"},
{"0.16034370679326523`"},
{"0.011234902513572731`"},
{"0.023577027682541482`"},
{"0.5732761649125946`"},
{"0.006218296325147951`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.027632447327589654`"},
{"0.05025797434400884`"},
{"0.010711985397168859`"},
{"0.025065437743397926`"},
{"0.02329423605422644`"},
{"0.007659909056798905`"},
{"0.008330737575211529`"},
{"0.007371088516683201`"},
{"0.0039625330174801795`"},
{"0.004292216297422285`"},
{"0.01187731534121928`"},
{"0.0033657827725258097`"},
{"0.008553906430238534`"},
{"0.0036449021128449758`"},
{"0.004432344545961526`"},
{"0.050283882000204984`"},
{"0.20565390330540595`"},
{"0.04314521158366902`"},
{"0.008077095923294858`"},
{"0.48620100256820525`"},
{"0.006186088086441934`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05336334087725062`"},
{"0.04227022833019808`"},
{"0.01077482244738719`"},
{"0.0780518704231535`"},
{"0.0306083100290113`"},
{"0.019491307311229458`"},
{"0.013900006629348314`"},
{"0.007705056016428659`"},
{"0.004233742963319233`"},
{"0.004399082548592866`"},
{"0.021735409968141106`"},
{"0.00582749764563604`"},
{"0.01088011469078767`"},
{"0.004180202330622921`"},
{"0.004601181984578121`"},
{"0.1093705177604735`"},
{"0.27351393668060653`"},
{"0.18105359451553965`"},
{"0.08288480297937449`"},
{"0.03300593152921801`"},
{"0.008149042339102715`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008895958267763978`"},
{"0.007146286929873149`"},
{"0.0035528953560463867`"},
{"0.03592164597481616`"},
{"0.5900881138058786`"},
{"0.0073078064873287486`"},
{"0.006442736582959421`"},
{"0.00832786165056315`"},
{"0.010718390609032178`"},
{"0.005754045633947419`"},
{"0.06303737345741262`"},
{"0.0166358837694084`"},
{"0.012442434383299884`"},
{"0.003741632467181042`"},
{"0.033225455952520834`"},
{"0.018068724350029874`"},
{"0.016913237854319103`"},
{"0.012531607652884694`"},
{"0.008077095923294858`"},
{"0.12500492546488579`"},
{"0.006165887426553711`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.031994942508203575`", "0.030061188393528497`",
"0.011560798055929288`", "0.07374870870164023`", "0.07044850977580157`",
"0.019386559530178024`", "0.020472758868830106`",
"0.021731581745667403`", "0.010519570384340607`",
"0.010649655387132233`", "0.02880192763995277`", "0.009055812859941047`",
"0.01874320785280898`", "0.008033183641307617`",
"0.008892766796585376`", "0.06941804109371524`", "0.13442003595646884`",
"0.08327946370400675`", "0.04452466338244736`", "0.27631742247289603`",
"0.017939201248617927`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9luk7FIzDhRktngolS01EpKJIlpB0UEqPsq8JJYqyDFkSxswwdhnL2NPY
sy+RJaEiQkibfUsJRaVHivL24b1+H84/cF/Xuc/ZZetqaE9gY2Pj//8I8o6b
tZKoOPuCyP3233JI7GzUpIregx/ROELiSTIG7mcqcH1Owv2ahsqc4kDM57Lv
4l5PQVfQJ5WIUDIcjtZ5Z8y4I1NOwIRccwOfeyhvH/TdwwO+HYktogxIarYc
rlQNBvQCX18Uuon2V2rzk5M3YV0vzxUZFw0xHUoF740ErP4o+kqWSgO5vvrF
Mw4WtPU1jx5yGcd944aD6lk+eGFsfDMprhpP7D7xq/z2xWHjShc7/Xj8pof8
MHxchmapbayg3kQEbmwP3sGbhwOm4/M7rJKw+6OpktMBCmKSQuYmLrtBg2/M
y2VTNIjRQ/RTuwpRFBNIKPL3gpJ6KHPlGA1RBR/uGtJc8POAucSVg+4YWbOS
pu2Rgspj56I9JGvRLJyDaVoSysocx1q8K7AwufJUUa0fweOCZxSDfSA6sim1
+GcnPqYMUGhTxZCuGf9aaHkVfEOHMpdeJkMubH6fx6ckyLWYZJOVAyE82zFe
fc8Xqp5mnMTfZMyxz5U9iQyE39T37m1OngC/n4/MpifQG43gCudi4odLM1Fp
WyCcCNlKpEYPyPOdy9d46o59Pw3IDQ9icHlFICpcPRkxCosnwk/n41vbzKTY
nkwM9RJ4Uq1eYk/4qNFbVx9wjGSUxzqEouf1gl3Ez3R8VNR1cpF2RxXnB240
xaFU6WZZok07/KdV5fpyipC8uTREVbASg77ygu+n88G5XBJrfNkDdtf7tObv
piDTlzIkGpUMzbR1uQc+kzFoeDBK0DcI5R61QWInnbFRTmquzeg6AoZa6zde
SUROhs6Hbf23IclfHHHZJhWkSiWOnWrRkAvXUplqeYMh0aYqI5MQVDwlVOfJ
hUKJ+4TIWkoAeIc42QXrXXBPbz33d74ehHQeuXd7lYk52YJ4GbUULJ7Wtd/4
4Q4OFw8lpqk8xFFtq+UUt0S4uu2r+Ox7C5W7x4ZdR1LQ3KIlNclDR+XKqwC9
d3eQwOZqP5kciebt07+maAwYi1kLbziTgElhydq5mFj8yDI/F0xkQDuSZcPG
RYeo4laz/o52TNrpXfis0whHjjsyskJMzPc7PEh5VolZf+mLu59RENDsuc3/
TDtYh9oM7HUq4TzH8WYwzh2FfwRF2E2z0HPC1skgPg6tv1mDP8t8sPis11U9
JBZDQs/frJOuAr05/5Xis3DQLYhHRPYFo/YqhWvM1g0DBPH+nnE3CAQdWOaa
SkJFulDIpdoCEFzfeHULpYCU/rm/5EsMytqPjrTnv8Dm5LxbB/upOPSYZ6k5
PgL72FuFpMIyofHv4NfpYhJCNrDxBY69ApOT6qUqUY/St7r+XSMsEHk30E3O
eeLlplzTyyp5CDX2LshQi4FLxKl736wzUbb89IqERxzu7rjout/fE6nrpU7x
BgSCLCTRTytzxarcDfc/+e7YcLHcYOBiBZzP6txeYrHQlTH9pyk2DpnP3r8M
8YqFqMt8ENmyFQ/1vVfE+gIwG/4x/bkcDZdKPc7O5FOgQaDlJX65BgNnntdn
R9vRkR+p+FtsANI9nOQk4Xhk+3R9dzQvhwBXl8MUHxlSMhVXyTcKYRj35CQj
Mg2yt9dNt/JHoe80uw+Lm4KbA1f2N08z8C9f2eoREh1EWX/9n0wPRDTbi1/6
66H91syGAcRATyWetNMmBLvymu7mvKFgs35TOvemEnxVmBr5NEYB8ZglP2s6
FPWW49skDCjg+/ZBwZM9CimkhLmgolyY7lLbLDHZCrZvW13cbCJR3c6KNW4p
woJpk+Dm/CaQZ+vmBONdUfBajPNMdiVKMzMEX0tVoc2nU9fL3w+cAfP8B/Vr
4Hyr1ZC5MREXhtLTy6UKID5r3vCNnotbmy5PRXxgQlXdRXtSKxOGQn6cW/Ko
iBz1H33MKMXyYb/sa+xMXG2lyi2yRSKUMS5gdr8YuSMTa9Weu6Kye9i2ndmD
S2y2twkPasC8WfSk+k8uxDiEKbNj1SguPikgMliECTma7B75MqSrvmtYgRt8
o0ROu4o2wPW2Y3gUeyC+yM69fhqQBeVkVyOGQAT2ptMVC3UooPZnsAdwMRBH
PzBk/SMOVkt3FH6dDINfm+cWliwVwitiFuKPi2A2IRX4kpOKh3memcnzNcix
9LfrPVCK3TKq8s75Fejtf3rEb7EEvd+NVmxcS8FUKsyx25yFsY6KKuqRUITq
tsiLbwwGf2WK/nWNRGB6tIjAyULrUmd3vxcF+qrqr0VP1+HT/moti6/RMGYI
q+/9QsOvU40anrs88dBuZvbxUyYK7Jv0ltaXIyh5tJU+nQjbvvzV9oVofNA4
Eudn2YkbcZ5M5Zhc2L56L3Z8qgQrlr+NiRUJ2Hokedy2Px0M0ZS+i8dL8C6i
UiF42yOcbzSd56HHY27GFUq3achvI7QILjBgp+BiZhETgqcKLKXny8EgXhXU
ui7zAr6bZQgLPo4o8NkSamUVAsvyn8dred1Rsz3nm2S6P+pXLNpk6hh4ZukW
GrY1Dm+GlTd5PYqGguQsIXkoGOotYyfM9ncjnP+87tDuVIwpB3TUkmKhzXgZ
axBJwzpSkNHPwyRoEs2N24ZZ6I2vlNVYfQJ98aIah6YwHD2pZt3/rz9mBgtm
dZixqDCwvJrvXgKB7Y9cm3zj0bxIFspzSYKFskm1SqQr2qYO7Z0so8Dgvr3d
2q466J2nmhsk1EMtYae23J0y9NJ5tu5czENDVB7/A/9qiAwpmFQP0CE9vnzh
4dJT8AuHWZxaZYCTIJ/180wcJpjrw7hr6QjqyhpdGCShzvTp1ihWEpQiEyLX
1LWC0kW8c8o4CJPu7pPyL/zxXVRs1WORhbNCq8JFaUxwp79Znx4dA3vZaGvL
MNb/eD481uqzM/sljnm3vLMjXcWSSb3YvYgC2Aw7pN+yZGFvvtS7Dtv7EP58
mp05noo/SkIi07fCYMv0mbe6UQurhiPcQrQwFHj/MkyzSoWSWDrPeyUK1i1J
L0o6OmE7p6Co0mIqCvn/LMuYd0JO12to211PkLeoJpxl+OPEHu36gec0PPdx
6vi5XAUvPwf620fh4C6kRvkeSoEih8kAqZQGt51L1MO8vSBzxbbU8xWB9Zsa
mF7qhuYffd2nnRlQ/ije9bsmBtscvyT4/GJgsSaOLKobBBr8TeM2lv/9O5W1
02zVeD9iLdzzngZlnhnV3s4QdMbUXefc5grRvQc3Xk5Jwp77fFrLHam4e/F9
Tsg/vgg7eCYzuC8aj/LrDX3bqEgQowUp5vigl3vuV7yhO5Ja3EZSLYJQwaG9
q8PXGa9atzeoiEchW7X6/XFfd7hsuL+oHOaOqVVd/qzJCJw+piXfHdOLnNWA
2BinSpyfIByQPJKBsM7Q/qM/BvBwufawWLc/iISFX3fpgRg0V+q8UJUAQpqF
eJiCE5amL178AyY6RzKssi0S8HmMJ/whRyCijP6YHbXzxWijgs3MUTJG53jI
eSwSEqyqFD6luCGGR93v1m4G+ubWsHeOOiI5SzbKdioIn5rc62tP+EDukh4p
e9UNEg6O4oHRj3FKPyRy7m8f6+Wt2UVP1INjv7s192g5dE9UWNIEx0DcpC9S
RvIBcV5ivCeWgaWYEo/U7SGobsjpF+uhYDa1n/g7OAl0QWKOs2UyjIP39Iov
U1ASXMx/q9sXa5+M8d3TJKPtRtLJwxXeoG7g+P0m6u9+x57rYz8RBMmxkMxm
k6voOym6R0ExGvbiKjkaZBIchx8el9J0x/CGlONpRhXQWbCn7A5uBtvL7wJG
hBA4XTGJiNudBPP1fhqnzCeQpZenaHnDBx+tDfeU6KRBy9GszfFBPubX55pJ
faHDIOcG16OCZGSL7K1xG0gEKfCIzKpNANZIBRRW8lDhYPGWKnGIjHV5NMs1
qiTEia7+Ux3vhkCvrFNiRqGIqBsZvhV7DdLZPyaqgqgQq3o/Oz3ojGXqtHPu
XndITDhu727Ih+FH8q9hw3aIyntt2SWYC7XkCq/acAo61hp3zwiP4r9XZheY
pj54vbYxkWRYCNXkCIpbdg6If9RlhbYEQ+vToIDi8j38GlebaTO7AwXCa/+Q
/+IA7u16qd6R+Hi3UMU0OgD/feOtvWzmhomEwbqWNe7Q75wu7NJIwIzTu5XY
EW90ecqe1NcORkF6d5CmiBuGp81ty/r+/i76587K1Qewa9VMVqe+wAa1zIwn
B1rR2LDr2BelKuh8XNbe+4GF8rs139z+eq1wLk13ozIN53c4tztp+aPxRcj+
RaIz0o3OOxvaZWJr4wtvtokJuBe/t2qf84d+Qt1cxaWbYLncLJTjpsLGgeuf
4AU6nL34hqNivLF7wilDSbwMWdKzmqucMUhR4T15zTcMbQuMzJZcF3hOXzv7
mZCBssY8RiolFmvze6QrDWJgm6D9cX9B2P94Ev47ZyDJ1oSaQcbzyxo++D9e
v5Bp
"], {0.031994942508203575`, 0.030061188393528497`,
0.011560798055929288`, 0.07374870870164023, 0.07044850977580157,
0.019386559530178024`, 0.020472758868830106`, 0.021731581745667403`,
0.010519570384340607`, 0.010649655387132233`, 0.02880192763995277,
0.009055812859941047, 0.01874320785280898, 0.008033183641307617,
0.008892766796585376, 0.06941804109371524, 0.13442003595646884`,
0.08327946370400675, 0.04452466338244736, 0.27631742247289603`,
0.017939201248617927`}}]]], "Output",
CellChangeTimes->{
3.5316147892594643`*^9, 3.531614848354909*^9, 3.531615686153913*^9,
3.53161609681293*^9, 3.5316165784832153`*^9, 3.531622867149292*^9,
3.5316270390623198`*^9, 3.5316295261202383`*^9, 3.531630115731564*^9,
3.531713251970915*^9, 3.531776067575654*^9, 3.531790200919943*^9,
3.531790879208127*^9, 3.532036627503133*^9, 3.532039842501646*^9,
3.532054644558632*^9, 3.532124851586048*^9, 3.5420646297607613`*^9,
3.544839544215102*^9, 3.5448492082894917`*^9, 3.5449089530969353`*^9,
3.545943794207575*^9, 3.5459443716475286`*^9, 3.545958494473638*^9,
3.545967535420192*^9, 3.54597169437216*^9, 3.5459725945278482`*^9,
3.545972676380354*^9, 3.5459727305065193`*^9, 3.545972839130014*^9,
3.545972943437286*^9, 3.545973034770153*^9, 3.545973088395207*^9, {
3.545973156257985*^9, 3.545973182136806*^9}, 3.545977482757964*^9,
3.546030311600095*^9, 3.5460303826147842`*^9, 3.546030763934485*^9,
3.5466706131038303`*^9, 3.546671106471393*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"1", "-",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.8", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "/",
RowBox[{"escoreOnodera", "[", "0.8", "]"}]}]}]], "Input",
CellChangeTimes->{{3.546670639288732*^9, 3.546670658961025*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"-", "0.00015450166313146774`"}], ",",
RowBox[{"-", "0.00003953404951761996`"}], ",",
RowBox[{"-", "0.00006903598004215361`"}], ",", "0.000017509130301851528`",
",", "0.000021152933973422883`", ",", "0.00017743526673419385`", ",",
RowBox[{"-", "0.00013477620078683472`"}], ",",
RowBox[{"-", "0.00007279087286704566`"}], ",", "0.000040837990436637384`",
",", "0.00003235801575274255`", ",",
RowBox[{"-", "0.00006693194280438242`"}], ",", "0.0004621567393987558`",
",",
RowBox[{"-", "0.00017117677742684023`"}], ",",
RowBox[{"-", "0.0003964684069261981`"}], ",",
RowBox[{"-", "0.00031122571264052823`"}], ",", "0.00002821818330100978`",
",",
RowBox[{"-", "2.6749344472776215`*^-7"}], ",", "6.439673309932559`*^-6",
",",
RowBox[{"-", "0.00010474803340865257`"}], ",", "9.328051186918707`*^-6",
",", "0.000044523488409886625`"}], "}"}]], "Output",
CellChangeTimes->{{3.54667065544363*^9, 3.546670659793502*^9},
3.5466711065657187`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.8", ",", "50"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.8", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.545973039894758*^9, 3.54597304369166*^9}, {
3.5459730928582697`*^9, 3.545973096961998*^9}, {3.546670620100531*^9,
3.546670624116172*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "4", ",", "5", ",", "13", ",", "12", ",",
"11", ",", "18", ",", "17", ",", "10", ",", "19", ",", "14", ",", "21",
",", "20", ",", "6", ",", "2", ",", "3", ",", "7", ",", "1", ",", "15"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.545973044043651*^9, 3.545973097589384*^9, {3.545973163392593*^9,
3.545973171338997*^9}, 3.545977482908741*^9, 3.546030311633621*^9,
3.546030382704801*^9, 3.5460307676310587`*^9, 3.546670624931786*^9,
3.546671106623784*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["citingcited21DataZeroSelf alpha=0.9", "Subsection",
CellChangeTimes->{{3.531615401329467*^9, 3.531615428671876*^9}, {
3.5316160601495237`*^9, 3.531616064635243*^9}, {3.545972629109356*^9,
3.545972669880958*^9}, {3.545972934049431*^9, 3.5459729344034023`*^9}, {
3.5459730205185947`*^9, 3.5459730208687*^9}, {3.545973144320849*^9,
3.545973144748294*^9}, {3.545973195372752*^9, 3.5459731959166594`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{
RowBox[{"escoreOnodera", "[", "0.9", "]"}], "=",
RowBox[{"{",
RowBox[{
"0.03110", ",", "\n", "0.03003", ",", "\n", "0.01084", ",", "\n",
"0.06584", ",", "\n", "0.05699", ",", "\n", "0.01820", ",", "\n",
"0.01824", ",", "\n", "0.01714", ",", "\n", "0.00802", ",", "\n",
"0.00831", ",", "\n", "0.02577", ",", "\n", "0.00765", ",", "\n",
"0.01391", ",", "\n", "0.00608", ",", "\n", "0.00616", ",", "\n",
"0.07399", ",", "\n", "0.14988", ",", "\n", "0.09206", ",", "\n",
"0.04796", ",", "\n", "0.29780", ",", "\n", "0.01403"}], "}"}]}],
"\n"}]], "Input",
CellChangeTimes->{{3.5466707308266497`*^9, 3.546670758320457*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"0.0311`", ",", "0.03003`", ",", "0.01084`", ",", "0.06584`", ",",
"0.05699`", ",", "0.0182`", ",", "0.01824`", ",", "0.01714`", ",",
"0.00802`", ",", "0.00831`", ",", "0.02577`", ",", "0.00765`", ",",
"0.01391`", ",", "0.00608`", ",", "0.00616`", ",", "0.07399`", ",",
"0.14988`", ",", "0.09206`", ",", "0.04796`", ",", "0.2978`", ",",
"0.01403`"}], "}"}]], "Output",
CellChangeTimes->{3.5466707599365807`*^9, 3.5466711066897697`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citingcited21DataZeroSelf", "\[Equal]",
RowBox[{"Transpose", "[", "citedciting21DataZeroSelf", "]"}]}]], "Input",
CellChangeTimes->{{3.5316156164252577`*^9, 3.5316156538025293`*^9}}],
Cell[BoxData["True"], "Output",
CellChangeTimes->{3.531615654752637*^9, 3.5316160965770607`*^9,
3.531616578226493*^9, 3.531622866935899*^9, 3.531627038832384*^9,
3.531629525788817*^9, 3.531630115500861*^9, 3.5317132517316723`*^9,
3.531776067360773*^9, 3.5317902006820374`*^9, 3.531790878966517*^9,
3.532036627291301*^9, 3.532039842303135*^9, 3.532054644372273*^9,
3.5321248513591557`*^9, 3.542064629402264*^9, 3.544839543987646*^9,
3.5448492080288363`*^9, 3.544908952888349*^9, 3.545943793924391*^9,
3.5459443714484053`*^9, 3.545958494223563*^9, 3.5459675352004223`*^9,
3.545971693933075*^9, 3.545977482925749*^9, 3.546030311655251*^9,
3.5460303827811737`*^9, 3.5466711067382507`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.9", ",", "50"}], "]"}], "=",
RowBox[{"eigenPageScore", "[",
RowBox[{
"citingcited21DataZeroSelf", ",", "0.9", ",", "issues21", ",", "50"}],
"]"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.5316146555089617`*^9, 3.5316146696098557`*^9}, {
3.531614717704935*^9, 3.531614788447893*^9}, {3.5316156826133413`*^9,
3.531615685077396*^9}, {3.5459725918485327`*^9, 3.545972592780774*^9}, {
3.545972675649304*^9, 3.545972675999378*^9}, {3.545972713512555*^9,
3.545972729507135*^9}, {3.5459728302229424`*^9, 3.545972830727516*^9}, {
3.545972938853265*^9, 3.545972942983787*^9}, {3.545973028695661*^9,
3.545973033706944*^9}, {3.545973080140368*^9, 3.5459730868593407`*^9}, {
3.5459731549178057`*^9, 3.5459732057670097`*^9}, {3.546030775012808*^9,
3.5460307840278893`*^9}, {3.546670833276675*^9, 3.54667083897268*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{GridBox[{
{"0.004257944760017305`"},
{"0.07172094029641417`"},
{"0.08204311490189767`"},
{"0.016248268275113588`"},
{"0.013957683648710417`"},
{"0.00797490567371519`"},
{"0.005546012298363109`"},
{"0.0037961453150104295`"},
{"0.002786331520332111`"},
{"0.004157603375173947`"},
{"0.08219208154051076`"},
{"0.015775074124318805`"},
{"0.00711938846856411`"},
{"0.005154425409615169`"},
{"0.004688018859514835`"},
{"0.008833107583180665`"},
{"0.014338015635930602`"},
{"0.023922277190213722`"},
{"0.030140580770783937`"},
{"0.592160155885814`"},
{"0.003187924466805375`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.09828543447773797`"},
{"0.003416644568812717`"},
{"0.020306699772217083`"},
{"0.061593263443247455`"},
{"0.01274518133651295`"},
{"0.04785781480813669`"},
{"0.023508579532956476`"},
{"0.00429428687509462`"},
{"0.00237032703797314`"},
{"0.014423350165666163`"},
{"0.05458731741241628`"},
{"0.004233619462276013`"},
{"0.004929166744897353`"},
{"0.0021726450625034026`"},
{"0.002296034127650355`"},
{"0.020551185702705428`"},
{"0.10022770504327382`"},
{"0.019907183038696583`"},
{"0.07610941659454369`"},
{"0.4230273795868047`"},
{"0.0031567652058771298`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.24934333795624172`"},
{"0.061436961783084595`"},
{"0.00160877028931906`"},
{"0.016320471486397054`"},
{"0.01395511802018713`"},
{"0.0077235234784055855`"},
{"0.0043503992910197`"},
{"0.0039211983076716155`"},
{"0.008329811789571095`"},
{"0.0032516641461766485`"},
{"0.16238591380094777`"},
{"0.021185700960303977`"},
{"0.005395288742624503`"},
{"0.0036814164983981403`"},
{"0.0024578824570707274`"},
{"0.010970165455440233`"},
{"0.017395597352626326`"},
{"0.048541026422175136`"},
{"0.03482992283362684`"},
{"0.31978306098425086`"},
{"0.003132767944461288`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00808555216388316`"},
{"0.029759107515332762`"},
{"0.002981627334602852`"},
{"0.009644024507683072`"},
{"0.21837071540521905`"},
{"0.06011217969857804`"},
{"0.08503124896611056`"},
{"0.052349080088707305`"},
{"0.003193705028618336`"},
{"0.02665730849548753`"},
{"0.023046983820788593`"},
{"0.00655051428617762`"},
{"0.006156771628189772`"},
{"0.0020030285738022735`"},
{"0.002609725950505078`"},
{"0.01719847680764283`"},
{"0.02244482813705744`"},
{"0.02305068669152443`"},
{"0.012111767004062565`"},
{"0.3796789783320566`"},
{"0.008963689563970114`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.007969856930509878`"},
{"0.004380949154029649`"},
{"0.0022098094485981067`"},
{"0.2706337209792383`"},
{"0.010741455108791221`"},
{"0.02599230489041719`"},
{"0.03178667214126596`"},
{"0.12384028005200191`"},
{"0.023346848560854443`"},
{"0.014113280362663343`"},
{"0.024494555352272896`"},
{"0.00962605115538469`"},
{"0.029939444943014468`"},
{"0.013693937523160405`"},
{"0.015441242007438447`"},
{"0.015983945362953243`"},
{"0.010054461220007709`"},
{"0.010670143090286043`"},
{"0.006515357683951192`"},
{"0.21488551728225125`"},
{"0.1336801667509097`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01786982879197135`"},
{"0.08708058855947783`"},
{"0.007209703778233879`"},
{"0.21908662391527664`"},
{"0.07575806044044905`"},
{"0.002267770163710206`"},
{"0.0392280393963153`"},
{"0.016920439058221045`"},
{"0.0046470821322772485`"},
{"0.017723694442254866`"},
{"0.08803359731495074`"},
{"0.012770284633892405`"},
{"0.0070773700970735865`"},
{"0.0027581324103926443`"},
{"0.0022127921996652356`"},
{"0.018846463639736855`"},
{"0.048372907108347095`"},
{"0.021666279907715368`"},
{"0.0146614722951902`"},
{"0.2898581403449878`"},
{"0.005950729369860646`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.009828336541097452`"},
{"0.03645726789973734`"},
{"0.002570157703312588`"},
{"0.3549234866334175`"},
{"0.11025919050732716`"},
{"0.03423390167899501`"},
{"0.0026065511995645553`"},
{"0.04643967902425565`"},
{"0.016532003944949646`"},
{"0.03773359334751838`"},
{"0.01634797476067487`"},
{"0.003958422408621313`"},
{"0.005615994088667839`"},
{"0.0023347514647393294`"},
{"0.0024275600238740877`"},
{"0.07226901460433473`"},
{"0.026190672656607496`"},
{"0.014482008735814926`"},
{"0.015235883724630871`"},
{"0.18466093491224167`"},
{"0.004892614139617614`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0046742762161717695`"},
{"0.00488285534918279`"},
{"0.0018259867012257376`"},
{"0.2241271298978681`"},
{"0.44600694183445494`"},
{"0.019264954395407714`"},
{"0.07296656728966915`"},
{"0.0036720771517494517`"},
{"0.057951130986635374`"},
{"0.028732818655161568`"},
{"0.01095241879458324`"},
{"0.006876755965351089`"},
{"0.013487657798859725`"},
{"0.009759326350744587`"},
{"0.002955397246955282`"},
{"0.022431322441161985`"},
{"0.008603587663735158`"},
{"0.005816566301034153`"},
{"0.004201460270577437`"},
{"0.0453927485481971`"},
{"0.005418020141273638`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.008362468364109503`"},
{"0.004692374878192724`"},
{"0.013922341101595653`"},
{"0.03776555784923367`"},
{"0.1965543479967488`"},
{"0.01275094531470244`"},
{"0.059958948586474464`"},
{"0.14183921631112328`"},
{"0.001927398082371495`"},
{"0.08807883637410911`"},
{"0.08799592925954719`"},
{"0.005881343618491431`"},
{"0.10175151508659325`"},
{"0.023301126163704312`"},
{"0.054796678965687046`"},
{"0.04097722782884813`"},
{"0.013713483494537784`"},
{"0.03312885271124218`"},
{"0.004648679848742216`"},
{"0.0487290227102518`"},
{"0.019223705453693472`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01006049202684746`"},
{"0.06101493584323721`"},
{"0.0023563377286039268`"},
{"0.2794802716400302`"},
{"0.09525217419747092`"},
{"0.047691391712638295`"},
{"0.10167703612955427`"},
{"0.05881407541138081`"},
{"0.06878128622413243`"},
{"0.0021057068289346966`"},
{"0.12736822246323146`"},
{"0.008496651524139826`"},
{"0.037751079833545795`"},
{"0.01286282094300694`"},
{"0.00625275876128602`"},
{"0.009123741368374214`"},
{"0.01158841884842241`"},
{"0.00686339698892781`"},
{"0.004394532456544985`"},
{"0.04256103079111008`"},
{"0.0055036382785802335`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.10425932796240747`"},
{"0.06422913765280078`"},
{"0.07999899934763488`"},
{"0.05597853817372268`"},
{"0.05564435430100102`"},
{"0.03905403773038056`"},
{"0.010050946463479572`"},
{"0.007518762998822596`"},
{"0.023140189938075824`"},
{"0.03259287071075388`"},
{"0.004019594981228453`"},
{"0.11356944983468652`"},
{"0.012453003493519322`"},
{"0.008385869806534767`"},
{"0.003105047504842963`"},
{"0.015411977816030532`"},
{"0.06449664099209623`"},
{"0.019248910811948475`"},
{"0.012503746589510659`"},
{"0.22860598667862914`"},
{"0.04573260621189365`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0625804776243017`"},
{"0.02066345071582253`"},
{"0.03188094210935239`"},
{"0.05444128427439294`"},
{"0.13682921663443462`"},
{"0.01970898475360097`"},
{"0.006966854847037246`"},
{"0.014031269893834252`"},
{"0.010536914838527764`"},
{"0.009993135082961728`"},
{"0.29699311840281706`"},
{"0.0015549538736374924`"},
{"0.007740934396277769`"},
{"0.002946797369713541`"},
{"0.005436107964242969`"},
{"0.009864831968240714`"},
{"0.010610664360446519`"},
{"0.010422117059415509`"},
{"0.007510127298807215`"},
{"0.25332022182830094`"},
{"0.02596759470383416`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.01493672616033799`"},
{"0.005917980752671616`"},
{"0.0024425490172720263`"},
{"0.0250047941495858`"},
{"0.1623288415331632`"},
{"0.011311062520738532`"},
{"0.004787203257287698`"},
{"0.015826005532294615`"},
{"0.06449287109145756`"},
{"0.019871607416855595`"},
{"0.021817563981762926`"},
{"0.0023887326015904586`"},
{"0.0040749466162370365`"},
{"0.11577725980857342`"},
{"0.12292857897268995`"},
{"0.06453298485597622`"},
{"0.042302348828878886`"},
{"0.09621071689013751`"},
{"0.006956773509482811`"},
{"0.18127046977316058`"},
{"0.014819982729845535`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.015881933978346145`"},
{"0.007661927587680641`"},
{"0.0026195519604780898`"},
{"0.01500116736482593`"},
{"0.1951080319281982`"},
{"0.008332460190664385`"},
{"0.004931349043230324`"},
{"0.0326815111140136`"},
{"0.021334406168624868`"},
{"0.016660962893624724`"},
{"0.03131070010252225`"},
{"0.0015549538736374924`"},
{"0.3401598522766144`"},
{"0.0016137109042441834`"},
{"0.055629287474276805`"},
{"0.02742978824318431`"},
{"0.0880284369003226`"},
{"0.023609365003417097`"},
{"0.008991378150326674`"},
{"0.09130080943037722`"},
{"0.010158415411390063`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.024742388276409035`"},
{"0.004638193952817728`"},
{"0.0018906663010125242`"},
{"0.018664696881873926`"},
{"0.23569447244017563`"},
{"0.003113458198790599`"},
{"0.004861719293112269`"},
{"0.005739314570834856`"},
{"0.09420135924336544`"},
{"0.012066032575437098`"},
{"0.023752315799770947`"},
{"0.008320458154280633`"},
{"0.312563148746118`"},
{"0.059684289313097806`"},
{"0.0021589370699641314`"},
{"0.00953483693124359`"},
{"0.009123451080955535`"},
{"0.011631232839580268`"},
{"0.006105785380732833`"},
{"0.05427703133153321`"},
{"0.0972362116188939`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.00505838945151258`"},
{"0.008802970305333006`"},
{"0.0022591316011589713`"},
{"0.014974763807293966`"},
{"0.017111660778607787`"},
{"0.00459128322652288`"},
{"0.014235233801009804`"},
{"0.005178469591994032`"},
{"0.004634457559858988`"},
{"0.0024003149445544856`"},
{"0.006154114158549186`"},
{"0.0021052595990404942`"},
{"0.010912078356092512`"},
{"0.0030589582638884303`"},
{"0.0023924001049835867`"},
{"0.0068098421515401025`"},
{"0.3160709815005722`"},
{"0.08273251518118882`"},
{"0.03280452906225888`"},
{"0.45337900801030107`"},
{"0.004333638543738223`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.0054013841841782624`"},
{"0.02067750659292164`"},
{"0.001862434325395723`"},
{"0.011290889480365406`"},
{"0.011127804948354138`"},
{"0.007610325015847923`"},
{"0.004265123743142736`"},
{"0.003715004911700887`"},
{"0.002157646976656466`"},
{"0.002203269919733413`"},
{"0.01271051510957812`"},
{"0.0016095892044847735`"},
{"0.006389143129982592`"},
{"0.004923050944136647`"},
{"0.002244792589867002`"},
{"0.1546179247115956`"},
{"0.008277763045875143`"},
{"0.11719450441783051`"},
{"0.07348785851580579`"},
{"0.545099791712055`"},
{"0.003133676520492188`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.012885759691094144`"},
{"0.008418418828400543`"},
{"0.0072247113293081415`"},
{"0.0148914654794314`"},
{"0.014431369125441965`"},
{"0.006493237612870845`"},
{"0.004380264861363382`"},
{"0.003721210494181552`"},
{"0.004099091817870335`"},
{"0.0021892335110692673`"},
{"0.006107762034592722`"},
{"0.0016728738954745336`"},
{"0.01204928809296694`"},
{"0.0025128510707516215`"},
{"0.0023161637657468526`"},
{"0.07202452756166702`"},
{"0.17003946633507944`"},
{"0.0056174512567863655`"},
{"0.02147597119079988`"},
{"0.6243069783209076`"},
{"0.003141903724195376`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.025764072293516734`"},
{"0.05226941542599405`"},
{"0.010040020710166143`"},
{"0.016143586826718827`"},
{"0.012779196675015718`"},
{"0.005782684984261011`"},
{"0.006113890772657277`"},
{"0.0037023781415817863`"},
{"0.002048602041700833`"},
{"0.0021966097984317`"},
{"0.008337486032336121`"},
{"0.0018428132770446704`"},
{"0.004529461463722054`"},
{"0.0020833762466453687`"},
{"0.002287716276751553`"},
{"0.048057064560805475`"},
{"0.22101343741123775`"},
{"0.04151654896064469`"},
{"0.004038547961647429`"},
{"0.5263474206834696`"},
{"0.0031056694556511064`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.05471132753688531`"},
{"0.04328320116045694`"},
{"0.010110712391661763`"},
{"0.07575332359144385`"},
{"0.021007529896648683`"},
{"0.019093008020495385`"},
{"0.012379318458561158`"},
{"0.004078091578795426`"},
{"0.002353713230769768`"},
{"0.0023168343309986033`"},
{"0.01942784248762318`"},
{"0.004612242509293679`"},
{"0.0071464457568398325`"},
{"0.0026855889916455556`"},
{"0.0024776583951952214`"},
{"0.11452952979110755`"},
{"0.29735597495833843`"},
{"0.19666347975899914`"},
{"0.088197218399737`"},
{"0.016502965764609006`"},
{"0.005313992989894484`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}], GridBox[{
{"0.004685522101212845`"},
{"0.0037687670850913967`"},
{"0.0019860444139033597`"},
{"0.02835682108706434`"},
{"0.6504223091456244`"},
{"0.005386569593607084`"},
{"0.003989889656373655`"},
{"0.004778747917196732`"},
{"0.009648941832196832`"},
{"0.0038411678020224757`"},
{"0.06589255141305363`"},
{"0.016771676898537584`"},
{"0.008904055410916075`"},
{"0.002192197895273443`"},
{"0.03467996660913077`"},
{"0.011815012204358481`"},
{"0.008680188778765063`"},
{"0.007076244538512325`"},
{"0.004038547961647429`"},
{"0.12000183394223525`"},
{"0.0030829437132768554`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[0.7]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.1]},
Offset[0.2]}, "RowsIndexed" -> {}}]},
{"0.031095649968142753`", "0.030032159219443553`", "0.01084002228224625`",
"0.06583431852657144`", "0.056988396757783895`", "0.01820349115678896`",
"0.01824309993241041`", "0.01713450395305856`", "0.008017633444174721`",
"0.008310975580629931`", "0.025768902821376373`",
"0.007648022486923978`", "0.0139088487598054`", "0.00608409061622439`",
"0.006163484461566457`", "0.07398735685306884`", "0.1498859607735898`",
"0.09206473096198975`", "0.04796314419234761`", "0.297800073029298`",
"0.014025134222557956`"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{CompressedData["
1:eJw9luk7FAobxqUyspZCytaCEUKlJM5daXVUUtJq540Yy9izDYMsw9jXRMjI
vk8TIlvZ9yIph2ynUGgReX14r/fD8wfcv+u6f8+9y8RW15ydjY1N8H8nLDCi
32Rnj8BZ9rILt4uhm3CHv4mtDDffknpM0umoSTKLfRsTir/1nJhSej44by2m
b1XhDHKi7qqwiC1Yh/Zfv91jgdJ5KyKdYI+kiUMXg7nKwDncfUFfho7dZA0t
VVlPjK3nCGoXdcKwzoJ79UEyfvU8SBMW9kUp9ccI7tDAL1j+dpt3PFTjG3bL
v0/BX3Vzg7++/YN5OZfpcDErsGnVfj8m+wx1Zp8Fj67cww31TNrZlmjUcp3/
KR1UAPpH+XNSO4Jx5c90c5cPA2IzW7c8FojH3pfs7/6JtYfwKY/0WStTELcJ
aq0E0SC+Q5I0/C0Hz1OkIk/r2+PlfkeJJCVHXBdkzN5pNYbsZPrsrg4T+PZ9
e2bAHYNVY513/oxnCIWNXahJNNq+KUlM3i+BdQ+RNCLwDk2M41ZHhiyhWLBK
vT/dAQtn3HrqWAAF5sjXnFs3IaVLvKBTTgfBaYu6T3QocgP+hJQ89oay2Aer
Z132KEsaycrlt4MRrdpSlZ8CnT9an46lW0ExltbI/7oec7VbrpQWxeBb3LEW
AxFnfE7sI3kSSbBSYsTTdpshe/NEfoBLAJrOf2qU7oyAHOtPhMEgAxJqy2fU
+tKw1VvR8IpLLxTHan+PZlvCkTRlRwz3QbOR1LicWwr2j/suf7a+izLOcT7U
+CF7/MHVyPkWcG9v4eZoysd3mkNaUn0ZLnVPZXq3PcXjkd6rBbJW8GGrKeTV
ToK+p+REakIcMrhEtMp73VGyPbf1zRE31KguNmbdNUIE2WN+xcgcwkSmhnty
BPL8jv/b+DsWwyrfzRMS46DKbTvA2/4AV2gsvmztt7j4UY0n7JYv1By/C/no
+mBDl6vgy6/2cB1btry4wwS6GgdFNut2IbBVreThqj9aBtp5WQ8ToXQ8jqV/
JhW3DtdIrpa8wPC13R7qk3FY9mi0tp4IBW1n7isRwQRM/X2korvcD0Pr6Xsc
GCkgcATsj+AOBXOQfI/xKBxPDhtbbTegY8pgfo4URwWPzcxttUF/CC2/Zh8o
cIcrwgwMKC1w7iVSSaK1UAxbnnTRjoTGs6U3U1rlqO3il/gc6AlD6s12Ancr
hgls10fMSmAzs77/XZQJhFVio4sFM2B4K8w+7koEJkvck7s4yRhN+7VKlI4E
ocoqzyCoHJTmidiLMsEonqjcIrvigUT/jZuPxlvA7Lx8fbikCVLNpuo8tKNA
nhK01qtnYJ5FJRUoxoK5QcanjyMMH8t0iJto3RAI96ppNnQFkV+KbUSSCpJl
9nTA08f4foVtip3PHBT+f1c3V/Sj+NelE9+OVmKD2XHJnYFp2CHA5a930xwW
ZVq8XxuzUJIhsa7+Cx0HKxu1ui6n425bx/qAKjp+DKR8Lj1sB1NFydkWNhcE
6s1IXZU0Rdmi3J3v/5hCwVhjWNWnGFxD27RYXYlQZBy6VM2gYdw8pnjlYDji
V6UO/HzcBN+ikJ1nuRyxMFLkoidFRmZLpA83myMGDYK1qqfvQNsk8PGBwlYQ
5jVKjEKG8E37xiFlVhT2jKkMzeYVQ4i3/e7ENhIqpcvONeTk4R71Vddu64e4
oXe2XpUUADZKtETbPg+Uu+97bfUoBMrq/MnFy344oFjROa1yF3vbZCPUf8au
+VB6pTaFggNuSamiPS7wVNWdCFWxx+jk0liFRhZa83jLDik7I3xJhKIvSQHp
0tnmS6pk0EOYKzp+oVi8Vftm3bV0BCicMioivka1yuLkPrFgZOygO88V54N+
KzfmtcxLeP3LmhGONgS3TnG2Xmg5ontulI8HlGMw/YfMJmFXtD54KGXKw8K0
gN7O40NxEKXL213iy0VIYUfij6UMTLosx3cKhkKr6VOf5vdUKLAxvby4yLi4
rzOPfZ6BgJ1fOI0LorBJ75NxfCIVLC0C9YZGAQxlHBQTLpjiKi1Ddd1oF9w3
815wMGHizHPL8HX3GOj6ayaeQmDhttWHsY+i+cjonvR6klSElGOj1cswxvuq
9cKJF2oQnGKoWWRBQf++UC7Rq+moLDqT2K2/5mHzY9JeyW5weH2z36XAFwc5
nyPneSAEJspEWkQ9EFI3pcvG5gCH6ezD4c2ZmJvPfPI72Hktx7hmVSELKWdz
xHTtC6EjN+XZ6V4K3W4XXtXsXPhuHSqx8szF+CUG79ifdJSu9h2Ii6GCSvwd
+afFCwfsCEP8xXGolorUXF+YiqafrR0Dznb4z+33SqMCVaB9nOlb9AlC5X+C
zZLlKZgeCymotbUEi90rU4cejt4LdVsHfQtRz1UQtFwWBQbZ1omeFIR+BTX2
7yfbULmwLVXTKgu8xXVKZzYWokpYqbSVGAM3Q/JEsW4qpigbDVkfcmDur5Wd
4lcLwlJnVNz+aJzxj3l3JsgDFh/899lUhkKqka/BKNoflapf/jnrQoXvtRzr
2XU9uL95P/u82w1smCOeWCz1RoBZbPPInruw9nolLn/KGcztbnrrD1EhP62n
yf3cH4WLFh+Urvtj33tlh7mXXmiv4dpocbgT44ucrxCXCEb0VwepuDAwTjOG
yBqumJuspJqzmyHDyfnqu8QE2Ic3b1BuqoeqzUfRE/sCUZo+LPQiiYzbG2uO
Fx2i41aFbG/iGo8p1qdV1RvRGG4Sn9XXj4Ww4ChPUIQpXk0oy4wV2qExwnt7
dHoVvpJJunB9AQ4N155j/oVwVgg8n8XIxC+DiCXNNCZYBfo5pV4e4FhXOjV8
sAkN6kcs526EIY1nT+hNTTpO6j7kEDPxRpjn+uMJTuY4zhxOmGGG4WUDsVX7
1yt0fBH9mLSZgjmnwS9jBxzBo90fnPY8Ffbm2+sK3sbAa25FK5I/ApH8U7UL
hNT/8+RTUO9VaOjDXy4No2Z2NzHBbNtrfz8X4ifrvtCEklE7kCjCuebbLsaZ
p7wK8Tgi0XldwMoXrvyJFp6GFfDuqredbaPih91oxJZrCWDnsyvzXnVA31na
fcKSAXL2NCf2i0bB/LhnkLpcO6ZP++81p1jCgDjUNzJFxjRtV8BOXxfYmCjR
osWYMAsiuW8tf4Di7hMzAbrx4LQ/t6LDRQGTSH7Pua4X/vEGNnNh+Uhdofil
FBgjuO2aNFugH6SfyHzUWetT7KRmplh3IJIlbc4Zs7uh/M7ywoHmHEQPjX52
HWNiQlx9206mIx7b03K1CL6Y6tzAXU0xgTQtuFEoJwzCtGIxpn8EBuM/HLrU
7oDucPaq2zI01Jdlvd1w2AmXV1xY0b8d0Bv7+3RPtimSG17Y8am4Yejotgye
tf5/67hzR+BGAHLe+ZSL8FvCdkcFh1qCKSZWLwqmj93HXLLSK4paL8Q/bDi7
qFCG8ms/rtW2pGLhCIep7Ib3GCkS0pCusYcY6TVHnYQzVK9eXrovH4NWV8W0
h34GCK3zeJAnEYi0ssfF8s0BEDg9snmdvDfyu9/YXnS1xy0Jla0zJBLOcNiO
T+Uag5tzOTCOxwTBhEKnn4RgtFIjsNPwJgz4CkJ95NzRaNpjrbzPEbK7dd7m
mJpAznudrH9zHc7qBIbOzPugYqDaz4mtGvc8lnJFOovXOFwUd7IfQQynd0NL
jiVy8xmmA6bBYFGtePI0KAg1Fc9nxHliZmtztpV3GE6q2Ecph9GgdnTbwax4
dxz6rG7OtbZXbKV/5ny9T4KWeFe0SrMdRNueNsvMGsMhinuUvMENL/f8fBp8
9xb6xM0FtPMeQFTKPLM3xgx7yzgXrv8ygZqkKd9Bu2KQJFxtBusawNazIHSF
3QXOpxiE1pUYKBV1peoujSLYqK6Cp8oSEnpPHn0yTkT4cE4IX91TyFA76ofC
qQheeNPwNZCOoMCL1UtywWv/FPkxBS5Q66ngG+FyQ/vP3bvIV0lI2Vv0Vu2V
ERr+jEw8+mOM/tcVpL+2UiARfr/wsrIBnnbk83rQHHB8HWEncYsxbCamdQur
TGDTeJIym8iA0MFeITmtVoQy+VQZJzKhkVDs/CzYDorWDSH9bz7CN7Qzjt/e
Es+f/6ZKrM+FX/S42hHZJxAa8Hz7uZQKB1fTDxFrO8ls2Mdl1TcGahsltonT
omDAZbl65WYQ3ugZGSqV2sG1Q0Vu+zlT/ODsXqxZMoHoT2e7sbEoGDl13Ts/
5gC9rBnruNOecGa5JAuxWUA24hOTQ9sMxlwjjPbLVdj/5svNEUIPbBbm+k/J
v8ZD9tRXwtHl+Hvy9zmZcTrUvmXskqx3gtlLgqakMhnJq7zWeR9IGGS2uG06
bYTi7y94Ijc9xI/Ovx1Odo5BdOaDptpmZzQ/vDdQom+HykJdo5FIMh59HOHp
eemHudWuk34utvjlbhChN1wIviVRxXj5CHy9pCekpe4LVlbgOcNFY/T81RMd
WZuG2/zE7a4HHmBe3/rIv40UPNT6+mXpt8f/eebNaBTaMavBfEdvszhhif8C
5mONXg==
"], {0.031095649968142753`, 0.030032159219443553`,
0.01084002228224625, 0.06583431852657144, 0.056988396757783895`,
0.01820349115678896, 0.01824309993241041, 0.01713450395305856,
0.008017633444174721, 0.008310975580629931, 0.025768902821376373`,
0.007648022486923978, 0.0139088487598054, 0.00608409061622439,
0.006163484461566457, 0.07398735685306884, 0.1498859607735898,
0.09206473096198975, 0.04796314419234761, 0.297800073029298,
0.014025134222557956`}}]]], "Output",
CellChangeTimes->{
3.5316147892594643`*^9, 3.531614848354909*^9, 3.531615686153913*^9,
3.53161609681293*^9, 3.5316165784832153`*^9, 3.531622867149292*^9,
3.5316270390623198`*^9, 3.5316295261202383`*^9, 3.531630115731564*^9,
3.531713251970915*^9, 3.531776067575654*^9, 3.531790200919943*^9,
3.531790879208127*^9, 3.532036627503133*^9, 3.532039842501646*^9,
3.532054644558632*^9, 3.532124851586048*^9, 3.5420646297607613`*^9,
3.544839544215102*^9, 3.5448492082894917`*^9, 3.5449089530969353`*^9,
3.545943794207575*^9, 3.5459443716475286`*^9, 3.545958494473638*^9,
3.545967535420192*^9, 3.54597169437216*^9, 3.5459725945278482`*^9,
3.545972676380354*^9, 3.5459727305065193`*^9, 3.545972839130014*^9,
3.545972943437286*^9, 3.545973034770153*^9, 3.545973088395207*^9, {
3.545973156257985*^9, 3.54597320847223*^9}, 3.545977483191482*^9,
3.546030311875103*^9, 3.546030383008245*^9, 3.546030785261778*^9,
3.546670839957519*^9, 3.5466711068203087`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"1", "-",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.9", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], "/",
RowBox[{"escoreOnodera", "[", "0.9", "]"}]}]}]], "Input",
CellChangeTimes->{{3.546670869295987*^9, 3.546670888018771*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"0.00013987240698531966`", ",",
RowBox[{"-", "0.00007190207937224358`"}], ",",
RowBox[{"-", "2.0555577722181084`*^-6"}], ",", "0.00008629212376287665`",
",", "0.00002813199186002535`", ",",
RowBox[{"-", "0.00019182180159105222`"}], ",",
RowBox[{"-", "0.0001699524347813508`"}], ",", "0.00032065618094734294`",
",", "0.0002950817737253919`", ",",
RowBox[{"-", "0.0001173983910869314`"}], ",", "0.0000425758099972251`",
",", "0.00025849844130998445`", ",", "0.00008276349350111456`", ",",
RowBox[{"-", "0.0006727987211168074`"}], ",",
RowBox[{"-", "0.0005656593452041392`"}], ",", "0.00003572302920884507`",
",",
RowBox[{"-", "0.00003977030684398919`"}], ",",
RowBox[{"-", "0.00005138998468123823`"}], ",",
RowBox[{"-", "0.00006555863944135432`"}], ",",
RowBox[{"-", "2.4522934172210853`*^-7"}], ",", "0.0003468123622270003`"}],
"}"}]], "Output",
CellChangeTimes->{{3.5466708779013157`*^9, 3.546670888909731*^9},
3.546671106892047*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"eprZ", "[",
RowBox[{"0.9", ",", "50"}], "]"}], "=",
RowBox[{"Ordering", "[",
RowBox[{"Ordering", "[",
RowBox[{
RowBox[{
RowBox[{"epsZ", "[",
RowBox[{"0.9", ",", "50"}], "]"}], "[",
RowBox[{"[", "2", "]"}], "]"}], ",", "All", ",", "Greater"}], "]"}],
"]"}]}]], "Input",
CellChangeTimes->{{3.545972734049987*^9, 3.545972836044528*^9}, {
3.545972871250196*^9, 3.545972881384905*^9}, {3.54597294857801*^9,
3.545972955024806*^9}, {3.545973039894758*^9, 3.54597304369166*^9}, {
3.5459730928582697`*^9, 3.545973096961998*^9}, {3.5459732137077103`*^9,
3.545973218514949*^9}, {3.545973255400517*^9, 3.5459732601142597`*^9}, {
3.546670847516926*^9, 3.546670852092683*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "5", ",", "6", ",", "12", ",", "11", ",",
"13", ",", "18", ",", "17", ",", "10", ",", "19", ",", "15", ",", "21",
",", "20", ",", "4", ",", "2", ",", "3", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{{3.545972745070322*^9, 3.545972802329175*^9},
3.5459728424626827`*^9, 3.545972883096496*^9, 3.545972955261676*^9,
3.545973044043651*^9, 3.545973097589384*^9, {3.545973163392593*^9,
3.545973171338997*^9}, 3.545973219254294*^9, 3.5459774832089357`*^9,
3.546030311908402*^9, 3.5460303830966883`*^9, 3.54603078954641*^9,
3.5466708530660686`*^9, 3.546671106950718*^9}]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Chek", "Subsection",
CellChangeTimes->{{3.545973245907465*^9, 3.545973246652129*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.9", ",", "50"}], "]"}]], "Input",
CellChangeTimes->{{3.5466710145354443`*^9, 3.54667101507819*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "5", ",", "6", ",", "12", ",", "11", ",",
"13", ",", "18", ",", "17", ",", "10", ",", "19", ",", "15", ",", "21",
",", "20", ",", "4", ",", "2", ",", "3", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{3.545973264247458*^9, 3.545977483226006*^9,
3.5460303119299*^9, 3.546030383123394*^9, 3.546030794364159*^9,
3.546671107000141*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.8", ",", "50"}], "]"}]], "Input",
CellChangeTimes->{{3.546030891073947*^9, 3.546030899930382*^9}, {
3.546671017550126*^9, 3.5466710180300913`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "9", ",", "16", ",", "4", ",", "5", ",", "13", ",", "12", ",",
"11", ",", "18", ",", "17", ",", "10", ",", "19", ",", "14", ",", "21",
",", "20", ",", "6", ",", "2", ",", "3", ",", "7", ",", "1", ",", "15"}],
"}"}]], "Output",
CellChangeTimes->{3.546030901215538*^9, 3.546671107050797*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.7", ",", "50"}], "]"}]], "Input",
CellChangeTimes->{{3.5460309186403437`*^9, 3.5460309331665382`*^9}, {
3.546671020946947*^9, 3.546671021348366*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "18", ",", "4", ",", "3", ",", "15", ",", "13", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"19", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "14"}],
"}"}]], "Output",
CellChangeTimes->{{3.5460309266902437`*^9, 3.546030934349687*^9},
3.546671107101532*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.6", ",", "50"}], "]"}]], "Input",
CellChangeTimes->{{3.5460309435055437`*^9, 3.546030953000017*^9}, {
3.546671023573997*^9, 3.546671023957901*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "20", ",", "12", ",", "21", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{3.546030953897167*^9, 3.54667110715209*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"eprZ", "[",
RowBox[{"0.5", ",", "50"}], "]"}]], "Input",
CellChangeTimes->{{3.545973270848626*^9, 3.545973271276124*^9}, {
3.546671026269915*^9, 3.546671026629754*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"8", ",", "10", ",", "19", ",", "4", ",", "3", ",", "15", ",", "14", ",",
"11", ",", "17", ",", "16", ",", "9", ",", "21", ",", "12", ",", "20", ",",
"18", ",", "6", ",", "2", ",", "5", ",", "7", ",", "1", ",", "13"}],
"}"}]], "Output",
CellChangeTimes->{3.545973271514847*^9, 3.545977483243143*^9,
3.546030311949183*^9, 3.5460303831426497`*^9, 3.5460307969296427`*^9,
3.5466711072020893`*^9}]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Export", "Section",
CellChangeTimes->{{3.427765283431046*^9, 3.427765285605254*^9}}],
Cell["citationmatrix for execl", "Text",
CellChangeTimes->{{3.430686932121333*^9, 3.4306869443569107`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SetDirectory", "[", "dir", "]"}]], "Input",
CellChangeTimes->{{3.431753840053108*^9, 3.431753882330679*^9}, {
3.479018114999421*^9, 3.4790181198327227`*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/SOC-pca-cosine\"\>"], "Output",
CellChangeTimes->{
3.431753884047604*^9, 3.431822270214924*^9, 3.431840416311063*^9,
3.431898460877925*^9, 3.4319986307924147`*^9, 3.432003306082143*^9,
3.432098627596549*^9, 3.432100610649802*^9, 3.4321781316869087`*^9,
3.432249845453945*^9, 3.4322549848763247`*^9, 3.4322558253620377`*^9,
3.432256171331945*^9, 3.432333075330744*^9, 3.432335527283103*^9,
3.432339336363257*^9, 3.4323578233970413`*^9, {3.432361208576441*^9,
3.43236123538824*^9}, 3.432362075218032*^9, 3.432457239564933*^9,
3.4338087388181562`*^9, 3.4338093034995613`*^9, 3.4352778787396193`*^9,
3.4353651815459223`*^9, 3.435376748864759*^9, 3.4790182716741467`*^9,
3.489811955129053*^9, 3.522557922782896*^9, 3.522558331846219*^9,
3.5225589760822687`*^9, 3.5315311888993893`*^9, 3.531534146143635*^9,
3.531614509038192*^9, 3.5316228674136953`*^9, 3.531627039388501*^9,
3.531629526353795*^9, 3.531630115960643*^9, 3.5317132522955*^9,
3.531776067844986*^9, 3.531790201196436*^9, 3.5317908795260897`*^9,
3.53203662776681*^9, 3.532039842697812*^9, 3.53205464492785*^9,
3.532124852272332*^9, 3.5356086763764353`*^9, 3.5370974459230328`*^9,
3.537408801691601*^9, 3.5374369251155376`*^9, 3.537520516188225*^9,
3.5375249952150087`*^9, 3.537528525697711*^9, 3.537848720276347*^9,
3.5379390555788403`*^9, 3.540983991368681*^9, 3.541051024917914*^9,
3.546671107251027*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"exportHeading", "=",
RowBox[{"Prepend", "[",
RowBox[{"ClNames", ",", "\"\<Cited-Citing Matrix\>\""}], "]"}]}]], "Input",\
CellChangeTimes->{{3.427765330206729*^9, 3.427765370269525*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"Cited-Citing Matrix\"\>", ",", "\<\"B-1\"\>",
",", "\<\"B-2\"\>", ",", "\<\"B-3\"\>", ",", "\<\"C-1\"\>",
",", "\<\"C-2\"\>", ",", "\<\"Ca\"\>", ",", "\<\"Cp\"\>",
",", "\<\"E-1\"\>", ",", "\<\"E-2\"\>", ",", "\<\"E-3\"\>",
",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>", ",", "\<\"I-1\"\>",
",", "\<\"I-2\"\>", ",", "\<\"I-3\"\>", ",", "\<\"M\"\>",
",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>", ",", "\<\"Me-3\"\>",
",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>", ",", "\<\"Q\"\>"}],
"}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVzVtM0mEAhnFy1jKEtaY51gR1pc11pMEcLeaXRXRwugZUyKZAByrK5haY
ZSS2FKVYlM21rNS1ykxqzrBaiGm07KbSpTRsg7jw+9OGlE22jPVy8ex3+eTq
qvcfWcRisWTI+VTtiNkouTPTu3we6gtM23JbKPleLwzKYDyaKZLDIgE3lnGN
kmVh6egWmBIeHPPC4n/+ySD8c/BvldhByWv2Z34llDc3hvRQ+skpuwzVU8rN
TVDWzim3XqfkUc3ZK3YoMHw190HlME/hhs9PdjwZh05z4maqkxLzt9LpJfDd
+jaDKOkHZZUY1va0SjRwatAltcCCE2PDDdCh2FRohTde1oQewjCXyXgMEwvp
sR6oy/o13w9/VGffG4Cz9gb2C5gX2toYhj51vbG2jRKOlvd+ZzsllQOvjp2B
G1xdHBPM+x3X90co8QaOenazGDKiOrTgkTLkvvb8xiHoiqdcSupe22EKlDHE
EtkxMw3lts41i8sZ8tZ5WpIG+SM/S9jwdt/HunTo41lGk67TtWpEUFJ8YakC
cnvzo2po3RUrqYDCrnPbx6E/oJqYgIVZd7kBKM62qRLw4qqrxu4DDPGUDWnq
1Aw55Ss6vKKCIbdWPxDkwKCxaVYORXZDzl44GXH790EvTRNSOJc/V5qpwa8l
ujKsZUizl/8lVceQPc+Os94YGfIfQ3AijA==
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedcitingDatawithClNamesExport", "=",
RowBox[{"Prepend", "[",
RowBox[{"citedcitingDatawithClNames", ",", "exportHeading"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.4277653842518044`*^9, 3.427765429435256*^9}, {
3.4299350138221083`*^9, 3.429935026842104*^9}}],
Cell[CellGroupData[{
Cell[BoxData["citedcitingDatawithClNamesExport"], "Input"],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"Cited-Citing Matrix\"\>", ",", "\<\"B-1\"\>",
",", "\<\"B-2\"\>", ",", "\<\"B-3\"\>", ",", "\<\"C-1\"\>",
",", "\<\"C-2\"\>", ",", "\<\"Ca\"\>", ",", "\<\"Cp\"\>",
",", "\<\"E-1\"\>", ",", "\<\"E-2\"\>", ",", "\<\"E-3\"\>",
",", "\<\"G-1\"\>", ",", "\<\"G-2\"\>", ",", "\<\"I-1\"\>",
",", "\<\"I-2\"\>", ",", "\<\"I-3\"\>", ",", "\<\"M\"\>",
",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>", ",", "\<\"Me-3\"\>",
",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>", ",", "\<\"Q\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "188946", ",", "8916", ",", "9838", ",",
"934", ",", "562", ",", "1011", ",", "394", ",", "23", ",", "74", ",",
"163", ",", "8033", ",", "2100", ",", "333", ",", "115", ",", "0", ",",
"218", ",", "144", ",", "293", ",", "1756", ",", "2839", ",", "24853",
",", "17"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "7157", ",", "83165", ",", "2329", ",",
"6428", ",", "146", ",", "6214", ",", "2337", ",", "81", ",", "23", ",",
"1618", ",", "4885", ",", "621", ",", "78", ",", "42", ",", "0", ",",
"13", ",", "969", ",", "4423", ",", "1018", ",", "6449", ",", "19638",
",", "14"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "8428", ",", "1773", ",", "43839", ",", "335",
",", "91", ",", "416", ",", "68", ",", "12", ",", "222", ",", "21", ",",
"6297", ",", "1090", ",", "26", ",", "10", ",", "0", ",", "3", ",",
"117", ",", "65", ",", "1143", ",", "1113", ",", "4188", ",", "15"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "692", ",", "4926", ",", "268", ",", "571546",
",", "39515", ",", "15556", ",", "24422", ",", "11849", ",", "507", ",",
"7580", ",", "3722", ",", "1613", ",", "479", ",", "53", ",", "0", ",",
"96", ",", "959", ",", "422", ",", "1068", ",", "858", ",", "32565", ",",
"744"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "337", ",", "190", ",", "129", ",", "50665",
",", "403763", ",", "4829", ",", "7039", ",", "24046", ",", "3350", ",",
"2374", ",", "3607", ",", "4540", ",", "4727", ",", "1823", ",", "1",
",", "2394", ",", "1146", ",", "99", ",", "751", ",", "269", ",", "5057",
",", "25433"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "598", ",", "4323", ",", "219", ",", "14115",
",", "3592", ",", "85268", ",", "2261", ",", "939", ",", "189", ",",
"1276", ",", "2955", ",", "628", ",", "282", ",", "60", ",", "0", ",",
"9", ",", "418", ",", "1369", ",", "860", ",", "464", ",", "8288", ",",
"124"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "308", ",", "1982", ",", "70", ",", "20113",
",", "4418", ",", "2720", ",", "77685", ",", "3887", ",", "1034", ",",
"2783", ",", "598", ",", "157", ",", "68", ",", "23", ",", "0", ",",
"24", ",", "2092", ",", "425", ",", "361", ",", "463", ",", "4814", ",",
"55"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "13", ",", "59", ",", "10", ",", "11878", ",",
"18194", ",", "984", ",", "3025", ",", "67463", ",", "2491", ",",
"1549", ",", "309", ",", "373", ",", "379", ",", "282", ",", "5", ",",
"22", ",", "271", ",", "11", ",", "10", ",", "4", ",", "200", ",",
"44"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "90", ",", "42", ",", "257", ",", "309", ",",
"3243", ",", "202", ",", "1033", ",", "3095", ",", "33686", ",", "1878",
",", "1704", ",", "310", ",", "1951", ",", "186", ",", "6", ",", "982",
",", "487", ",", "59", ",", "442", ",", "16", ",", "210", ",", "307"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "215", ",", "1168", ",", "46", ",", "5991",
",", "1818", ",", "1160", ",", "2520", ",", "1471", ",", "1550", ",",
"30056", ",", "2449", ",", "284", ",", "554", ",", "131", ",", "13", ",",
"106", ",", "53", ",", "25", ",", "17", ",", "12", ",", "104", ",",
"69"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "8191", ",", "4795", ",", "6357", ",", "4643",
",", "3100", ",", "6240", ",", "872", ",", "383", ",", "1514", ",",
"3465", ",", "137796", ",", "10549", ",", "555", ",", "262", ",", "8",
",", "210", ",", "384", ",", "2227", ",", "425", ",", "570", ",", "7590",
",", "2460"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "1490", ",", "254", ",", "788", ",", "1219",
",", "1222", ",", "833", ",", "170", ",", "294", ",", "78", ",", "195",
",", "8998", ",", "58837", ",", "26", ",", "0", ",", "0", ",", "72", ",",
"99", ",", "14", ",", "24", ",", "38", ",", "1506", ",", "605"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "319", ",", "81", ",", "53", ",", "508", ",",
"3916", ",", "223", ",", "109", ",", "520", ",", "1761", ",", "946", ",",
"673", ",", "132", ",", "88752", ",", "3275", ",", "50", ",", "3283",
",", "1230", ",", "593", ",", "1623", ",", "60", ",", "1513", ",",
"192"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "369", ",", "52", ",", "83", ",", "94", ",",
"1812", ",", "85", ",", "49", ",", "432", ",", "354", ",", "289", ",",
"535", ",", "48", ",", "3511", ",", "19785", ",", "75", ",", "615", ",",
"259", ",", "848", ",", "183", ",", "62", ",", "528", ",", "23"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"I-3\"\>", ",", "2", ",", "1", ",", "0", ",", "1", ",", "17",
",", "0", ",", "2", ",", "18", ",", "37", ",", "27", ",", "9", ",", "0",
",", "49", ",", "91", ",", "204", ",", "3", ",", "1", ",", "0", ",", "0",
",", "0", ",", "0", ",", "0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "265", ",", "13", ",", "12", ",", "110", ",",
"2011", ",", "4", ",", "19", ",", "44", ",", "949", ",", "115", ",",
"76", ",", "118", ",", "3766", ",", "529", ",", "0", ",", "28792", ",",
"42", ",", "22", ",", "32", ",", "17", ",", "157", ",", "1293"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "212", ",", "1303", ",", "167", ",", "2535",
",", "1389", ",", "894", ",", "4630", ",", "863", ",", "616", ",", "65",
",", "691", ",", "110", ",", "1800", ",", "200", ",", "4", ",", "29",
",", "239889", ",", "37875", ",", "13273", ",", "5445", ",", "53062",
",", "199"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "635", ",", "8719", ",", "366", ",", "3457",
",", "269", ",", "2978", ",", "1267", ",", "18", ",", "98", ",", "93",
",", "4516", ",", "84", ",", "1061", ",", "789", ",", "0", ",", "9", ",",
"55372", ",", "414878", ",", "32923", ",", "28083", ",", "142398", ",",
"16"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "1918", ",", "1355", ",", "1723", ",",
"4254", ",", "765", ",", "1192", ",", "627", ",", "11", ",", "496", ",",
"35", ",", "1095", ",", "173", ",", "2825", ",", "177", ",", "1", ",",
"64", ",", "13873", ",", "28591", ",", "343063", ",", "4739", ",",
"94108", ",", "58"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "2735", ",", "6834", ",", "1236", ",",
"1970", ",", "375", ",", "789", ",", "792", ",", "9", ",", "11", ",",
"10", ",", "680", ",", "125", ",", "91", ",", "49", ",", "0", ",", "22",
",", "5175", ",", "17796", ",", "3549", ",", "140776", ",", "41456", ",",
"0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "60318", ",", "38548", ",", "12174", ",",
"88621", ",", "30036", ",", "20303", ",", "11894", ",", "1596", ",",
"581", ",", "732", ",", "17038", ",", "8527", ",", "5138", ",", "740",
",", "0", ",", "402", ",", "78594", ",", "135450", ",", "123705", ",",
"67304", ",", "1703555", ",", "4115"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "11", ",", "7", ",", "2", ",", "1435", ",",
"19773", ",", "213", ",", "128", ",", "129", ",", "291", ",", "68", ",",
"3426", ",", "824", ",", "366", ",", "70", ",", "0", ",", "1002", ",",
"225", ",", "13", ",", "12", ",", "3", ",", "1099", ",", "241828"}],
"}"}]}], "}"}]], "Output",
CellChangeTimes->{3.433808787243573*^9, 3.4352778829373617`*^9,
3.435365182098164*^9, 3.435376749320586*^9, 3.479018271925261*^9,
3.489811955315496*^9, 3.522557922820654*^9, 3.522558331878377*^9,
3.5225589761305637`*^9, 3.5315311889337797`*^9, 3.53153414617528*^9,
3.53161450909623*^9, 3.53162286748809*^9, 3.531627039465279*^9,
3.531629526431787*^9, 3.531630116038686*^9, 3.5317132523831463`*^9,
3.531776067911425*^9, 3.531790201235256*^9, 3.531790879732298*^9,
3.5320366278287163`*^9, 3.532039842742642*^9, 3.5320546450083733`*^9,
3.53212485232927*^9, 3.535608676483954*^9, 3.537097446048822*^9,
3.537408801989789*^9, 3.537436925252964*^9, 3.537520516319294*^9,
3.53752499535359*^9, 3.53752852583644*^9, 3.537848720357594*^9,
3.537939055717577*^9, 3.540983991724564*^9, 3.541051025021749*^9,
3.546671107406868*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData["citedciting21DatawithClNames"], "Input",
CellChangeTimes->{{3.433808851314768*^9, 3.433808871824938*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "188946", ",", "8916", ",", "9838", ",",
"934", ",", "562", ",", "1011", ",", "394", ",", "23", ",", "74", ",",
"163", ",", "8033", ",", "2100", ",", "333", ",", "115", ",", "218", ",",
"144", ",", "293", ",", "1756", ",", "2839", ",", "24853", ",", "17"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "7157", ",", "83165", ",", "2329", ",",
"6428", ",", "146", ",", "6214", ",", "2337", ",", "81", ",", "23", ",",
"1618", ",", "4885", ",", "621", ",", "78", ",", "42", ",", "13", ",",
"969", ",", "4423", ",", "1018", ",", "6449", ",", "19638", ",", "14"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "8428", ",", "1773", ",", "43839", ",", "335",
",", "91", ",", "416", ",", "68", ",", "12", ",", "222", ",", "21", ",",
"6297", ",", "1090", ",", "26", ",", "10", ",", "3", ",", "117", ",",
"65", ",", "1143", ",", "1113", ",", "4188", ",", "15"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "692", ",", "4926", ",", "268", ",", "571546",
",", "39515", ",", "15556", ",", "24422", ",", "11849", ",", "507", ",",
"7580", ",", "3722", ",", "1613", ",", "479", ",", "53", ",", "96", ",",
"959", ",", "422", ",", "1068", ",", "858", ",", "32565", ",", "744"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "337", ",", "190", ",", "129", ",", "50665",
",", "403763", ",", "4829", ",", "7039", ",", "24046", ",", "3350", ",",
"2374", ",", "3607", ",", "4540", ",", "4727", ",", "1824", ",", "2394",
",", "1146", ",", "99", ",", "751", ",", "269", ",", "5057", ",",
"25433"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "598", ",", "4323", ",", "219", ",", "14115",
",", "3592", ",", "85268", ",", "2261", ",", "939", ",", "189", ",",
"1276", ",", "2955", ",", "628", ",", "282", ",", "60", ",", "9", ",",
"418", ",", "1369", ",", "860", ",", "464", ",", "8288", ",", "124"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "308", ",", "1982", ",", "70", ",", "20113",
",", "4418", ",", "2720", ",", "77685", ",", "3887", ",", "1034", ",",
"2783", ",", "598", ",", "157", ",", "68", ",", "23", ",", "24", ",",
"2092", ",", "425", ",", "361", ",", "463", ",", "4814", ",", "55"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "13", ",", "59", ",", "10", ",", "11878", ",",
"18194", ",", "984", ",", "3025", ",", "67463", ",", "2491", ",",
"1549", ",", "309", ",", "373", ",", "379", ",", "287", ",", "22", ",",
"271", ",", "11", ",", "10", ",", "4", ",", "200", ",", "44"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "90", ",", "42", ",", "257", ",", "309", ",",
"3243", ",", "202", ",", "1033", ",", "3095", ",", "33686", ",", "1878",
",", "1704", ",", "310", ",", "1951", ",", "192", ",", "982", ",", "487",
",", "59", ",", "442", ",", "16", ",", "210", ",", "307"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "215", ",", "1168", ",", "46", ",", "5991",
",", "1818", ",", "1160", ",", "2520", ",", "1471", ",", "1550", ",",
"30056", ",", "2449", ",", "284", ",", "554", ",", "144", ",", "106",
",", "53", ",", "25", ",", "17", ",", "12", ",", "104", ",", "69"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "8191", ",", "4795", ",", "6357", ",", "4643",
",", "3100", ",", "6240", ",", "872", ",", "383", ",", "1514", ",",
"3465", ",", "137796", ",", "10549", ",", "555", ",", "270", ",", "210",
",", "384", ",", "2227", ",", "425", ",", "570", ",", "7590", ",",
"2460"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "1490", ",", "254", ",", "788", ",", "1219",
",", "1222", ",", "833", ",", "170", ",", "294", ",", "78", ",", "195",
",", "8998", ",", "58837", ",", "26", ",", "0", ",", "72", ",", "99",
",", "14", ",", "24", ",", "38", ",", "1506", ",", "605"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "319", ",", "81", ",", "53", ",", "508", ",",
"3916", ",", "223", ",", "109", ",", "520", ",", "1761", ",", "946", ",",
"673", ",", "132", ",", "88752", ",", "3325", ",", "3283", ",", "1230",
",", "593", ",", "1623", ",", "60", ",", "1513", ",", "192"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "371", ",", "53", ",", "83", ",", "95", ",",
"1829", ",", "85", ",", "51", ",", "450", ",", "391", ",", "316", ",",
"544", ",", "48", ",", "3560", ",", "20155", ",", "618", ",", "260", ",",
"848", ",", "183", ",", "62", ",", "528", ",", "23"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "265", ",", "13", ",", "12", ",", "110", ",",
"2011", ",", "4", ",", "19", ",", "44", ",", "949", ",", "115", ",",
"76", ",", "118", ",", "3766", ",", "529", ",", "28792", ",", "42", ",",
"22", ",", "32", ",", "17", ",", "157", ",", "1293"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "212", ",", "1303", ",", "167", ",", "2535",
",", "1389", ",", "894", ",", "4630", ",", "863", ",", "616", ",", "65",
",", "691", ",", "110", ",", "1800", ",", "204", ",", "29", ",",
"239889", ",", "37875", ",", "13273", ",", "5445", ",", "53062", ",",
"199"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "635", ",", "8719", ",", "366", ",", "3457",
",", "269", ",", "2978", ",", "1267", ",", "18", ",", "98", ",", "93",
",", "4516", ",", "84", ",", "1061", ",", "789", ",", "9", ",", "55372",
",", "414878", ",", "32923", ",", "28083", ",", "142398", ",", "16"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "1918", ",", "1355", ",", "1723", ",",
"4254", ",", "765", ",", "1192", ",", "627", ",", "11", ",", "496", ",",
"35", ",", "1095", ",", "173", ",", "2825", ",", "178", ",", "64", ",",
"13873", ",", "28591", ",", "343063", ",", "4739", ",", "94108", ",",
"58"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "2735", ",", "6834", ",", "1236", ",",
"1970", ",", "375", ",", "789", ",", "792", ",", "9", ",", "11", ",",
"10", ",", "680", ",", "125", ",", "91", ",", "49", ",", "22", ",",
"5175", ",", "17796", ",", "3549", ",", "140776", ",", "41456", ",",
"0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "60318", ",", "38548", ",", "12174", ",",
"88621", ",", "30036", ",", "20303", ",", "11894", ",", "1596", ",",
"581", ",", "732", ",", "17038", ",", "8527", ",", "5138", ",", "740",
",", "402", ",", "78594", ",", "135450", ",", "123705", ",", "67304",
",", "1703555", ",", "4115"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "11", ",", "7", ",", "2", ",", "1435", ",",
"19773", ",", "213", ",", "128", ",", "129", ",", "291", ",", "68", ",",
"3426", ",", "824", ",", "366", ",", "70", ",", "1002", ",", "225", ",",
"13", ",", "12", ",", "3", ",", "1099", ",", "241828"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{3.4338088729249697`*^9, 3.435277882953464*^9,
3.435365182322304*^9, 3.4353767493648653`*^9, 3.479018272044189*^9,
3.489811955341696*^9, 3.5225579228321238`*^9, 3.522558331904171*^9,
3.52255897614646*^9, 3.531531188954729*^9, 3.531534146219879*^9,
3.531614509112379*^9, 3.531622867534232*^9, 3.531627039482045*^9,
3.531629526448393*^9, 3.5316301160551577`*^9, 3.531713252400934*^9,
3.5317760679362097`*^9, 3.53179020126761*^9, 3.531790879783683*^9,
3.53203662784662*^9, 3.5320398427632227`*^9, 3.532054645026389*^9,
3.5321248523471317`*^9, 3.5356086765324793`*^9, 3.537097446097927*^9,
3.537408802083415*^9, 3.537436925304509*^9, 3.537520516375031*^9,
3.537524995405113*^9, 3.537528525888235*^9, 3.5378487203964243`*^9,
3.537939055769188*^9, 3.540983991824778*^9, 3.541051025074731*^9,
3.546671107464191*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedciting21DatawithClNameswithClNames", "=",
RowBox[{"Prepend", "[",
RowBox[{"citedciting21DatawithClNames", ",",
RowBox[{"Prepend", "[",
RowBox[{"ClNames21", ",", "\"\<citedciting\>\""}], "]"}]}],
"]"}]}]], "Input",
CellChangeTimes->{{3.433808906750844*^9, 3.433809019950416*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"\<\"citedciting\"\>", ",", "\<\"B-1\"\>", ",", "\<\"B-2\"\>",
",", "\<\"B-3\"\>", ",", "\<\"C-1\"\>", ",", "\<\"C-2\"\>",
",", "\<\"Ca\"\>", ",", "\<\"Cp\"\>", ",", "\<\"E-1\"\>",
",", "\<\"E-2\"\>", ",", "\<\"E-3\"\>", ",", "\<\"G-1\"\>",
",", "\<\"G-2\"\>", ",", "\<\"I-1\"\>", ",", "\<\"I-2\"\>",
",", "\<\"M\"\>", ",", "\<\"Me-1\"\>", ",", "\<\"Me-2\"\>",
",", "\<\"Me-3\"\>", ",", "\<\"Me-4\"\>", ",", "\<\"Mo\"\>",
",", "\<\"Q\"\>"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-1\"\>", ",", "188946", ",", "8916", ",", "9838", ",",
"934", ",", "562", ",", "1011", ",", "394", ",", "23", ",", "74", ",",
"163", ",", "8033", ",", "2100", ",", "333", ",", "115", ",", "218", ",",
"144", ",", "293", ",", "1756", ",", "2839", ",", "24853", ",", "17"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-2\"\>", ",", "7157", ",", "83165", ",", "2329", ",",
"6428", ",", "146", ",", "6214", ",", "2337", ",", "81", ",", "23", ",",
"1618", ",", "4885", ",", "621", ",", "78", ",", "42", ",", "13", ",",
"969", ",", "4423", ",", "1018", ",", "6449", ",", "19638", ",", "14"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"B-3\"\>", ",", "8428", ",", "1773", ",", "43839", ",", "335",
",", "91", ",", "416", ",", "68", ",", "12", ",", "222", ",", "21", ",",
"6297", ",", "1090", ",", "26", ",", "10", ",", "3", ",", "117", ",",
"65", ",", "1143", ",", "1113", ",", "4188", ",", "15"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-1\"\>", ",", "692", ",", "4926", ",", "268", ",", "571546",
",", "39515", ",", "15556", ",", "24422", ",", "11849", ",", "507", ",",
"7580", ",", "3722", ",", "1613", ",", "479", ",", "53", ",", "96", ",",
"959", ",", "422", ",", "1068", ",", "858", ",", "32565", ",", "744"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"C-2\"\>", ",", "337", ",", "190", ",", "129", ",", "50665",
",", "403763", ",", "4829", ",", "7039", ",", "24046", ",", "3350", ",",
"2374", ",", "3607", ",", "4540", ",", "4727", ",", "1824", ",", "2394",
",", "1146", ",", "99", ",", "751", ",", "269", ",", "5057", ",",
"25433"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Ca\"\>", ",", "598", ",", "4323", ",", "219", ",", "14115",
",", "3592", ",", "85268", ",", "2261", ",", "939", ",", "189", ",",
"1276", ",", "2955", ",", "628", ",", "282", ",", "60", ",", "9", ",",
"418", ",", "1369", ",", "860", ",", "464", ",", "8288", ",", "124"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Cp\"\>", ",", "308", ",", "1982", ",", "70", ",", "20113",
",", "4418", ",", "2720", ",", "77685", ",", "3887", ",", "1034", ",",
"2783", ",", "598", ",", "157", ",", "68", ",", "23", ",", "24", ",",
"2092", ",", "425", ",", "361", ",", "463", ",", "4814", ",", "55"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-1\"\>", ",", "13", ",", "59", ",", "10", ",", "11878", ",",
"18194", ",", "984", ",", "3025", ",", "67463", ",", "2491", ",",
"1549", ",", "309", ",", "373", ",", "379", ",", "287", ",", "22", ",",
"271", ",", "11", ",", "10", ",", "4", ",", "200", ",", "44"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"E-2\"\>", ",", "90", ",", "42", ",", "257", ",", "309", ",",
"3243", ",", "202", ",", "1033", ",", "3095", ",", "33686", ",", "1878",
",", "1704", ",", "310", ",", "1951", ",", "192", ",", "982", ",", "487",
",", "59", ",", "442", ",", "16", ",", "210", ",", "307"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"E-3\"\>", ",", "215", ",", "1168", ",", "46", ",", "5991",
",", "1818", ",", "1160", ",", "2520", ",", "1471", ",", "1550", ",",
"30056", ",", "2449", ",", "284", ",", "554", ",", "144", ",", "106",
",", "53", ",", "25", ",", "17", ",", "12", ",", "104", ",", "69"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-1\"\>", ",", "8191", ",", "4795", ",", "6357", ",", "4643",
",", "3100", ",", "6240", ",", "872", ",", "383", ",", "1514", ",",
"3465", ",", "137796", ",", "10549", ",", "555", ",", "270", ",", "210",
",", "384", ",", "2227", ",", "425", ",", "570", ",", "7590", ",",
"2460"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"G-2\"\>", ",", "1490", ",", "254", ",", "788", ",", "1219",
",", "1222", ",", "833", ",", "170", ",", "294", ",", "78", ",", "195",
",", "8998", ",", "58837", ",", "26", ",", "0", ",", "72", ",", "99",
",", "14", ",", "24", ",", "38", ",", "1506", ",", "605"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"I-1\"\>", ",", "319", ",", "81", ",", "53", ",", "508", ",",
"3916", ",", "223", ",", "109", ",", "520", ",", "1761", ",", "946", ",",
"673", ",", "132", ",", "88752", ",", "3325", ",", "3283", ",", "1230",
",", "593", ",", "1623", ",", "60", ",", "1513", ",", "192"}], "}"}],
",",
RowBox[{"{",
RowBox[{"\<\"I-2\"\>", ",", "371", ",", "53", ",", "83", ",", "95", ",",
"1829", ",", "85", ",", "51", ",", "450", ",", "391", ",", "316", ",",
"544", ",", "48", ",", "3560", ",", "20155", ",", "618", ",", "260", ",",
"848", ",", "183", ",", "62", ",", "528", ",", "23"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"M\"\>", ",", "265", ",", "13", ",", "12", ",", "110", ",",
"2011", ",", "4", ",", "19", ",", "44", ",", "949", ",", "115", ",",
"76", ",", "118", ",", "3766", ",", "529", ",", "28792", ",", "42", ",",
"22", ",", "32", ",", "17", ",", "157", ",", "1293"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-1\"\>", ",", "212", ",", "1303", ",", "167", ",", "2535",
",", "1389", ",", "894", ",", "4630", ",", "863", ",", "616", ",", "65",
",", "691", ",", "110", ",", "1800", ",", "204", ",", "29", ",",
"239889", ",", "37875", ",", "13273", ",", "5445", ",", "53062", ",",
"199"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-2\"\>", ",", "635", ",", "8719", ",", "366", ",", "3457",
",", "269", ",", "2978", ",", "1267", ",", "18", ",", "98", ",", "93",
",", "4516", ",", "84", ",", "1061", ",", "789", ",", "9", ",", "55372",
",", "414878", ",", "32923", ",", "28083", ",", "142398", ",", "16"}],
"}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-3\"\>", ",", "1918", ",", "1355", ",", "1723", ",",
"4254", ",", "765", ",", "1192", ",", "627", ",", "11", ",", "496", ",",
"35", ",", "1095", ",", "173", ",", "2825", ",", "178", ",", "64", ",",
"13873", ",", "28591", ",", "343063", ",", "4739", ",", "94108", ",",
"58"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Me-4\"\>", ",", "2735", ",", "6834", ",", "1236", ",",
"1970", ",", "375", ",", "789", ",", "792", ",", "9", ",", "11", ",",
"10", ",", "680", ",", "125", ",", "91", ",", "49", ",", "22", ",",
"5175", ",", "17796", ",", "3549", ",", "140776", ",", "41456", ",",
"0"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Mo\"\>", ",", "60318", ",", "38548", ",", "12174", ",",
"88621", ",", "30036", ",", "20303", ",", "11894", ",", "1596", ",",
"581", ",", "732", ",", "17038", ",", "8527", ",", "5138", ",", "740",
",", "402", ",", "78594", ",", "135450", ",", "123705", ",", "67304",
",", "1703555", ",", "4115"}], "}"}], ",",
RowBox[{"{",
RowBox[{"\<\"Q\"\>", ",", "11", ",", "7", ",", "2", ",", "1435", ",",
"19773", ",", "213", ",", "128", ",", "129", ",", "291", ",", "68", ",",
"3426", ",", "824", ",", "366", ",", "70", ",", "1002", ",", "225", ",",
"13", ",", "12", ",", "3", ",", "1099", ",", "241828"}], "}"}]}],
"}"}]], "Output",
CellChangeTimes->{{3.4338089457045717`*^9, 3.433808948989729*^9},
3.433808984130883*^9, 3.4338090250150013`*^9, 3.435277883596393*^9,
3.435365182370254*^9, 3.435376749597308*^9, 3.4790182721695833`*^9,
3.489811955439468*^9, 3.5225579228436813`*^9, 3.5225583319198647`*^9,
3.5225589761626863`*^9, 3.531531189017356*^9, 3.5315341462455053`*^9,
3.531614509129219*^9, 3.531622867551104*^9, 3.531627039499323*^9,
3.5316295264654913`*^9, 3.531630116072234*^9, 3.531713252419086*^9,
3.5317760679844837`*^9, 3.5317902012857122`*^9, 3.531790879836238*^9,
3.532036627865152*^9, 3.532039842785583*^9, 3.532054645044915*^9,
3.532124852365623*^9, 3.5356086765700197`*^9, 3.537097446135738*^9,
3.537408802184457*^9, 3.537436925355565*^9, 3.537520516422826*^9,
3.5375249954552*^9, 3.537528525938733*^9, 3.5378487204365473`*^9,
3.5379390558197737`*^9, 3.5409839919221067`*^9, 3.5410510251279993`*^9,
3.546671107533939*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citedciting21DatawithClNameswithClNames.xls\>\"", ",",
"citedciting21DatawithClNameswithClNames"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.433809032459073*^9, 3.433809101582473*^9}, {
3.433809269142375*^9, 3.433809273303287*^9}, {3.4338093799014673`*^9,
3.433809382689485*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Directory", "[", "]"}]], "Input",
CellChangeTimes->{{3.433809283126913*^9, 3.4338092888855047`*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/SOC-pca-cosine\"\>"], "Output",
CellChangeTimes->{{3.433809289532045*^9, 3.433809318896839*^9},
3.4352778851207867`*^9, 3.435365182617408*^9, 3.4353767497008133`*^9,
3.479018272288764*^9, 3.489811955541922*^9, 3.522557922869664*^9,
3.522558331936393*^9, 3.5225589761914682`*^9, 3.531531189042348*^9,
3.5315341462914267`*^9, 3.531614509147046*^9, 3.531622867569357*^9,
3.531627039516964*^9, 3.531629526526103*^9, 3.531630116132247*^9,
3.531713252487959*^9, 3.5317760680159616`*^9, 3.531790201306197*^9,
3.5317908798998537`*^9, 3.532036627909227*^9, 3.5320398428127623`*^9,
3.5320546451056356`*^9, 3.532124852386835*^9, 3.5356086766261787`*^9,
3.537097446246933*^9, 3.537408802300836*^9, 3.537436925617791*^9,
3.537520516497497*^9, 3.537524995529561*^9, 3.537528526085679*^9,
3.5378487205139713`*^9, 3.537939055893322*^9, 3.5409839920955772`*^9,
3.54105102518432*^9, 3.546671107701312*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citedciting21DatawithClNameswithClNames.xls\>\"", ",",
"citedciting21DatawithClNameswithClNames"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.433809032459073*^9, 3.433809101582473*^9}, {
3.433809269142375*^9, 3.433809273303287*^9}, {3.433809387435993*^9,
3.433809392344715*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Dimensions", "[", "citedcitingDatawithClNamesExport",
"]"}]], "Input",
CellChangeTimes->{{3.427765434705838*^9, 3.427765444616414*^9}, {
3.429935033620634*^9, 3.4299350410503902`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"23", ",", "23"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwVz11Ik2EAxfG3mDVzWdbMopg6sg9JImu7MNp4Gk1XjSRNc1vllqLUWy0G
axqtaaIUfpQw3MVA+1ptloOWC8Jp1ESKLHIjJ80LxQvfJ0inwYRKO7s4/G7O
zT/bcO109SqGYZSYZjHgiN3lCNtSnRaHu0qcR7LvcUSqKptSQvaVRFIEn3rl
S8J2jlgzzwUPwvPyyKd3MCe6Mj4F9S6hXtrBkSvtf0QX4MbZvumL8OMLn7IJ
DogtB1ogzyMubnzAkfK6582t0CWK3+iDGc680jfQODzUG4KvNdvtvE6ObFFX
TK6BV9UvayVwna2yUgojI44CHXT5+2W34QeG/74BKr2HcxuheK91+hlMLZwX
uuHq0NaYB96sWYr7YI9sZ3c/TLfZU/zQXnLmzgz8qvWyFjtH2ub8I8cc6Of9
qDFCQW9gvRl6ugVVvp8cORu/PqhiKOlw6/4OyijZN27dPwT5grW2hKKFh+bo
KUq2/VbNTkJ5zJWTVEzJl2FTQTI8ZFxQpMB/5m/1AqiaaAom/F54XyeBlxcb
+KXQ8it3TgObw8sKLXR/vnU0BPOSteFw4r/hSWoUXupqK1uGhgo7+7ickj2K
UV29hpJAq7pqk5YSU2QgMws6hJ3zRdC52ZR1Aj56G5w4CXcE0/I5OHp8RZ2u
o2QsPyljRk9JbdfuMZ6BErW4jgmwlPwHoKAbVw==
"]]
}, Open ]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
RowBox[{"ccfilename", "<>", "\"\<.xls\>\""}], ",", "exportTableData"}],
"]"}], "*)"}]], "Input",
CellChangeTimes->{{3.427776659369823*^9, 3.4277766624847116`*^9}, {
3.42777669312431*^9, 3.427776751869553*^9}, {3.427776937555778*^9,
3.427776940128708*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedParciting21withClNames", "=",
RowBox[{"Transpose", "[",
RowBox[{"Prepend", "[",
RowBox[{
RowBox[{"Transpose", "[",
RowBox[{"Prepend", "[",
RowBox[{"citedParciting21", ",", "ClNames21"}], "]"}], "]"}], ",",
RowBox[{"Prepend", "[",
RowBox[{"ClNames21", ",", "\"\<cited / citing\>\""}], "]"}]}], "]"}],
"]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.432256998526256*^9, 3.432257046336685*^9}, {
3.43225707796408*^9, 3.432257207904052*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citedParciting21withClNames.xls\>\"", ",",
"citedParciting21withClNames"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.432256407348778*^9, 3.432256437081901*^9}, {
3.432256548786043*^9, 3.432256552486237*^9}, {3.432257221320257*^9,
3.432257240757885*^9}, {3.432257286365551*^9, 3.432257289670877*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{"\"\<citedciting21DataDIVselfCited21.xls\>\"", ",",
RowBox[{"citedciting21Data", "/", "selfCited21"}]}], "]"}],
"*)"}]], "Input",
CellChangeTimes->{{3.432256190885572*^9, 3.432256257911936*^9}, {
3.432256558426217*^9, 3.432256562500122*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{"\"\<citingcited21DataDIVselfCiting21.xls\>\"", ",",
RowBox[{"citingcited21Data", "/", "selfCiting21"}]}], "]"}],
"*)"}]], "Input",
CellChangeTimes->{{3.432256190885572*^9, 3.432256324497774*^9}, {
3.432256568048053*^9, 3.432256571910357*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citedciting21DatastanderdizedcitedParciting.xls\>\"", ",",
"citedciting21DatastanderdizedcitedParciting"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.432361243702289*^9, 3.4323613163919287`*^9}}],
Cell["citation - ratiomatrix for execl", "Text",
CellChangeTimes->{{3.430686983655505*^9, 3.430686999883876*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Length", "[", "citedParciting", "]"}]], "Input",
CellChangeTimes->{{3.429935232465744*^9, 3.429935242073509*^9}}],
Cell[BoxData["0"], "Output",
CellChangeTimes->CompressedData["
1:eJwVz19IU3EcBfC71JhsSQ2vZkFqTISB/UUfxFZfMysac4UtcUPbupbZIJEY
NyPa1tgUpCxcGQkGEVMbvVip/VkpE62UQocsdIJDtPszyh6qBRadPRw+b4dz
cq0XT9TJOI4jROYTNvE3JGpbuRLaCxv43+/fwqVxWWQBZpzfbim6KdGHQGZ2
LYxwM7EzcDgWLndDlcG72wuT1GUG1y2J/j5452mDV3PzxCfQ7qyoHIDKroXH
07ChpcSXfFsiXUCIroe7uofqC6H8gPV0Efzm9hebYcnHYe01uJqvHnHCcnWp
xgXXDd2J+aG+6U96L9ycdPhHH/xlkcX74XHTju5nMJ4VUTxP2Nl6fRGenZy1
iT6JBquksUOd2BtdPtcI2avxDXboEVVC/4pE7UExeJRjJGyrXQtqGS3VOHe+
gT3GVEfCkfxH9rkKRk13dV+isMrSm5diYNT61F6cCkX/z4MKOPUp3KyEVk1L
KKFnY4e5EBpfuuWV8EVXwfdq2HEppcwEtfOO0mm4vKUmHIa80582BxsN7cZ/
UEn3bA9PoT9rxtxczSh44aSgMjHSD4xm58Ce0P3VIzDNfTnnGPy6b+KzDgZc
6Xsk6F2T63kzo/1bFZmLFkbxWc1UshX/eAf32sboP/yOBgA=
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedParcitingwithClNames", "=",
RowBox[{"Table", "[",
RowBox[{
RowBox[{"Prepend", "[",
RowBox[{
RowBox[{"citedParciting", "[",
RowBox[{"[", "n", "]"}], "]"}], ",",
RowBox[{"ClNames", "[",
RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ",",
RowBox[{"{",
RowBox[{"n", ",",
RowBox[{"Length", "[", "citedParciting", "]"}]}], "}"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.429935111581234*^9, 3.42993521567181*^9}, {
3.429935253292211*^9, 3.42993532876651*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedParcitingwithClNamesExport", "=",
RowBox[{"Prepend", "[",
RowBox[{"citedParcitingwithClNames", ",", "exportHeading"}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.429935387887618*^9, 3.429935430943169*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Dimensions", "[", "citedParcitingwithClNamesExport", "]"}]], "Input",\
CellChangeTimes->{{3.4299354367988653`*^9, 3.429935443905357*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"1", ",", "23"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJwdyVFIU3EcxfEbbMvmGiFMI4hNKIJhjZTtwcL4WclCM0kp2i5MpysDwywm
twuS2zQjpFqwMntQC41sFDEsH2oOFZlGaNNyg23QGNX9S6Ul1EO1zno4fOB7
Cu2txx0bOI4jrK+1X6+5LtGWuaHpEhidUr0OwdmoLvoBTkbKG0w3JGp+Slob
/DqfSTXCo85MRRdkN+/s7YHvh0/XuL0SjZd8udILX9ocwhNoD7XVvYDf7Wr/
IhT6T/lktyTyX2hLKOCBxkizEcqTQr0JrlSMlfKw91O47DLsTPKTLhi/aNW7
Ye2lwdRD2HOb0zyCb+S1a6NQkc75Fcia2T8wBrm8tdznMFQc8KTh1ULZOcEn
kcVVED7cJ9G6b/XMebgt/+3mdsiNb20KrEg0I3qCRzhG6d31v4NljEY63IYJ
aO5Wdv73z3B7/Bgj//bqzwm4Kzi6U17DSOsVSjdB/cLPg7nQoFwWVdnuuDad
dVnh443w3bPunDpYpDR8s8Af+1SHrPB+wlW+CMNnbUtLULz7WB2HQ1XeE39h
av1ey4OTjLpiMV60MNpjtDTlWfE7Z7U6OCcOrJrhwkyHrhJ+dM7HqqB5Y36x
BAdHVNUaHr1SXZBuYLQjWRSR2RmZzB7uVQujfx7cCeg=
"]]
}, Open ]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
RowBox[{"ccfilename", "<>", "\"\<-ratio\>\"", "<>", "\"\<.xls\>\""}], ",",
"citedParcitingwithClNamesExport"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.4299354564757957`*^9, 3.429935518893297*^9}}],
Cell["selfcitation - ratio for execl", "Text",
CellChangeTimes->{{3.4306870318797817`*^9, 3.4306870606475363`*^9}}],
Cell[CellGroupData[{
Cell[BoxData["ccfilename"], "Input",
CellChangeTimes->{{3.429935594245183*^9, 3.429935596045809*^9}}],
Cell[BoxData["\<\"JCR_cited_2004.Cluster-Cluster.tsv.analytic\"\>"], "Output",
CellChangeTimes->CompressedData["
1:eJwVzV1IU3EcxvHTMq2mc4RjQcFWsgiLifkGQtIvkxaFkxC1beKmC61mjail
o5pt5XRY6lCTYmQFvuSsI5oNxBkiJOaNKZm02ZtE529ghcSCiJ5dPHzunu+u
igsnT2/gOI4wPtt3UHZHIK5kbCodvr2W9volPNu0+90nGNBbTFktAnWKzYpy
uE57v1TCjz7l0ZtQrfOnueFibFOhs02gUvVaQzP0ei/XPoXWD+1FL2BSudQ/
H7WnuiPGK1AwcjUcC63nlqszoVnhMmZBdmoyxwDrL83kOmBnWd3kDRhQmVKc
8PvGoc+9MGV7nKwf7hi8+PMJ9NzfGhmGIj7vwXMoSU6MH4XdqyHXSvTPk1xT
2yHQvoh8Or9LoCGKVFlhungpwQY1t3eah1cFulfmDh7jGLWKTH+DuYwy9K7U
CZh0XlwfNfC71xbSMpJOFHwLw2ntgGpTIaMuVV3OFniF/5Mnhof6Fu3x8L22
eSpqOOOuIROOKN2bi+AvPnVNB42ixCN6WOlxHp6H7SLjwgJMyPdLQrDF4S3+
B0ef+SyPS9C5HjLYdYy+PjSat+kZyffPKpRQwz/6oYF9jQ7lcVjjmFs6AdXF
8gMC7HklKZAZGNnOSOUrJkZ7POo3MRWM7Ou3uHELo/+J/AGI
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Directory", "[", "]"}]], "Input",
CellChangeTimes->{{3.427776841660925*^9, 3.427776850016011*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/SOC-pca-cosine\"\>"], "Output",
CellChangeTimes->CompressedData["
1:eJwVzl9IU3EYxvEJSyxXrmLURbRZKKHQspjYcMLPpimdNlujxI3c1iIJJQla
c4nlJp6stZE0Vxdq1mxmy0ixgui4ckTQP3ELtDSaSuz8pLRukojVs4uXD+/V
98m2nNadSBMIBGU4s5vJ+93BE9Pye1X2ZZ6MBp3xcqgaLFdUwMhEIF/i4Unt
+a+RPTDRpn8Thsdi8qk49FsbzIVenjT1nZPWwqddmvnjcKO3aH8bbN/7rICF
La/8Vc5rPDGEk+1uuC10yT4EWW2X/gnMYGShKCzOPeUTdvLkrLhlNh1SjtYp
YJHfYyqESte40ghtwQ8lF1L/Tt/LVnim1JLnhH2q4bkgZBdFknvwdn/zz0E4
tEO8MgK3v1X3jsKbH7eKHkN39S/XAvzWXdBg96FTnP+67Aa6hn8nGyGj/rTW
Bq8HpNaRRZ7McSxXKaBEV2n+y5VQUnfXJR+DU1zmxZSfNQO2GS0l6WPaxCxM
9t7PWVVFyRp7k3I1HE77sy8Thg9NO0Tw1iNvJOUWn9+ogJ4ONkMPuaxdSzXw
e2OW2gCbu12lUVh9xRSLQdmPB+tmYG6880gSToR76u8cpcSh/WJ01FAiXLFY
NxgomV96J5XBnsOB5QrI5LTKDsDQ+OQ0Awd0m3fz8OBDsUZipOTF1fWbFszY
k5BPCi3oRFnB83pK/gNMGxpw
"]]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{
RowBox[{"(",
RowBox[{"indexes", "=",
RowBox[{"{",
RowBox[{
"ClNames", ",", "totalCitedPartotalCiting", ",", "selfcitedRatio", ",",
"selfcitingRatio"}], "}"}]}], ")"}], "//", "TableForm"}]], "Input",
CellChangeTimes->{{3.4305278694825172`*^9, 3.4305279687643337`*^9}, {
3.430528058265543*^9, 3.4305280669103413`*^9}, {3.430528099070183*^9,
3.430528114021265*^9}}],
Cell[BoxData[
InterpretationBox[GridBox[{
{"\<\"B-1\"\>", "\<\"B-2\"\>", "\<\"B-3\"\>", "\<\"C-1\"\>", \
"\<\"C-2\"\>", "\<\"Ca\"\>", "\<\"Cp\"\>", "\<\"E-1\"\>", "\<\"E-2\"\>", \
"\<\"E-3\"\>", "\<\"G-1\"\>", "\<\"G-2\"\>", "\<\"I-1\"\>", "\<\"I-2\"\>", \
"\<\"I-3\"\>", "\<\"M\"\>", "\<\"Me-1\"\>", "\<\"Me-2\"\>", "\<\"Me-3\"\>", "\
\<\"Me-4\"\>", "\<\"Mo\"\>", "\<\"Q\"\>"},
{"totalCitedPartotalCiting", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", \
"\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\
\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", \
"\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>"},
{"selfcitedRatio", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", \
"\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\
\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", \
"\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>"},
{"selfcitingRatio", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\
\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", \
"\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\
\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>", "\<\"\"\>"}
},
GridBoxAlignment->{
"Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
"RowsIndexed" -> {}},
GridBoxSpacings->{"Columns" -> {
Offset[0.27999999999999997`], {
Offset[2.0999999999999996`]},
Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
Offset[0.2], {
Offset[0.4]},
Offset[0.2]}, "RowsIndexed" -> {}}],
TableForm[{{
"B-1", "B-2", "B-3", "C-1", "C-2", "Ca", "Cp", "E-1", "E-2", "E-3", "G-1",
"G-2", "I-1", "I-2", "I-3", "M", "Me-1", "Me-2", "Me-3", "Me-4", "Mo",
"Q"}, $CellContext`totalCitedPartotalCiting, \
$CellContext`selfcitedRatio, $CellContext`selfcitingRatio}]]], "Output",
CellChangeTimes->{{3.430527880668845*^9, 3.43052791954875*^9}, {
3.430527955137*^9, 3.430527969709055*^9}, 3.4305281156392*^9,
3.430611196732008*^9, 3.430620955704083*^9, 3.430687290281537*^9,
3.430693262885166*^9, 3.4317318461632442`*^9, 3.4317527609610567`*^9,
3.431822276758152*^9, 3.4318404212251577`*^9, 3.431898466111902*^9,
3.4319986358010807`*^9, 3.432003308314568*^9, 3.432098631994841*^9,
3.432100612773881*^9, 3.432178134511674*^9, 3.4322498466558104`*^9,
3.432254997534486*^9, 3.4322558272380037`*^9, 3.4323330778575773`*^9,
3.432335528606246*^9, 3.432339340425776*^9, 3.432357824679854*^9,
3.432361210328*^9, 3.432362082156754*^9, 3.432457248991477*^9,
3.433808746700532*^9, 3.435277890858468*^9, 3.435365184213572*^9,
3.435376751051532*^9, 3.479018273092744*^9, 3.489811956321012*^9,
3.522557923059864*^9, 3.522558332135154*^9, 3.522558976378706*^9,
3.531531189313375*^9, 3.5315341465063*^9, 3.531614509393416*^9,
3.531622867838005*^9, 3.531627039865201*^9, 3.531629526844178*^9,
3.531630116543127*^9, 3.5317132527982407`*^9, 3.5317760682757397`*^9,
3.53179020153224*^9, 3.531790880497192*^9, 3.532036628147965*^9,
3.532039843039256*^9, 3.532054645488472*^9, 3.5321248526201077`*^9,
3.535608676993932*^9, 3.537097446998529*^9, 3.537408803180545*^9,
3.537436926581318*^9, 3.5375205171864357`*^9, 3.5375249960712957`*^9,
3.537528526621604*^9, 3.53784872079311*^9, 3.537939056565879*^9,
3.540983992601307*^9, 3.541051025542901*^9, 3.546671108294076*^9}]
}, Open ]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
RowBox[{"ccfilename", "<>", "\"\<.index.xls\>\""}], ",", "indexes"}],
"]"}], "*)"}]], "Input",
CellChangeTimes->{{3.430527985209302*^9, 3.430527987518412*^9}, {
3.43052802851481*^9, 3.430528054075966*^9}, {3.4305281202287083`*^9,
3.4305281379836683`*^9}, {3.4305281852633343`*^9, 3.4305281890232897`*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{"\"\<lcp21.eps\>\"", ",", "lcp21"}], "]"}], "*)"}]], "Input",
CellChangeTimes->{{3.431753586822015*^9, 3.4317536129715357`*^9}, {
3.431753926640706*^9, 3.4317539300746098`*^9}}],
Cell["for APcluster", "Text",
CellChangeTimes->{{3.430687105417904*^9, 3.430687111674348*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"SetDirectory", "[", "\"\<../APcluster\>\"", "]"}]], "Input",
CellChangeTimes->{{3.4306209716513367`*^9, 3.4306209893717833`*^9}, {
3.479018377109516*^9, 3.479018377603706*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/APcluster\"\>"], "Output",
CellChangeTimes->CompressedData["
1:eJwVzm8o3HEAx/GfZTZxLO0oaazMg62s2/xZkvbl/Mt/HYu7ht9OuOhIXRfl
X8eFiyHXWaL8mT8drc7QlvOAFSUPnOMmR+My368HRhJ1k889ePd6+n7OK3NL
3TiOi0XrBZa/n7op4boVyRrYYL0TaaGth2a39FAi14i0OrhVvKaehZ9nbZIF
ODZZZrRAGzfY795LiXJXb/eA6iLPikhoKBgrjoIePocxMtil/RPXCAWGRyvN
cPV/1csWmNn862gCWisChVOwWj9+MQ2fHgbdmODidc7wd/g1WeE9D1Wb7zQO
GJakqVL3U8L3tq8lGijZiPctr4YHOipQQbUjTG46o8QYnVLjskvUaU7lGMkY
4Z3mOEaUta2vl2FHnqDJ5WW5UbWfxYhAknNqh/5XMy8eZjNy+60+xhM+a3Mm
eMEhsb3OG74f6Ft1+bPxiywS6h90PJbA0CcR54Xw4pWfWAoHTW3xFug7yW9v
Q4N2zmcf7pTo8++g8MdI5egHRpibQ1ZXyMiCWCH3k+IvdSc4BIZPT/1LgXvH
rSFp8GPp7u906LQGvqFwziLMFMoYkQwHBDhKGEmqf7vlzuP7RMctVTJyD5aC
9wA=
"]]
}, Open ]],
Cell[BoxData[
RowBox[{
RowBox[{"citedcitingDataPair", "=",
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"i", ",", "j", ",",
RowBox[{
RowBox[{"citedcitingData", "[",
RowBox[{"[", "i", "]"}], "]"}], "[",
RowBox[{"[", "j", "]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{"Length", "[", "citedcitingData", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"j", ",",
RowBox[{"Length", "[", "citedcitingData", "]"}]}], "}"}]}], "]"}],
",", "1"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.430620286676896*^9, 3.430620376958837*^9}, {
3.430620407367608*^9, 3.4306204256209583`*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citedcitingDataPairDropSelf", "=",
RowBox[{"Select", "[",
RowBox[{"citedcitingDataPair", ",",
RowBox[{
RowBox[{"Not", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[Equal]",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "&"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.4306204417076387`*^9, 3.430620449807446*^9}, {
3.4306205675538282`*^9, 3.43062061991241*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citingcitedDataPair", "=",
RowBox[{"Flatten", "[",
RowBox[{
RowBox[{"Table", "[",
RowBox[{
RowBox[{"{",
RowBox[{"i", ",", "j", ",",
RowBox[{
RowBox[{"citingcitedData", "[",
RowBox[{"[", "i", "]"}], "]"}], "[",
RowBox[{"[", "j", "]"}], "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"i", ",",
RowBox[{"Length", "[", "citingcitedData", "]"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"j", ",",
RowBox[{"Length", "[", "citingcitedData", "]"}]}], "}"}]}], "]"}],
",", "1"}], "]"}]}], ";"}]], "Input",
CellChangeTimes->{{3.430620286676896*^9, 3.430620376958837*^9}, {
3.430620407367608*^9, 3.4306204256209583`*^9}, {3.430687356195915*^9,
3.430687394447136*^9}}],
Cell[BoxData[
RowBox[{
RowBox[{"citingcitedDataPairDropSelf", "=",
RowBox[{"Select", "[",
RowBox[{"citingcitedDataPair", ",",
RowBox[{
RowBox[{"Not", "[",
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "1", "]"}], "]"}], "\[Equal]",
RowBox[{"#", "[",
RowBox[{"[", "2", "]"}], "]"}]}], "]"}], "&"}]}], "]"}]}],
";"}]], "Input",
CellChangeTimes->{{3.4306204417076387`*^9, 3.430620449807446*^9}, {
3.4306205675538282`*^9, 3.43062061991241*^9}, {3.4306874135645733`*^9,
3.43068743125321*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedcitingDataPairDropSelfMedian", "=",
RowBox[{
RowBox[{"Median", "[",
RowBox[{"Map", "[",
RowBox[{
RowBox[{
RowBox[{"#", "[",
RowBox[{"[", "3", "]"}], "]"}], "&"}], ",",
"citedcitingDataPairDropSelf"}], "]"}], "]"}], "//", "N"}]}]], "Input",
CellChangeTimes->{{3.430621019565943*^9, 3.430621094477325*^9}, {
3.430621605749061*^9, 3.430621611868132*^9}}],
Cell[BoxData["428.5`"], "Output",
CellChangeTimes->{{3.430621043638665*^9, 3.43062106568536*^9},
3.4306210973288517`*^9, 3.430687292649653*^9, 3.430693264500285*^9,
3.431731848109235*^9, 3.43175276266131*^9, 3.431822279847258*^9,
3.431840424150332*^9, 3.431898467799863*^9, 3.4319986374626913`*^9,
3.4320033091371193`*^9, 3.432098633120764*^9, 3.432100613594439*^9,
3.4321781354512043`*^9, 3.432249847292889*^9, 3.4322550072822523`*^9,
3.432255827883215*^9, 3.432333078720642*^9, 3.432335529123166*^9,
3.432339342180078*^9, 3.4323578251731853`*^9, 3.432361211056013*^9,
3.432362084352716*^9, 3.432457251228574*^9, 3.433808748539982*^9,
3.435277892941136*^9, 3.4353651848053493`*^9, 3.435376751616416*^9,
3.479018273389675*^9, 3.4898119564841127`*^9, 3.52255792313223*^9,
3.52255833222256*^9, 3.522558976473839*^9, 3.531531189472603*^9,
3.531534146611664*^9, 3.531614509496849*^9, 3.531622867941846*^9,
3.5316270399767427`*^9, 3.5316295270624323`*^9, 3.531630116702491*^9,
3.53171325292593*^9, 3.531776068386674*^9, 3.531790201722357*^9,
3.531790880740984*^9, 3.532036628288464*^9, 3.532039843134042*^9,
3.532054645693293*^9, 3.5321248527678957`*^9, 3.53560867717282*^9,
3.5370974472921667`*^9, 3.537408803503729*^9, 3.5374369268624687`*^9,
3.5375205174835787`*^9, 3.537524996332197*^9, 3.537528526901863*^9,
3.537848720903495*^9, 3.537939056847013*^9, 3.540983992898691*^9,
3.541051025693986*^9, 3.546671108571335*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"citedcitingDataPairDropSelfMedianList", "=",
RowBox[{"Table", "[",
RowBox[{"citedcitingDataPairDropSelfMedian", ",",
RowBox[{"{", "22", "}"}]}], "]"}]}]], "Input",
CellChangeTimes->{{3.430621593281917*^9, 3.430621648660946*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{
"428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",",
"428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",",
"428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",",
"428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",", "428.5`", ",",
"428.5`", ",", "428.5`"}], "}"}]], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwBuJXF42sUvpfOnY93u3eAqSPOQgatQPpGQ9YApsmvnS8
qtTa3gOkGX4LV64D0kKMEqHbgfR1keo1l4H0Rue9U1kmvXR8qLr+LhuQVvmp
n2kKpN16tiSYAekLDb+sYoB0x/p3dvVAet0VjSONIHW8jVpNQHqa8INHy4H0
v+OaoiuBdP+H8x9XAekH9to/NgPpX+fT528F0nF8c3i2AelaxbqWJ0B6h+/s
3IqpLx1btm8+4TrjpWOOhGJGAZA2zfvFWwakezUNUja/fumYfWLiPk+GV45p
zSl/9tm9cvxwpF1/P5BmreZvANG7yteX3fF/5XjjffCLu0D6nOUGVdaAV45Z
FXVWnEDa6hODCzeQfhL9qIoHSJtdnXYERL/unR9jCqT/dfdyhADpSlaL91FA
uk9LwiUaSG9b0Ol0GUh/W5xy5QqQdvu5ne8OkH7QPDPsH5AO912eszgcaI72
65iqqFeO+yqKUoSiXzm+ar4rrwCi4zZ+8ADSEje7FbyBdIL+g5s+QJrnrqzR
SyD9OEHGTzTmlWPLTVnxJ4mvHGdNNr/EkvTK8U/PNIa9Oa8cAdv59AA=
"]]
}, Open ]],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citedcitingDataPairDropSelf.txt\>\"", ",",
"citedcitingDataPairDropSelf", ",", "\"\<Table\>\""}], "]"}],
"*)"}]], "Input",
CellChangeTimes->{{3.430621501632794*^9, 3.430621542428358*^9}, {
3.430687135663375*^9, 3.430687146358979*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citingcitedDataPairDropSelf.txt\>\"", ",",
"citingcitedDataPairDropSelf", ",", "\"\<Table\>\""}], "]"}],
"*)"}]], "Input",
CellChangeTimes->{{3.430621501632794*^9, 3.430621542428358*^9}, {
3.430687135663375*^9, 3.430687146358979*^9}, {3.4306874562158537`*^9,
3.4306874824899817`*^9}, {3.43069274518079*^9, 3.430692750103898*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<selfLinkage.txt\>\"", ",", "selfLinkage", ",", "\"\<Table\>\""}],
"]"}], "*)"}]], "Input",
CellChangeTimes->{{3.430692922923068*^9, 3.430692962266844*^9}, {
3.430693205600161*^9, 3.430693209322673*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<citedcitingDataPairDropSelfMedianList.txt\>\"", ",",
"citedcitingDataPairDropSelfMedianList", ",", "\"\<Table\>\""}], "]"}],
"*)"}]], "Input",
CellChangeTimes->{{3.4306216970165873`*^9, 3.4306217373672447`*^9}, {
3.430687155664155*^9, 3.430687161121934*^9}}],
Cell[BoxData[
RowBox[{"(*",
RowBox[{"Export", "[",
RowBox[{
"\"\<NosANDClNames.txt\>\"", ",", "NosANDClNames", ",", "\"\<Table\>\""}],
"]"}], "*)"}]], "Input",
CellChangeTimes->{{3.430621903246661*^9, 3.430621944643807*^9}, {
3.430687166374403*^9, 3.4306871701328993`*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Directory", "[", "]"}]], "Input",
CellChangeTimes->{{3.431753666988061*^9, 3.431753672242594*^9}}],
Cell[BoxData["\<\"/Users/amanokou/TEST_COLLECTION/Bibliometrics/\
JournalCitationClustering/APcluster\"\>"], "Output",
CellChangeTimes->CompressedData["
1:eJxTTMoPSmVkYGCwAGK5j0o/eya+dLTV8qxcB6RPbbEJ3Q6kOcIXrLkMpGef
ujiVZdJLx1the++yAekGXY9MUyC9pvRgghmQ9srmso4B0k0y3+3qgXTPjsQj
jUA6KbtTqwlIR638+2g5kN401Vh0JZD22Pnh4yogLWdu+mMzkJa5Xzh/K5Au
+r6NZxuQnnplVcsTIL3r24HciqkvHbv2PT3hOuOl47RanYwCIP0vkJWvDEhf
iTRP2fz6pSOTlmkRiO6znrrPk+GVo5RJ2p99dq8c50zr1N8PpO/UCjaAaMm0
TWV3/F85BhSGv7gLpKOiN6myBrxy/GPcaMUJpFnvMrtwA+m4jKdVPEBa5e7M
IyD6BN+SGFMgPUl1AkcIkJYXsn4fBaRXzJNxiQbSnCY9TpeBtGRJ2pUrQDrr
1G6+OyBzX88O+wek14Suylkc/spxT8zHmKqoV44VJpUpQtGvHGcsfSyvAKT9
enZ88ADSGr0TFbyB9BqTNzd9gLTQL3mjl0A6a4myn2jMK0cfd1XxJ4mvHJ8I
21xiSXrlWF02l2FvzitHAD4E4W0=
"]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell["Test", "Section",
CellChangeTimes->{{3.521761273640913*^9, 3.521761283010747*^9}}],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"Intersection", "[",
RowBox[{
RowBox[{"{",
RowBox[{"1", ",", "2", ",", "3", ",",
RowBox[{"{",
RowBox[{"5", ",", "4"}], "}"}]}], "}"}], ",",
RowBox[{"{",
RowBox[{"2", ",", "4", ",",
RowBox[{"{",
RowBox[{"5", ",", "4"}], "}"}]}], "}"}]}], "]"}]], "Input",
CellChangeTimes->{{3.532145522594894*^9, 3.5321455819112387`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"2", ",",
RowBox[{"{",
RowBox[{"5", ",", "4"}], "}"}]}], "}"}]], "Output",
CellChangeTimes->{
3.532145534827476*^9, {3.532145569612612*^9, 3.532145582611512*^9},
3.535608677379138*^9, 3.537097447599571*^9, 3.5374088038798437`*^9,
3.537436927171063*^9, 3.537520517826364*^9, 3.53752499658832*^9,
3.537528527422192*^9, 3.5378487210298233`*^9, 3.537939057155095*^9,
3.5409839932251043`*^9, 3.5410510259229803`*^9, 3.5466711089735317`*^9}]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
RowBox[{"jFieldName21SQ", "[",
RowBox[{"[",
RowBox[{"1", ",", "1"}], "]"}], "]"}]], "Input",
CellChangeTimes->{{3.532145815557591*^9, 3.5321458230090103`*^9}}],
Cell[BoxData[
RowBox[{"{",
RowBox[{"\<\"\:52d5\:690d\:7269\:5b66\"\>",
",", "\<\"\:52d5\:690d\:7269\:5b66\"\>"}], "}"}]], "Output",
CellChangeTimes->{3.532145823369342*^9, 3.532145969795494*^9,
3.5356086774906807`*^9, 3.537097447648881*^9, 3.537408804072145*^9,
3.537436927220491*^9, 3.537520517870182*^9, 3.5375249966222563`*^9,
3.537528527467793*^9, 3.5378487210589867`*^9, 3.537939057199341*^9,
3.5409839932686996`*^9, 3.5410510259650393`*^9, 3.5466711090273657`*^9}]
}, Open ]]
}, Open ]]
}, Open ]]
},
WindowSize->{1268, 746},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrintingPageRange->{Automatic, Automatic},
PrintingOptions->{"Magnification"->1.,
"PaperOrientation"->"Landscape",
"PaperSize"->{611.25, 789.5625},
"PostScriptOutputFile"->"/DB1/TEST_COLLECTION/Bibliometrics/kodama/Citation_\
network_of_PCA-cosine-22_clusters.nb6.nb.ps"},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
ShowSelection->True,
FrontEndVersion->"10.0 for Linux x86 (64-bit) (July 9, 2014)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)
(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{
"Info3546703479-1411742"->{
Cell[14150, 297, 771, 17, 44, "Print",
CellTags->"Info3546703479-1411742"],
Cell[14924, 316, 1908, 51, 129, "Print",
CellTags->"Info3546703479-1411742"]}
}
*)
(*CellTagsIndex
CellTagsIndex->{
{"Info3546703479-1411742", 2057971, 47556}
}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 491, 9, 216, "Title"],
Cell[CellGroupData[{
Cell[1083, 35, 94, 1, 67, "Section"],
Cell[CellGroupData[{
Cell[1202, 40, 144, 2, 32, "Input"],
Cell[1349, 44, 1123, 16, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2509, 65, 264, 5, 32, "Input"],
Cell[2776, 72, 1307, 18, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[4120, 95, 233, 4, 32, "Input"],
Cell[4356, 101, 2554, 36, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[6947, 142, 177, 3, 32, "Input"],
Cell[7127, 147, 1053, 18, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[8217, 170, 124, 2, 32, "Input"],
Cell[8344, 174, 807, 16, 41, "Message"]
}, Open ]],
Cell[9166, 193, 324, 7, 32, "Input"],
Cell[CellGroupData[{
Cell[9515, 204, 179, 3, 32, "Input"],
Cell[9697, 209, 910, 16, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[10644, 230, 141, 2, 32, "Input"],
Cell[10788, 234, 1547, 23, 41, "Message"],
Cell[12338, 259, 1527, 24, 23, "Message"]
}, Open ]],
Cell[13880, 286, 88, 1, 32, "Input"],
Cell[CellGroupData[{
Cell[13993, 291, 132, 2, 32, "Input"],
Cell[CellGroupData[{
Cell[14150, 297, 771, 17, 44, "Print",
CellTags->"Info3546703479-1411742"],
Cell[14924, 316, 1908, 51, 129, "Print",
CellTags->"Info3546703479-1411742"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[16893, 374, 146, 2, 67, "Section"],
Cell[17042, 378, 443, 13, 32, "Input"],
Cell[17488, 393, 1007, 25, 143, "Input"],
Cell[18498, 420, 444, 14, 32, "Input"],
Cell[18945, 436, 590, 15, 121, "Input"],
Cell[19538, 453, 1453, 41, 187, "Input"],
Cell[20994, 496, 1226, 30, 220, "Input"],
Cell[22223, 528, 1306, 35, 121, "Input"],
Cell[CellGroupData[{
Cell[23554, 567, 318, 8, 32, "Input"],
Cell[23875, 577, 3911, 78, 231, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[27823, 660, 222, 5, 32, "Input"],
Cell[28048, 667, 3358, 59, 172, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[31443, 731, 121, 2, 32, "Input"],
Cell[31567, 735, 387, 5, 32, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[31991, 745, 153, 2, 47, "Subsection"],
Cell[32147, 749, 1962, 54, 209, "Input"],
Cell[34112, 805, 1375, 33, 187, "Input"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[35536, 844, 98, 1, 67, "Section"],
Cell[35637, 847, 270, 6, 27, "Input"],
Cell[CellGroupData[{
Cell[35932, 857, 176, 4, 27, "Input"],
Cell[36111, 863, 2324, 34, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[38472, 902, 267, 6, 27, "Input"],
Cell[38742, 910, 2414, 56, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[41193, 971, 404, 11, 27, "Input"],
Cell[41600, 984, 1370, 21, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[43007, 1010, 1425, 39, 73, "Input"],
Cell[44435, 1051, 2771, 58, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[47243, 1114, 148, 2, 27, "Input"],
Cell[47394, 1118, 995, 14, 70, "Output"]
}, Open ]],
Cell[48404, 1135, 247, 6, 27, "Input"],
Cell[CellGroupData[{
Cell[48676, 1145, 281, 8, 27, "Input"],
Cell[48960, 1155, 2790, 42, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[51787, 1202, 433, 8, 27, "Input"],
Cell[52223, 1212, 607, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[52867, 1227, 97, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[52989, 1232, 236, 5, 27, "Input"],
Cell[53228, 1239, 1316, 25, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[54593, 1270, 94, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[54712, 1275, 361, 7, 27, "Input"],
Cell[55076, 1284, 649, 11, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[55762, 1300, 421, 10, 27, "Input"],
Cell[56186, 1312, 650, 11, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[56873, 1328, 245, 5, 27, "Input"],
Cell[57121, 1335, 479, 7, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[57649, 1348, 91, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[57765, 1353, 428, 8, 27, "Input"],
Cell[58196, 1363, 723, 12, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[58956, 1380, 367, 9, 27, "Input"],
Cell[59326, 1391, 636, 11, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[60011, 1408, 174, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[60210, 1415, 625, 18, 27, "Input"],
Cell[60838, 1435, 3213, 75, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[64088, 1515, 390, 8, 27, "Input"],
Cell[64481, 1525, 2296, 49, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[66814, 1579, 278, 8, 27, "Input"],
Cell[67095, 1589, 341, 5, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[67473, 1599, 414, 12, 27, "Input"],
Cell[67890, 1613, 2175, 52, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[70102, 1670, 411, 12, 27, "Input"],
Cell[70516, 1684, 2002, 51, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[72555, 1740, 334, 9, 27, "Input"],
Cell[72892, 1751, 1329, 21, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[74270, 1778, 75, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[74370, 1783, 897, 24, 43, "Input"],
Cell[75270, 1809, 1588, 25, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[76895, 1839, 681, 12, 27, "Input"],
Cell[77579, 1853, 3472, 59, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[81088, 1917, 339, 7, 27, "Input"],
Cell[81430, 1926, 68436, 1536, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[149903, 3467, 1789, 35, 93, "Input"],
Cell[151695, 3504, 2294, 42, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[154026, 3551, 449, 12, 27, "Input"],
Cell[154478, 3565, 5844, 150, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[160359, 3720, 1802, 35, 231, "Input"],
Cell[162164, 3757, 2275, 42, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[164476, 3804, 500, 12, 27, "Input"],
Cell[164979, 3818, 5900, 151, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[170916, 3974, 304, 7, 27, "Input"],
Cell[171223, 3983, 3755, 77, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[175015, 4065, 357, 8, 27, "Input"],
Cell[175375, 4075, 2311, 59, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[177735, 4140, 105, 1, 34, "Subsection"],
Cell[177843, 4143, 317, 9, 27, "Input"],
Cell[CellGroupData[{
Cell[178185, 4156, 365, 8, 27, "Input"],
Cell[178553, 4166, 2521, 38, 70, "Output"]
}, Open ]],
Cell[181089, 4207, 1072, 28, 27, "Input"],
Cell[CellGroupData[{
Cell[182186, 4239, 148, 2, 27, "Input"],
Cell[182337, 4243, 1983, 29, 70, "Output"]
}, Open ]],
Cell[184335, 4275, 211, 5, 27, "Input"],
Cell[184549, 4282, 998, 27, 27, "Input"],
Cell[CellGroupData[{
Cell[185572, 4313, 142, 2, 27, "Input"],
Cell[185717, 4317, 2002, 29, 70, "Output"]
}, Open ]],
Cell[187734, 4349, 320, 7, 31, "Input"],
Cell[188057, 4358, 613, 15, 27, "Input"]
}, Open ]],
Cell[CellGroupData[{
Cell[188707, 4378, 89, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[188821, 4383, 321, 7, 27, "Input"],
Cell[189145, 4392, 1189, 22, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[190371, 4419, 371, 10, 27, "Input"],
Cell[190745, 4431, 2670, 78, 70, "Output"]
}, Open ]],
Cell[193430, 4512, 328, 7, 27, "Input"],
Cell[193761, 4521, 238, 6, 31, "Input"],
Cell[CellGroupData[{
Cell[194024, 4531, 268, 7, 27, "Input"],
Cell[194295, 4540, 1049, 20, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[195381, 4565, 446, 9, 27, "Input"],
Cell[195830, 4576, 475, 9, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[196342, 4590, 247, 6, 27, "Input"],
Cell[196592, 4598, 12200, 306, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[208829, 4909, 265, 7, 27, "Input"],
Cell[209097, 4918, 1049, 20, 70, "Output"]
}, Open ]],
Cell[210161, 4941, 202, 4, 27, "Input"],
Cell[210366, 4947, 371, 8, 27, "Input"],
Cell[210740, 4957, 228, 5, 27, "Input"],
Cell[210971, 4964, 358, 9, 27, "Input"],
Cell[211332, 4975, 118, 1, 28, "Text"],
Cell[211453, 4978, 1382, 35, 73, "Input"],
Cell[212838, 5015, 228, 5, 27, "Input"],
Cell[213069, 5022, 285, 7, 27, "Input"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[213403, 5035, 107, 1, 53, "Section"],
Cell[CellGroupData[{
Cell[213535, 5040, 435, 9, 27, "Input"],
Cell[213973, 5051, 10908, 290, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[224918, 5346, 441, 9, 27, "Input"],
Cell[225362, 5357, 10269, 277, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[235668, 5639, 1628, 33, 58, "Input"],
Cell[237299, 5674, 2950, 57, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[240286, 5736, 646, 18, 27, "Input"],
Cell[240935, 5756, 2899, 50, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[243871, 5811, 687, 11, 27, "Input"],
Cell[244561, 5824, 50955, 977, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[295553, 6806, 643, 10, 27, "Input"],
Cell[296199, 6818, 50865, 975, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[347101, 7798, 35, 0, 27, "Input"],
Cell[347139, 7800, 1012, 19, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[348188, 7824, 918, 17, 33, "Input"],
Cell[349109, 7843, 1215, 22, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[350361, 7870, 597, 10, 27, "Input"],
Cell[350961, 7882, 50828, 975, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[401826, 8862, 622, 10, 27, "Input"],
Cell[402451, 8874, 51143, 974, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[453631, 9853, 216, 5, 27, "Input"],
Cell[453850, 9860, 654, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[454541, 9879, 328, 8, 27, "Input"],
Cell[454872, 9889, 1331, 21, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[456240, 9915, 199, 4, 27, "Input"],
Cell[456442, 9921, 712, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[457191, 9940, 315, 7, 33, "Input"],
Cell[457509, 9949, 719, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[458265, 9968, 195, 4, 27, "Input"],
Cell[458463, 9974, 1082, 23, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[459582, 10002, 365, 8, 27, "Input"],
Cell[459950, 10012, 1214, 30, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[461201, 10047, 418, 9, 27, "Input"],
Cell[461622, 10058, 4600, 93, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[466259, 10156, 482, 10, 27, "Input"],
Cell[466744, 10168, 4527, 92, 70, "Output"]
}, Open ]],
Cell[471286, 10263, 315, 7, 27, "Input"],
Cell[471604, 10272, 377, 7, 27, "Input"],
Cell[CellGroupData[{
Cell[472006, 10283, 193, 3, 27, "Input"],
Cell[472202, 10288, 1198, 31, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[473437, 10324, 790, 23, 27, "Input"],
Cell[474230, 10349, 1162, 28, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[475429, 10382, 790, 23, 27, "Input"],
Cell[476222, 10407, 1162, 28, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[477421, 10440, 349, 6, 27, "Input"],
Cell[477773, 10448, 5596, 118, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[483406, 10571, 374, 7, 27, "Input"],
Cell[483783, 10580, 4970, 110, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[488790, 10695, 367, 7, 27, "Input"],
Cell[489160, 10704, 4946, 111, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[494143, 10820, 394, 7, 27, "Input"],
Cell[494540, 10829, 4993, 110, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[499570, 10944, 228, 4, 27, "Input"],
Cell[499801, 10950, 2761, 49, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[502599, 11004, 351, 9, 27, "Input"],
Cell[502953, 11015, 622, 13, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[503612, 11033, 502, 9, 27, "Input"],
Cell[504117, 11044, 1213, 32, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[505367, 11081, 278, 5, 27, "Input"],
Cell[505648, 11088, 2152, 43, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[507837, 11136, 406, 10, 27, "Input"],
Cell[508246, 11148, 620, 13, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[508903, 11166, 550, 10, 27, "Input"],
Cell[509456, 11178, 1214, 32, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[510707, 11215, 286, 8, 27, "Input"],
Cell[510996, 11225, 1119, 24, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[512152, 11254, 39, 0, 27, "Input"],
Cell[512194, 11256, 695, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[512926, 11275, 244, 6, 33, "Input"],
Cell[513173, 11283, 722, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[513932, 11302, 1110, 28, 27, "Input"],
Cell[515045, 11332, 2433, 48, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[517515, 11385, 632, 13, 27, "Input"],
Cell[518150, 11400, 6190, 127, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[524377, 11532, 683, 13, 27, "Input"],
Cell[525063, 11547, 5522, 120, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[530622, 11672, 732, 14, 27, "Input"],
Cell[531357, 11688, 73878, 1225, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[605272, 12918, 225, 4, 27, "Input"],
Cell[605500, 12924, 5950, 96, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[611487, 13025, 692, 14, 27, "Input"],
Cell[612182, 13041, 10204, 276, 70, "Output"]
}, Open ]],
Cell[622401, 13320, 495, 13, 27, "Input"],
Cell[CellGroupData[{
Cell[622921, 13337, 642, 15, 27, "Input"],
Cell[623566, 13354, 2536, 39, 70, "Message"],
Cell[626105, 13395, 2537, 39, 70, "Message"]
}, Open ]],
Cell[CellGroupData[{
Cell[628679, 13439, 501, 11, 27, "Input"],
Cell[629183, 13452, 13151, 314, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[642371, 13771, 542, 11, 27, "Input"],
Cell[642916, 13784, 60160, 1018, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[703113, 14807, 242, 4, 27, "Input"],
Cell[703358, 14813, 5428, 94, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[708823, 14912, 303, 8, 27, "Input"],
Cell[709129, 14922, 1243, 23, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[710409, 14950, 302, 8, 27, "Input"],
Cell[710714, 14960, 1239, 23, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[711990, 14988, 263, 5, 27, "Input"],
Cell[712256, 14995, 1541, 29, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[713846, 15030, 111, 1, 53, "Section"],
Cell[CellGroupData[{
Cell[713982, 15035, 155, 2, 27, "Input"],
Cell[714140, 15039, 1006, 16, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[715183, 15060, 171, 3, 27, "Input"],
Cell[715357, 15065, 357, 5, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[715751, 15075, 105, 1, 27, "Input"],
Cell[715859, 15078, 1009, 16, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[716905, 15099, 175, 3, 27, "Input"],
Cell[717083, 15104, 352, 5, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[717472, 15114, 395, 11, 27, "Input"],
Cell[717870, 15127, 1161, 19, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[719068, 15151, 187, 3, 27, "Input"],
Cell[719258, 15156, 361, 5, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[719656, 15166, 182, 4, 27, "Input"],
Cell[719841, 15172, 375, 5, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[720253, 15182, 306, 6, 27, "Input"],
Cell[720562, 15190, 4633, 145, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[725232, 15340, 235, 5, 27, "Input"],
Cell[725470, 15347, 1142, 20, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[726649, 15372, 386, 10, 27, "Input"],
Cell[727038, 15384, 4152, 141, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[731239, 15531, 91, 1, 53, "Section"],
Cell[CellGroupData[{
Cell[731355, 15536, 94, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[731474, 15541, 138, 2, 27, "Input"],
Cell[731615, 15545, 679, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[732331, 15560, 143, 2, 27, "Input"],
Cell[732477, 15564, 1842, 45, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[734368, 15615, 106, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[734499, 15620, 38, 0, 27, "Input"],
Cell[734540, 15622, 1003, 16, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[735580, 15643, 916, 24, 73, "Input"],
Cell[736499, 15669, 2153, 46, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[738689, 15720, 925, 22, 73, "Input"],
Cell[739617, 15744, 2491, 54, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[742145, 15803, 482, 15, 27, "Input"],
Cell[742630, 15820, 1948, 47, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[744639, 15874, 233, 3, 53, "Section"],
Cell[CellGroupData[{
Cell[744897, 15881, 48, 0, 27, "Input"],
Cell[744948, 15883, 2352, 52, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[747337, 15940, 184, 4, 34, "Subsection"],
Cell[CellGroupData[{
Cell[747546, 15948, 60, 0, 27, "Input"],
Cell[747609, 15950, 1138, 20, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[748784, 15975, 395, 10, 27, "Input"],
Cell[749182, 15987, 567, 8, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[749798, 16001, 137, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[749960, 16006, 46, 0, 27, "Input"],
Cell[750009, 16008, 836, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[750882, 16027, 379, 10, 27, "Input"],
Cell[751264, 16039, 536, 7, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[751849, 16052, 133, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[752007, 16057, 527, 16, 27, "Input"],
Cell[752537, 16075, 565, 8, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[753151, 16089, 132, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[753308, 16094, 43, 0, 27, "Input"],
Cell[753354, 16096, 1958, 50, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[755349, 16151, 524, 16, 27, "Input"],
Cell[755876, 16169, 492, 7, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[756429, 16183, 112, 1, 53, "Section"],
Cell[CellGroupData[{
Cell[756566, 16188, 497, 10, 27, "Input"],
Cell[757066, 16200, 5669, 156, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[762772, 16361, 495, 10, 27, "Input"],
Cell[763270, 16373, 5639, 156, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[768958, 16535, 129, 1, 53, "Section"],
Cell[769090, 16538, 391, 5, 28, "Text"],
Cell[CellGroupData[{
Cell[769506, 16547, 229, 5, 27, "Input"],
Cell[769738, 16554, 13025, 218, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[782812, 16778, 114, 1, 53, "Section"],
Cell[782929, 16781, 574, 13, 27, "Input"],
Cell[CellGroupData[{
Cell[783528, 16798, 699, 16, 27, "Input"],
Cell[784230, 16816, 12710, 305, 70, "Output"]
}, Open ]],
Cell[796955, 17124, 500, 12, 27, "Input"],
Cell[CellGroupData[{
Cell[797480, 17140, 572, 14, 27, "Input"],
Cell[798055, 17156, 11460, 290, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[809564, 17452, 132, 1, 53, "Section"],
Cell[CellGroupData[{
Cell[809721, 17457, 338, 8, 27, "Input"],
Cell[810062, 17467, 13646, 235, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[823757, 17708, 207, 3, 53, "Section"],
Cell[CellGroupData[{
Cell[823989, 17715, 500, 12, 27, "Input"],
Cell[824492, 17729, 10431, 278, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[834960, 18012, 303, 8, 27, "Input"],
Cell[835266, 18022, 1137, 21, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[836440, 18048, 1161, 32, 43, "Input"],
Cell[837604, 18082, 19219, 426, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[856860, 18513, 175, 3, 27, "Input"],
Cell[857038, 18518, 57539, 982, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[914614, 19505, 443, 10, 27, "Input"],
Cell[915060, 19517, 6041, 102, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[921138, 19624, 438, 10, 27, "Input"],
Cell[921579, 19636, 6789, 143, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[928405, 19784, 205, 4, 27, "Input"],
Cell[928613, 19790, 1066, 20, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[929716, 19815, 448, 10, 27, "Input"],
Cell[930167, 19827, 3149, 71, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[933353, 19903, 231, 5, 27, "Input"],
Cell[933587, 19910, 1839, 26, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[935463, 19941, 273, 5, 27, "Input"],
Cell[935739, 19948, 803, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[936579, 19967, 473, 13, 27, "Input"],
Cell[937055, 19982, 1139, 21, 70, "Output"]
}, Open ]],
Cell[938209, 20006, 123, 1, 26, "Text"],
Cell[938335, 20009, 221, 5, 27, "Input"],
Cell[938559, 20016, 645, 18, 27, "Input"],
Cell[CellGroupData[{
Cell[939229, 20038, 322, 8, 27, "Input"],
Cell[939554, 20048, 1128, 21, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[940719, 20074, 208, 3, 27, "Input"],
Cell[940930, 20079, 6599, 142, 70, "Output"]
}, Open ]],
Cell[947544, 20224, 172, 2, 26, "Text"],
Cell[947719, 20228, 180, 4, 27, "Input"],
Cell[947902, 20234, 695, 18, 27, "Input"],
Cell[CellGroupData[{
Cell[948622, 20256, 194, 4, 27, "Input"],
Cell[948819, 20262, 4599, 78, 70, "Output"]
}, Open ]],
Cell[953433, 20343, 220, 3, 26, "Text"],
Cell[953656, 20348, 178, 4, 27, "Input"],
Cell[953837, 20354, 744, 19, 27, "Input"],
Cell[CellGroupData[{
Cell[954606, 20377, 243, 5, 27, "Input"],
Cell[954852, 20384, 3743, 69, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[958644, 20459, 398, 7, 53, "Section"],
Cell[CellGroupData[{
Cell[959067, 20470, 399, 12, 27, "Input"],
Cell[959469, 20484, 3074, 81, 70, "Output"]
}, Open ]],
Cell[962558, 20568, 340, 9, 27, "Input"],
Cell[962901, 20579, 374, 10, 27, "Input"],
Cell[963278, 20591, 251, 5, 27, "Input"],
Cell[963532, 20598, 449, 9, 27, "Input"],
Cell[963984, 20609, 231, 5, 27, "Input"],
Cell[CellGroupData[{
Cell[964240, 20618, 296, 6, 27, "Input"],
Cell[964539, 20626, 1633, 25, 70, "Message"],
Cell[966175, 20653, 1633, 25, 70, "Message"]
}, Open ]],
Cell[CellGroupData[{
Cell[967845, 20683, 477, 10, 27, "Input"],
Cell[968325, 20695, 7672, 187, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[976034, 20887, 756, 16, 27, "Input"],
Cell[976793, 20905, 9002, 209, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[985832, 21119, 1242, 25, 43, "Input"],
Cell[987077, 21146, 11993, 238, 70, "Output"]
}, Open ]],
Cell[999085, 21387, 116, 2, 38, "Text"],
Cell[CellGroupData[{
Cell[999226, 21393, 1399, 27, 43, "Input"],
Cell[1000628, 21422, 22983, 576, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1023648, 22003, 1544, 29, 43, "Input"],
Cell[1025195, 22034, 19844, 528, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1045076, 22567, 1158, 21, 27, "Input"],
Cell[1046237, 22590, 668, 11, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1046942, 22606, 502, 13, 27, "Input"],
Cell[1047447, 22621, 3400, 63, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1050884, 22689, 489, 13, 27, "Input"],
Cell[1051376, 22704, 639, 11, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1052052, 22720, 508, 15, 27, "Input"],
Cell[1052563, 22737, 436, 6, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1053036, 22748, 221, 7, 27, "Input"],
Cell[1053260, 22757, 353, 5, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1053650, 22767, 465, 13, 27, "Input"],
Cell[1054118, 22782, 451, 9, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1054606, 22796, 305, 7, 27, "Input"],
Cell[1054914, 22805, 579, 11, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1055530, 22821, 515, 14, 27, "Input"],
Cell[1056048, 22837, 478, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1056563, 22852, 216, 5, 27, "Input"],
Cell[1056782, 22859, 597, 13, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1057416, 22877, 386, 10, 27, "Input"],
Cell[1057805, 22889, 996, 18, 70, "Message"],
Cell[1058804, 22909, 992, 18, 70, "Message"],
Cell[1059799, 22929, 1272, 33, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1061120, 22968, 114, 1, 53, "Section"],
Cell[1061237, 22971, 251, 6, 27, "Input"],
Cell[CellGroupData[{
Cell[1061513, 22981, 302, 6, 27, "Input"],
Cell[1061818, 22989, 6362, 104, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1068217, 23098, 309, 7, 27, "Input"],
Cell[1068529, 23107, 12881, 221, 70, "Output"]
}, Open ]],
Cell[1081425, 23331, 118, 2, 38, "Text"],
Cell[CellGroupData[{
Cell[1081568, 23337, 597, 15, 27, "Input"],
Cell[1082168, 23354, 22187, 566, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1104392, 23925, 539, 14, 27, "Input"],
Cell[1104934, 23941, 22960, 576, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1127943, 24523, 253, 3, 53, "Section"],
Cell[CellGroupData[{
Cell[1128221, 24530, 124, 2, 27, "Input"],
Cell[1128348, 24534, 218, 3, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1128603, 24542, 781, 19, 27, "Input"],
Cell[1129387, 24563, 2130, 64, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1131554, 24632, 846, 22, 27, "Input"],
Cell[1132403, 24656, 8063, 222, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1140503, 24883, 690, 18, 27, "Input"],
Cell[1141196, 24903, 15624, 434, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1156857, 25342, 681, 16, 27, "Input"],
Cell[1157541, 25360, 1322, 22, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1158900, 25387, 383, 12, 27, "Input"],
Cell[1159286, 25401, 18375, 504, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1177698, 25910, 791, 24, 27, "Input"],
Cell[1178492, 25936, 34523, 912, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1213064, 26854, 205, 3, 37, "Section"],
Cell[CellGroupData[{
Cell[1213294, 26861, 680, 18, 27, "Input"],
Cell[1213977, 26881, 1445, 43, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1215459, 26929, 795, 22, 27, "Input"],
Cell[1216257, 26953, 5327, 147, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1221621, 27105, 638, 17, 27, "Input"],
Cell[1222262, 27124, 10207, 284, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1232506, 27413, 632, 16, 27, "Input"],
Cell[1233141, 27431, 944, 16, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1234122, 27452, 383, 12, 27, "Input"],
Cell[1234508, 27466, 11957, 328, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1246502, 27799, 791, 24, 27, "Input"],
Cell[1247296, 27825, 22585, 598, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1269930, 28429, 101, 1, 37, "Section"],
Cell[1270034, 28432, 154, 2, 27, "Input"],
Cell[CellGroupData[{
Cell[1270213, 28438, 251, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1270489, 28445, 520, 10, 30, "Input"],
Cell[1271012, 28457, 5205, 105, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1276254, 28567, 813, 15, 30, "Input"],
Cell[1277070, 28584, 5152, 85, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1282259, 28674, 911, 16, 43, "Input"],
Cell[1283173, 28692, 4372, 75, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1287582, 28772, 909, 16, 43, "Input"],
Cell[1288494, 28790, 4436, 77, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1292967, 28872, 867, 15, 63, "Input"],
Cell[1293837, 28889, 5152, 85, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1299026, 28979, 710, 13, 43, "Input"],
Cell[1299739, 28994, 4452, 77, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1304228, 29076, 572, 11, 30, "Input"],
Cell[1304803, 29089, 5610, 88, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1310450, 29182, 667, 13, 30, "Input"],
Cell[1311120, 29197, 5381, 87, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1316538, 29289, 670, 13, 30, "Input"],
Cell[1317211, 29304, 4743, 79, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1322003, 29389, 265, 3, 26, "Subsection"],
Cell[CellGroupData[{
Cell[1322293, 29396, 877, 16, 27, "Input"],
Cell[1323173, 29414, 5252, 86, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1328462, 29505, 822, 15, 27, "Input"],
Cell[1329287, 29522, 4449, 78, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1333773, 29605, 724, 13, 27, "Input"],
Cell[1334500, 29620, 4455, 77, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1339004, 29703, 319, 4, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1339348, 29711, 773, 14, 63, "Input"],
Cell[1340124, 29727, 4430, 76, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1344603, 29809, 267, 3, 26, "Subsection"],
Cell[CellGroupData[{
Cell[1344895, 29816, 678, 13, 63, "Input"],
Cell[1345576, 29831, 4618, 77, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1350231, 29913, 679, 13, 63, "Input"],
Cell[1350913, 29928, 5334, 86, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1356284, 30019, 674, 13, 63, "Input"],
Cell[1356961, 30034, 4432, 74, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1361442, 30114, 152, 2, 26, "Subsection"],
Cell[CellGroupData[{
Cell[1361619, 30120, 614, 11, 43, "Input"],
Cell[1362236, 30133, 4706, 78, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1366979, 30216, 662, 12, 43, "Input"],
Cell[1367644, 30230, 4744, 79, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1372425, 30314, 661, 12, 43, "Input"],
Cell[1373089, 30328, 4576, 77, 70, "Output"]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1377714, 30411, 316, 4, 26, "Subsection"],
Cell[CellGroupData[{
Cell[1378055, 30419, 490, 10, 27, "Input"],
Cell[1378548, 30431, 4626, 79, 70, "Output"]
}, Open ]],
Cell[1383189, 30513, 281, 6, 27, "Input"],
Cell[CellGroupData[{
Cell[1383495, 30523, 577, 16, 27, "Input"],
Cell[1384075, 30541, 4844, 118, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1388956, 30664, 336, 9, 27, "Input"],
Cell[1389295, 30675, 2900, 58, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1392256, 30740, 160, 2, 37, "Section"],
Cell[CellGroupData[{
Cell[1392441, 30746, 81, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1392547, 30751, 192, 3, 27, "Input"],
Cell[1392742, 30756, 687, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1393466, 30771, 324, 7, 27, "Input"],
Cell[1393793, 30780, 30804, 787, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1424634, 31572, 276, 6, 27, "Input"],
Cell[1424913, 31580, 30787, 786, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1455737, 32371, 412, 10, 27, "Input"],
Cell[1456152, 32383, 30819, 787, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1487008, 33175, 204, 5, 27, "Input"],
Cell[1487215, 33182, 474, 6, 70, "Output"]
}, Open ]],
Cell[1487704, 33191, 85, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[1487814, 33196, 452, 13, 27, "Input"],
Cell[1488269, 33211, 1135, 20, 70, "Output"]
}, Open ]],
Cell[1489419, 33234, 85, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[1489529, 33239, 370, 10, 27, "Input"],
Cell[1489902, 33251, 1071, 17, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1491010, 33273, 631, 17, 27, "Input"],
Cell[1491644, 33292, 2668, 57, 70, "Output"]
}, Open ]],
Cell[1494327, 33352, 161, 3, 38, "Text"],
Cell[CellGroupData[{
Cell[1494513, 33359, 741, 20, 27, "Input"],
Cell[1495257, 33381, 2433, 47, 70, "Output"]
}, Open ]],
Cell[1497705, 33431, 162, 2, 26, "Text"],
Cell[CellGroupData[{
Cell[1497892, 33437, 491, 13, 27, "Input"],
Cell[1498386, 33452, 2558, 55, 70, "Output"]
}, Open ]],
Cell[1500959, 33510, 119, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[1501103, 33515, 484, 13, 27, "Input"],
Cell[1501590, 33530, 2583, 55, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1504222, 33591, 164, 2, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1504411, 33597, 210, 3, 27, "Input"],
Cell[1504624, 33602, 686, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1505347, 33617, 378, 7, 27, "Input"],
Cell[1505728, 33626, 30635, 786, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1536400, 34417, 335, 7, 27, "Input"],
Cell[1536738, 34426, 30617, 785, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1567392, 35216, 466, 10, 27, "Input"],
Cell[1567861, 35228, 30647, 786, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1598545, 36019, 370, 10, 27, "Input"],
Cell[1598918, 36031, 1075, 17, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1600030, 36053, 709, 18, 27, "Input"],
Cell[1600742, 36073, 2641, 56, 70, "Output"]
}, Open ]],
Cell[1603398, 36132, 119, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[1603542, 36137, 165, 3, 27, "Input"],
Cell[1603710, 36142, 2493, 54, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1606264, 36203, 267, 3, 37, "Section"],
Cell[CellGroupData[{
Cell[1606556, 36210, 109, 3, 27, "Input"],
Cell[1606668, 36215, 1091, 19, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1607796, 36239, 117, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1607938, 36244, 444, 13, 27, "Input"],
Cell[1608385, 36259, 452, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1608886, 36271, 215, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1609126, 36278, 448, 13, 27, "Input"],
Cell[1609577, 36293, 448, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1610074, 36305, 132, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1610231, 36310, 455, 13, 27, "Input"],
Cell[1610689, 36325, 448, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1611186, 36337, 180, 2, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1611391, 36343, 46, 0, 27, "Input"],
Cell[1611440, 36345, 831, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1612308, 36364, 400, 9, 27, "Input"],
Cell[1612711, 36375, 608, 8, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1613380, 36390, 333, 4, 37, "Section"],
Cell[CellGroupData[{
Cell[1613738, 36398, 270, 7, 27, "Input"],
Cell[1614011, 36407, 739, 13, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1614787, 36425, 117, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1614929, 36430, 646, 18, 43, "Input"],
Cell[1615578, 36450, 446, 7, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1616061, 36462, 444, 13, 27, "Input"],
Cell[1616508, 36477, 390, 5, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1616947, 36488, 215, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1617187, 36495, 645, 18, 43, "Input"],
Cell[1617835, 36515, 405, 6, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1618277, 36526, 448, 13, 27, "Input"],
Cell[1618728, 36541, 453, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1619230, 36553, 132, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1619387, 36558, 650, 18, 43, "Input"],
Cell[1620040, 36578, 413, 6, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1620490, 36589, 455, 13, 27, "Input"],
Cell[1620948, 36604, 443, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1621440, 36616, 180, 2, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1621645, 36622, 493, 12, 27, "Input"],
Cell[1622141, 36636, 561, 8, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1622739, 36649, 400, 9, 27, "Input"],
Cell[1623142, 36660, 613, 8, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1623816, 36675, 384, 5, 37, "Section"],
Cell[CellGroupData[{
Cell[1624225, 36684, 313, 7, 27, "Input"],
Cell[1624541, 36693, 847, 14, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1625425, 36712, 117, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1625567, 36717, 689, 19, 27, "Input"],
Cell[1626259, 36738, 473, 7, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1626769, 36750, 444, 13, 27, "Input"],
Cell[1627216, 36765, 392, 5, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1627657, 36776, 215, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1627897, 36783, 688, 19, 43, "Input"],
Cell[1628588, 36804, 444, 6, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1629069, 36815, 448, 13, 27, "Input"],
Cell[1629520, 36830, 447, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1630016, 36842, 132, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1630173, 36847, 693, 19, 43, "Input"],
Cell[1630869, 36868, 447, 6, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1631353, 36879, 455, 13, 27, "Input"],
Cell[1631811, 36894, 454, 6, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1632314, 36906, 180, 2, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1632519, 36912, 538, 13, 27, "Input"],
Cell[1633060, 36927, 592, 9, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1633689, 36941, 400, 9, 27, "Input"],
Cell[1634092, 36952, 610, 8, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1634763, 36967, 318, 4, 37, "Section"],
Cell[CellGroupData[{
Cell[1635106, 36975, 223, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1635354, 36982, 210, 3, 27, "Input"],
Cell[1635567, 36987, 731, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1636335, 37002, 717, 15, 27, "Input"],
Cell[1637055, 37019, 30141, 781, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1667233, 37805, 466, 13, 27, "Input"],
Cell[1667702, 37820, 545, 10, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1668296, 37836, 271, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1668592, 37843, 210, 3, 27, "Input"],
Cell[1668805, 37848, 733, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1669575, 37863, 765, 16, 27, "Input"],
Cell[1670343, 37881, 30923, 791, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1701303, 38677, 514, 14, 27, "Input"],
Cell[1701820, 38693, 546, 10, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1702415, 38709, 320, 4, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1702760, 38717, 210, 3, 27, "Input"],
Cell[1702973, 38722, 710, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1703720, 38737, 812, 16, 27, "Input"],
Cell[1704535, 38755, 30966, 791, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1735538, 39551, 559, 14, 27, "Input"],
Cell[1736100, 39567, 573, 10, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1736722, 39583, 369, 5, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1737116, 39592, 210, 3, 27, "Input"],
Cell[1737329, 39597, 710, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1738076, 39612, 918, 18, 27, "Input"],
Cell[1738997, 39632, 31047, 793, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1770081, 40430, 610, 15, 27, "Input"],
Cell[1770694, 40447, 641, 11, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1771384, 40464, 417, 5, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1771826, 40473, 210, 3, 27, "Input"],
Cell[1772039, 40478, 710, 10, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1772786, 40493, 918, 18, 27, "Input"],
Cell[1773707, 40513, 31108, 793, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1804852, 41311, 709, 16, 27, "Input"],
Cell[1805564, 41329, 668, 12, 70, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1806281, 41347, 92, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1806398, 41352, 84, 2, 27, "Input"],
Cell[1806485, 41356, 447, 9, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1806969, 41370, 150, 3, 27, "Input"],
Cell[1807122, 41375, 353, 7, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1807512, 41387, 154, 3, 27, "Input"],
Cell[1807669, 41392, 385, 8, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1808091, 41405, 152, 3, 27, "Input"],
Cell[1808246, 41410, 353, 7, 70, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1808636, 41422, 150, 3, 27, "Input"],
Cell[1808789, 41427, 451, 9, 70, "Output"]
}, Open ]]
}, Open ]]
}, Closed]],
Cell[CellGroupData[{
Cell[1809301, 41443, 482, 8, 37, "Section"],
Cell[CellGroupData[{
Cell[1809808, 41455, 223, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1810056, 41462, 210, 3, 27, "Input"],
Cell[1810269, 41467, 729, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1811035, 41482, 708, 14, 343, "Input"],
Cell[1811746, 41498, 525, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1812308, 41513, 764, 16, 27, "Input"],
Cell[1813075, 41531, 30161, 781, 297, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1843273, 42317, 354, 9, 27, "Input"],
Cell[1843630, 42328, 1036, 19, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1844703, 42352, 270, 7, 27, "Input"],
Cell[1844976, 42361, 1034, 21, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1846047, 42387, 513, 14, 27, "Input"],
Cell[1846563, 42403, 567, 10, 27, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1847179, 42419, 271, 3, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1847475, 42426, 684, 13, 343, "Input"],
Cell[1848162, 42441, 519, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1848718, 42456, 210, 3, 27, "Input"],
Cell[1848931, 42461, 731, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1849699, 42476, 810, 16, 27, "Input"],
Cell[1850512, 42494, 30451, 787, 297, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1881000, 43286, 349, 9, 27, "Input"],
Cell[1881352, 43297, 1036, 20, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1882425, 43322, 269, 7, 27, "Input"],
Cell[1882697, 43331, 1018, 18, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1883752, 43354, 557, 14, 27, "Input"],
Cell[1884312, 43370, 568, 10, 27, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1884929, 43386, 320, 4, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1885274, 43394, 684, 13, 343, "Input"],
Cell[1885961, 43409, 497, 9, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1886495, 43423, 210, 3, 27, "Input"],
Cell[1886708, 43428, 710, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1887455, 43443, 859, 17, 27, "Input"],
Cell[1888317, 43462, 31026, 792, 297, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1919380, 44259, 299, 8, 27, "Input"],
Cell[1919682, 44269, 1025, 22, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1920744, 44296, 610, 15, 27, "Input"],
Cell[1921357, 44313, 599, 11, 27, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1922005, 44330, 369, 5, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1922399, 44339, 706, 14, 343, "Input"],
Cell[1923108, 44355, 523, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1923668, 44370, 210, 3, 27, "Input"],
Cell[1923881, 44375, 707, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1924625, 44390, 962, 18, 27, "Input"],
Cell[1925590, 44410, 31081, 794, 297, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1956708, 45209, 297, 8, 27, "Input"],
Cell[1957008, 45219, 1051, 21, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1958096, 45245, 657, 16, 27, "Input"],
Cell[1958756, 45263, 667, 12, 27, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1959472, 45281, 417, 5, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1959914, 45290, 708, 14, 343, "Input"],
Cell[1960625, 45306, 498, 9, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1961160, 45320, 210, 3, 27, "Input"],
Cell[1961373, 45325, 712, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1962122, 45340, 961, 18, 27, "Input"],
Cell[1963086, 45360, 31123, 793, 297, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1994246, 46158, 297, 8, 27, "Input"],
Cell[1994546, 46168, 1040, 20, 53, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1995623, 46193, 756, 17, 27, "Input"],
Cell[1996382, 46212, 692, 12, 27, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[1997123, 46230, 92, 1, 34, "Subsection"],
Cell[CellGroupData[{
Cell[1997240, 46235, 150, 3, 27, "Input"],
Cell[1997393, 46240, 445, 9, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1997875, 46254, 200, 4, 27, "Input"],
Cell[1998078, 46260, 353, 7, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1998468, 46272, 202, 4, 27, "Input"],
Cell[1998673, 46278, 383, 8, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1999093, 46291, 200, 4, 27, "Input"],
Cell[1999296, 46297, 352, 7, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1999685, 46309, 198, 4, 27, "Input"],
Cell[1999886, 46315, 453, 9, 27, "Output"]
}, Open ]]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[2000400, 46331, 91, 1, 67, "Section"],
Cell[2000494, 46334, 108, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[2000627, 46339, 184, 3, 27, "Input"],
Cell[2000814, 46344, 1533, 22, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2002384, 46371, 219, 5, 27, "Input"],
Cell[2002606, 46378, 1308, 24, 27, "Output"]
}, Open ]],
Cell[2003929, 46405, 317, 7, 27, "Input"],
Cell[CellGroupData[{
Cell[2004271, 46416, 58, 0, 27, "Input"],
Cell[2004332, 46418, 9159, 155, 343, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2013528, 46578, 120, 1, 27, "Input"],
Cell[2013651, 46581, 8065, 137, 328, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2021753, 46723, 330, 7, 27, "Input"],
Cell[2022086, 46732, 8688, 147, 343, "Output"]
}, Open ]],
Cell[2030789, 46882, 371, 8, 27, "Input"],
Cell[CellGroupData[{
Cell[2031185, 46894, 125, 2, 27, "Input"],
Cell[2031313, 46898, 1028, 14, 27, "Output"]
}, Open ]],
Cell[2032356, 46915, 369, 8, 27, "Input"],
Cell[CellGroupData[{
Cell[2032750, 46927, 214, 4, 27, "Input"],
Cell[2032967, 46933, 830, 16, 27, "Output"]
}, Open ]],
Cell[2033812, 46952, 337, 8, 27, "Input"],
Cell[2034152, 46962, 537, 13, 27, "Input"],
Cell[2034692, 46977, 391, 8, 27, "Input"],
Cell[2035086, 46987, 319, 7, 27, "Input"],
Cell[2035408, 46996, 321, 7, 27, "Input"],
Cell[2035732, 47005, 281, 6, 27, "Input"],
Cell[2036016, 47013, 114, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[2036155, 47018, 138, 2, 27, "Input"],
Cell[2036296, 47022, 730, 13, 27, "Output"]
}, Open ]],
Cell[2037041, 47038, 576, 16, 27, "Input"],
Cell[2037620, 47056, 262, 6, 27, "Input"],
Cell[CellGroupData[{
Cell[2037907, 47066, 163, 3, 27, "Input"],
Cell[2038073, 47071, 772, 15, 27, "Output"]
}, Open ]],
Cell[2038860, 47089, 281, 6, 27, "Input"],
Cell[2039144, 47097, 116, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[2039285, 47102, 102, 1, 27, "Input"],
Cell[2039390, 47105, 780, 13, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2040207, 47123, 123, 2, 27, "Input"],
Cell[2040333, 47127, 862, 15, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2041232, 47147, 421, 10, 27, "Input"],
Cell[2041656, 47159, 3494, 56, 89, "Output"]
}, Open ]],
Cell[2045165, 47218, 387, 8, 27, "Input"],
Cell[2045555, 47228, 247, 5, 27, "Input"],
Cell[2045805, 47235, 95, 1, 26, "Text"],
Cell[CellGroupData[{
Cell[2045925, 47240, 203, 3, 27, "Input"],
Cell[2046131, 47245, 776, 14, 27, "Output"]
}, Open ]],
Cell[2046922, 47262, 777, 21, 27, "Input"],
Cell[2047702, 47285, 509, 14, 27, "Input"],
Cell[2048214, 47301, 826, 22, 27, "Input"],
Cell[2049043, 47325, 559, 15, 27, "Input"],
Cell[CellGroupData[{
Cell[2049627, 47344, 429, 11, 27, "Input"],
Cell[2050059, 47357, 1499, 21, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2051595, 47383, 265, 5, 27, "Input"],
Cell[2051863, 47390, 1051, 19, 27, "Output"]
}, Open ]],
Cell[2052929, 47412, 321, 8, 27, "Input"],
Cell[2053253, 47422, 419, 9, 27, "Input"],
Cell[2053675, 47433, 285, 7, 27, "Input"],
Cell[2053963, 47442, 345, 8, 27, "Input"],
Cell[2054311, 47452, 291, 7, 27, "Input"],
Cell[CellGroupData[{
Cell[2054627, 47463, 123, 2, 27, "Input"],
Cell[2054753, 47467, 739, 13, 27, "Output"]
}, Open ]]
}, Open ]],
Cell[CellGroupData[{
Cell[2055541, 47486, 89, 1, 67, "Section"],
Cell[CellGroupData[{
Cell[2055655, 47491, 390, 11, 27, "Input"],
Cell[2056048, 47504, 502, 10, 27, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[2056587, 47519, 182, 4, 27, "Input"],
Cell[2056772, 47525, 491, 8, 33, "Output"]
}, Open ]]
}, Open ]]
}, Open ]]
}
]
*)
(* End of internal cache information *)
GitHub Events
Total
- Watch event: 1
- Push event: 5
Last Year
- Watch event: 1
- Push event: 5