Editor at 05:41, 3 February 2023

2023-02-03T05:41:28Z

@@ Line 14: / Line 14: @@
 {{#repeat:TableRow6/author|6|
 {{#cdr:
-{{#lua:
+{{#invoke:Index|Author| {{{1|Z}}} {{#SearchTitle:.*|Reference}}}}
 |&&}}
 |&&}}

Editor at 05:03, 7 October 2008

2008-10-07T05:03:19Z

New page

<noinclude>著者名のインデクス {{{1}}} 値（文字列） {{{2}}} ページタイトル (FL/LB/..)</noinclude>
This page is automatically generated using [[Help:Contents|''Persist'' function]] (Last updated: {{REVISIONTIMESTAMP}}). 

{| width=100%
|-
|align=left| {{#persist:FLindex/author {{PrevLetter|{{{1}}}}}|go to Index {{PrevLetter|{{{1}}}}}|Index/author|2|{{PrevLetter|{{{1}}}}};FL Author}}
|align=center| [[Index:{{{2}}}|<big>Back to Index</big>]]
|align=right| {{#persist:FLindex/author {{NextLetter|{{{1}}}}}|go to Index {{NextLetter|{{{1}}}}}|Index/author|2|{{NextLetter|{{{1}}}}};FL Author}}
|}
<hr>

{| class="wikitable sortable"
! Author || #articles || earliest paper || latest paper || peak year || major coauthors
{{#repeat:TableRow6/author|6|
{{#cdr:
{{#lua:
local key = stdin:match("%w+");
local H = {};
local I = {};
for line in stdin:gmatch("(%S+)") do
for names, ja, yr in string.gmatch(line,"([%a:_']+),([%w\._]+),([%d]+),") do
for name in string.gmatch(names,"([%a_']+)") do
if (string.sub(name,0,1) == key) then
if (H[name] == nil) then
tmp = {};
tmp[line] = tonumber(yr);
H[name] = tmp;
table.insert(I, name);
else
tmp = H[name];
tmp[line] = tonumber(yr);
end
end
end
end
end
table.sort(I);
local ret = "";
for i=1,table.getn(I) do
local author = I[i];
local tmp = H[author];
local count = 0;
local peakDist = {};
local coAu = {};
local earliest = 3000;
local latest = 0;
for k,v in pairs(tmp) do
--check earliest and latest publications
if (earliest > v) then earliest = v; end
if (latest < v) then latest = v; end
count = count + 1;
for i=v-2,v+2 do
if (peakDist[i] == nil)
then peakDist[i] = 3-math.abs(v-i);
else peakDist[i] = peakDist[i] + 3-math.abs(v-i);
end
end
--check major coauthors
for names, ja, yr in string.gmatch(k,"([%a:_']+),([%w\._]+),([%d]+),") do
for name in string.gmatch(names,"([%a_']+)") do
if (name ~= author) then
if (coAu[name] == nil) then
coAu[name] = 1;
else
coAu[name] = coAu[name] + 1;
end
end
end
end
end
local peak = 0;
local peakY = 0;
for k,v in pairs(peakDist) do
if (v > peak) then peakY = k; peak = v; end
end
local auL = "";
if (count > 4) then
for k,v in pairs(coAu) do
if (v >= 3) then
if (auL == "") then
auL = k; else auL = auL .. ":" .. k; end
end
end
end
ret = ret .. "&&" .. author ..
"&&" .. count .. "&&" .. earliest .. "&&" .. latest ..
"&&" .. peakY .. "&&" .. auL .. "\n";
end
print(ret);
| {{{1|Z}}} {{#SearchTitle:.*|Reference}}
}}
|&&}}
|&&}}
|}

[[#top]]

Template:Index/author - Revision history

Editor at 05:41, 3 February 2023

Editor at 05:03, 7 October 2008