前書き

あなたは駐車場のスーパーバイザーであり、マネージャーはサイズを極端に縮小する準備をしています。

これは、昨年のPATの問題を単純化および適合させたバージョンですトップレベルです。

チャレンジ

あなたは、同時に多くしているどのように多くの車を計算するように要求され、最大で。

標準ルールが適用されます。そしてこれはコードゴルフなので、最短のコードが勝ちます。

最初の行は、エントリの量（超えないで100,000、あなたが好きならば、あなたの入力は、どこ入力端を決定する唯一のその場しのぎであるため、この行を含めることはできません）。次のテキストには、1行に1つのエントリが含まれています。また、各エントリには3つの数字が含まれています。

<Car plate number> <Time (seconds) since open> <0(In) | 1(Out)>

修正2：入力としてトリプルの配列を使用しても問題ありません。

変更3： 1つのエントリの番号の順序を変更できます。そして、使用するものを選択できます。（備考セクションを参照）

次のことを前提として、入力が有効であることが保証されます。

• Car plate number10000〜の範囲の整数です99999
• Time0〜の範囲の整数です86400

そして

• エントリは必ずしも時系列に並んでいるとは限りません。
• 最初の秒の前に車はありません。
• 最後の1秒が過ぎても必ずしも車がなくなるわけではありません。
• 車は入る前に出発しません。
• Car plate numberユニークです。（ただし、同じ車が複数回訪問する場合があります）
• そのため、車が既に入っている場合、その区画に入ることは不可能です。
• 同じ車が同じように出入りしないでしょうtime。
• 車は入出庫時にロット内にあるとみなされます。

例1

入力

11
97845 36000 1
75487 16500 1
12345 16 0
75486 3300 0
12345 6500 1
97845 32800 0
12345 16400 0
97846 16501 1
97846 16500 0
75486 8800 1
75487 3300 0

出力

3

説明

で16500、車12345と75487駐車場にいた。

例2

多くのコードが失敗したので、これを作成しました。

入力（最初の行は省略）

12345 16400 0
12345 16500 1
75487 16500 0
75487 16600 1

出力

2

説明

で16500、車12345と75487駐車場にいた。

備考

実際には、3つすべてが出力に必要なわけではありません。少なくとも、結果にはプレート+時間またはイン/アウト+時間のみが必要です。しかし、アルゴリズムは2つの状況下でわずかに異なるため、特定の言語では、短い方の選択は不明のままです。そしてもちろん、3つの数字すべてを使用できます。だから私は彼らを挑戦に任せた。

Mathematica、33バイト

-Min@Accumulate[2#2-1&@@@Sort@#]&

ナンバープレート情報を必要としないはるかに単純なアルゴリズムがあることを理解するために、問題の説明をよく読む必要がありました。

整数を返す名前のない関数。入力形式は、形式の順序付きトリプルのリストです{time, 0|1, license plate}。まずSortingから始めます。これは、リストを時系列にし、0sをsの前に並べ替えることによって時間的なつながりを壊し1ます。その後2#2-1&@@@、到着/出発情報を保持し、残りを忘れ、0sを-1 sにます。

Accumulateそのリストの現在の合計を計算します。結果は、到着/出発ごとに駐車場にある車の数のマイナスのリストです。次にMin、これらの最小（最も負）を選択し、負の符号を取り除きます。

Mathematica、56バイト

Max[<|#|>~Count~0&/@FoldList[List,{},#3->#2&@@@Sort@#]]&

元の投稿（最初のいくつかのコメントはこの投稿を参照）。整数を返す名前のない関数。入力形式は、次の形式の順序付きトリプルのリストです{time, 0|1, license plate}。

タイムエントリを最初に、イン/アウトエントリを2番目に配置することを選択する理由はSort@#、リストを時系列でソートし、同時の場合は出発前に到着を記録するためです。その後#3->#2&@@@、フォームの「ルール」のリストを返します。これは、license plate -> 0|1時間順にソートされたままです。

次に、FoldList[List,{},...]そのルールのリストのすべての初期セグメントのリストを作成します。実際、最初のセグメントを台無しにします。k深さ2に1つのルール、深さ3に1つのルール、...、及び深さに1つの規則にリストされてアップ番目初期セグメント終了k+1。（FoldList[Append,{},...]より自然な結果が得られます。）ただし、<|#|>これらの初期セグメントのそれぞれを「関連付け」に変換します。これには、2つの望ましい効果があります。まず、作成したネストリスト構造を完全にフラット化します。第二に、後のルールが以前のルールを上書きすることを強制します。これはまさにここで必要なことです。駐車場を出た車の場合、最初のエントリの記録は完全になくなります（再入車の場合も同様） 。

したがって、あとは、これらの各アソシエーションにsがCountいくつあるかだけで0、を取得しMaxます。

Haskell、76 63 61バイト

@nimiの提案のバリエーションによって2バイトが節約されました。

f l=maximum$scanl1(+)[(-1)^c|i<-[0..8^6],(_,b,c)<-l,i==2*b+c]

引数を問題文で指定された順序のトリプルのリストとして期待します。

可能性のある時間（およびそれ以上）ごとに、最初に車のイベントを検索し、次に車のイベントを退出し、プラスまたはマイナスのリストに変換します。このリストの部分和を取り、次にこれらの部分和の最大値を取ります。

PHP 7.1、126の 117バイト

for(;$s=file(i)[++$i];)$d[+substr($s,6)][$s[-2]]++;ksort($d);foreach($d as$a){$r=max($r,$n+=$a[0]);$n-=$a[1];}echo$r;

fileから入力を受け取りi、最初の行を無視します。で実行し-rます。
入力には末尾の改行が必要です。交換する-2と-3Windows用。

壊す

# generate 2-dim array; first index=time, second index=0/1 (in/out);
# values=number of cars arriving/leaging; ignore plate number
for(;$s=file(i)[++$i];) # read file line by line (includes trailing newline)
    $d[+substr($s,6)][$s[-2]]++;    # substring to int=>time, last but one character=>1/0
ksort($d);                      # sort array by 1st index (time)
foreach($d as$a)    # loop through array; ignore time
{
    $r=max($r,                      # 2. update maximum count
        $n+=$a[0]                   # 1. add arriving cars to `$n` (current no. of cars)
    );
    $n-=$a[1];                      # 3. remove leaving cars from `$n`
}
echo$r;                         # print result

C、147バイト

完全なプログラムstdin。入力をから読み取ります。

int r[86402]={},u,i,n,t;g(s,o){for(;s<86401;n<r[s]?n=r[s]:0,++s)r[s+o]+=o?-1:1;}main(){for(n=0;scanf("%d%d%d",&u,&t,&i)==3;g(t,i));printf("%d",n);}

ideoneで試してみてください。

オクターブ、50、64の 38バイト

@(A)-min(cumsum(sortrows(A)(:,2)*2-1))

@Greg MartinのMathematicaの答えと同じ

関数は3列の配列を取得します [time, i/o,plateN]

前の答え：

@(A){[t,O]=A{:};max(cumsum(sparse({++t(!O),t}{2},1,!O*2-1)))}{2}

この関数は、3つの入力を含むセル配列の最初の2つの要素からのt時間とOI / Oの2つの入力のみを取得Aします！

既存の車の記録された時間数ごとにカウントするために作成されたスパース行列。退出時間+ 1が車の出口に考慮され、対応する1が-1に変更され、0が1に変更されます
。
次に、ロット内の現在の車の数と最大数を表す計算された累積合計が求められます。

JavaScript（ES6）、63 73 71バイト

d=>Math.max(...d.sort((a,[b,c])=>a[s=0]-b||a[1]-c).map(e=>s+=1-e[1]*2))

これは、順序付けされたエントリの配列として入力を受け入れます[time, inout, plate]。残念ながら、同一のinout時間は、現時点で両方の車がロット内で考慮されることを意味するため、ソートアルゴリズムは11バイトのコストの0前に注文する必要があり1ます。

クレジット

• map関数内でシフトと乗算を完全に移動して1バイトを節約しました（Neilに感謝）。
• sort関数で非構造化引数を使用して、さらに2バイトを保存しました（edc65に感謝）。

デモ

// test the two examples
console.log([[[36000,1],[16500,1],[16,0],[3300,0],[6500,1],[32800,0],[16400,0],[16501,1],[16500,0],[8800,1],[3300,0]],[[16400,0],[16500,1],[16500,0],[16600,1]]].map(
// answer submission
d=>Math.max(...d.sort((a,[b,c])=>a[s=0]-b||a[1]-c).map(e=>s+=1-e[1]*2))
));

JavaScript（ES6）、83 … 68 70バイト

編集：2番目の例をサポートするために修正

入力を配列の[in_out, time, plate]配列として受け取ります。しかし、plate実際には列は無視されます。

a=>a.sort(([a,b],[c,d])=>b-d||a-c).map(v=>a=(n+=1-v[0]*2)<a?a:n,n=0)|a

テスト

let f =

a=>a.sort(([a,b],[c,d])=>b-d||a-c).map(v=>a=(n+=1-v[0]*2)<a?a:n,n=0)|a

console.log(f([
  [1, 36000, 97845],
  [1, 16500, 75487],
  [0, 16,    12345],
  [0, 3300,  75486],
  [1, 6500,  12345],
  [0, 32800, 97845],
  [0, 16400, 12345],
  [1, 16501, 97846],
  [0, 16500, 97846],
  [1, 8800,  75486],
  [0, 3300,  75487]
]));

console.log(f([
  [0, 16400, 12345],
  [1, 16500, 12345],
  [0, 16500, 75487],
  [1, 16600, 75487]
]));