おそらく、さまざまな店のドアにこれらのサインを見たことがあります。

営業時間

mon-fri 0900-1800
土日1100-1530

ここでのタスクは、週全体の営業時間のリストから、同じ営業時間を持つ連続した日をグループ化するようなサインを生成することです。週は、連続していると見なされるものに対して「ラップアラウンド」することに注意してください。

入力：

• 月曜日から始まる、週の各日の営業時間を表す7つの要素。
• 各要素は、XXXX-XXXXという形式の文字列です

• 入力例：

  0900-1800 0900-1800 0930-1730 0930-1730 0900-1500 1100-1500 1100-1500
  

• 入力を配列として送信しても構いません（たとえば、stdinから読み取らない場合は関数への入力として）

出力：

• 営業時間のリスト。同じ営業時間の連続した日が範囲として表示されます。日曜日（最終日）と月曜日（最初の日）も連続した日であることに注意してください。
• 前日または後日と営業時間が類似していない日は単独で印刷されます
• 日は3つの小文字で指定されます：mon tue wed thu fri sat sat sun
• 入力の最初の要素はmonに、tueの隣などに対応することに注意してください。
• 営業時間は入力のように表示されます

• 2つの例

  mon-fri 0900-1800, sat-sun 1100-1500
  mon-wed 1030-1530, thu 100-1800, fri-sun 1200-1630
  

• 出力はソートされる必要があるため、範囲は曜日が週の順序で表示されます。月曜日が最初であることが好まれますが、週が終わるため、グループの最初ではない場合があります。したがって、この場合、tueが最初の範囲です。

  tue-fri 0900-1800, sat-mon 1100-1500
  

• 連続しない限りグループ化しないでください。ここでは水曜日と金曜日の営業時間は同じですが、営業時間の異なる木曜日で区切られているため、単独でリストされています。

  mon-tue 1000-1200, wed 0900-1500, thu 1000-1800, fri 0900-1500, sat-sun 1000-1500
  

• 出力は、ここの例のようにコンマ区切りにするか、上の例のように改行で区切ることができます。

テストケース

1行目は入力、2行目は期待される出力

0900-1800 0900-1800 0900-1800 0900-1800 0900-1800 1100-1500 1100-1500
mon-fri 0900-1800, sat-sun 1100-1500

0900-1800 0900-1800 0900-1800 0930-1700 0900-1800 1100-1500 1100-1500
mon-wed 0900-1800, thu 0930-1700, fri 0900-1800, sat-sun 1100-1500

1100-1500 0900-1800 0900-1800 0900-1800 0900-1800 1100-1500 1100-1500
tue-fri 0900-1800, sat-mon 1100-1500

1100-1500 1100-1500 0900-1800 0900-1800 0900-1800 0900-1800 1100-1500
wed-sat 0900-1800, sun-tue 1100-1500

1200-1500 1100-1500 0900-1800 0900-1800 0900-1800 0900-1800 1100-1500
mon 1200-1500, tue 1100-1500, wed-sat 0900-1800, sun 1100-1500

ルール

これはコードゴルフなので、バイト単位の最短回答が勝ちです。

JavaScriptの（ES6）、182の 173 170 163 157バイト

edc65を使用して6バイトを保存しました

入力を文字列の配列として受け取り、結果を直接コンソールに出力します。

h=>{for(D="montuewedthufrisatsun".match(/.../g),d=c=i=j=0;j<8;y=d)h[i]==h[6]?i++:(v=h[d=(i+j++)%7])!=c&&(j>1&&console.log(D[x]+(x-y?'-'+D[y]:''),c),x=d,c=v)}

書式設定およびコメント化

h => {                               // input = list h of opening hours
  for(                               //
    D = "montuewedthufrisatsun"      // D = list of abbreviated names of days
        .match(/.../g),              //
    d =                              // d = current day of week
    c =                              // c = current opening hours
    i =                              // i = first day of week to process
    j = 0;                           // j = day counter
    j < 8;                           // stop when 7 days have been processed
    y = d                            // update y = last day of current day range
  )                                  //
  h[i] == h[6] ?                     // while the opening hours of day #i equal the opening
    i++                              // hours of sunday: increment i
  : (v = h[d = (i + j++) % 7]) != c  // else, if the new opening hours (v) of the current
    && (                             // day (d) doesn't match the current opening hours (c):
      j > 1 &&                       //   if this is not the first iteration:
        console.log(                 //     print:
          D[x] +                     //     - the first day of the current day range (x)
          (x - y ?                   //     - followed by either an empty string
            '-' + D[y]               //       or a '-' and the last day of the range
          : ''),                     //       (if they differ)
          c                          //     - the corresponding opening hours
        ),                           //   (endif)
      x = d,                         //   update x = first day of current day range
      c = v                          //   update c = current opening hours
    )                                // (endif)
}                                    // (end)

テストケース

let f =

h=>{for(D="montuewedthufrisatsun".match(/.../g),d=c=i=j=0;j<8;y=d)h[i]==h[6]?i++:(v=h[d=(i+j++)%7])!=c&&(j>1&&console.log(D[x]+(x-y?'-'+D[y]:''),c),x=d,c=v)}

f(["0900-1800", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500", "1100-1500"]);
console.log('-');
f(["0900-1800", "0900-1800", "0900-1800", "0930-1700", "0900-1800", "1100-1500", "1100-1500"]);
console.log('-');
f(["1100-1500", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500", "1100-1500"]);
console.log('-');
f(["1100-1500", "1100-1500", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500"]);
console.log('-');
f(["1200-1500", "1100-1500", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500"]);

バッチ、334バイト

@echo off
set/af=l=w=0
set h=%7
call:l mon %1
call:l tue %2
call:l wed %3
call:l thu %4
call:l fri %5
call:l sat %6
call:l sun %7
if not %w%==0 set l=%w%
if %f%==0 set f=mon
call:l 0 0
exit/b
:l
if not %h%==%2 (
if %f%==0 (set w=%l%)else if %f%==%l% (echo %f% %h%)else echo %f%-%l% %h%
set f=%1
set h=%2
)
set l=%1

入力をコマンドラインパラメーターとして受け取り、各グループを個別の行に出力します。毎日の時間を前日と比較fし、グループの最初の日、そのグループhの時間、グループlの最後の日w、最後のグループが週の始めに戻る時間を追跡することで機能します。不一致が見つかった場合、週の折り返しが有効でない限り、前のグループが出力されます。最後に、すべての日が処理されると、最後のグループが週の折り返しと、出力前にすべての時間が同じであることが判明したかどうかについて調整されます。0空の文字列は、バッチで比較するためにより多くのバイトを必要とするため、プレースホルダーとして使用されます。

ゼリー、87 84 80 75 バイト

• @Dennisの親切な助けを借りて4バイト（'クイック、 "フラット"で使用したハックを修正）

より良い方法があることは確かですが、今のところ：

Ṫ2ị$€;@µ+\µżṙ1’$Ṗị“ḅạṄMḤ9\E¥LḃɓṅÐĿ;$»s3¤Q€j€”-
ṙ7Ḷ¤Œr'€Ėµ2ịLµÐṂḢ
ÇṪḢ€ż@ÇÑ$G

TryiItOnline

どうやって？

            “ḅạṄMḤ9\E¥LḃɓṅÐĿ;$» - compressed string "montuewedthufrisatsun"
                  v  v
Ṫ2ị$€;@µ+\µżṙ1’$Ṗị -- s3¤Q€j€”- - Link 1, getDayStrings: [offset, groupedList]
Ṫ                               - Tail: get groupedList
 2ị$€                           - second index of each: get group sizes, e.g. mon-thu is 4
     ;@                         - concatenate (reversed arguments): prepend with offset
       µ                        - monadic chain separation
        +\                      - cumulative reduce with addition: start indexes
          µ                     - monadic chain separation
           ż                    - zip with
               $                - last two links as a monad
            ṙ1                  -     rotated left by one
              ’                 -     decrement:  end indexes
                Ṗ               - pop: remove last one, it's circular
                 ị              - index into
                        ¤       - last two links as a nilad
                    --          -     compressed string of weekdays (as shown at the top)
                      s3        -     split into 3s
                        Q€      - unique items for each: [tue,tue] -> [tue]
                          j€    - join each with
                            ”-  - literal string "-"

ṙ7Ḷ¤Œr'€Ėµ2ịLµÐṂḢ - Link 2: CalculateGroupingData: list of time strings
   ¤              - last two links as a nilad
ṙ                 -    rotate time strings list left by
 7Ḷ               -    range 7: [0,1,2,3,4,5,6]
       €          - for each
    Œr            -     run length encode
      '           -     flat - i.e. don't vectorise
        Ė         - enumerate [[1,[groupsFromMon]],[2,[groupsFromTue], ...]
         µ        - monadic chain separation
              ÐṂ  - filter for minimum of
             L    -     length of
          2ị      -     item at index 2: The number of groupings
                Ḣ - head: get the first occurring minimal (i.e Mon, or Tue, ...)

ÇṪḢ€ż@ÇÑ$G - Main link: list of time strings
Ç          - call last link (1) as a monad: get the offset and grouping
 Ṫ         - tail: get the grouping
  Ḣ€       - head each: get the time information
        $  - last two links as a monad
      Ç    -      call last link (1) as a monad: get the offset and grouping
       Ñ   -      call the next link as a monad: get the day strings
    ż@     - zip (with reversed arguments)
         G - arrange as a group (performs a tabulation to nicely align the result)

JavaScript（ES6）、171 169バイト

a=>a.map((e,d)=>(d='montuewedthufrisatsun'.substr(d*3,3),e!=h&&(f?o(f):w=l,f=d,h=e),l=d),f='',l=w='sun',h=a[6],o=f=>console.log((f==l?l:f+'-'+l)+' '+h))&&o(f||'mon',l=w)

入力を配列として受け取り、別々の行でコンソールに出力します。これは、ほぼ正確に私のバッチ回答の移植です。fもちろん、空の文字列になりましデフォルトで、私はまた、デフォルトことができますがlとwに'sun'（私はに初期化をマージすることができたので、私のバッチで3つのバイトを保存したセンチネル値を使用set/a）。

ベーコン、514の 496 455バイト

以下のBASICプログラムは、インデント付きで示されています。ただし、インデントなしでは、455バイトで構成されます。

タイムスケジュールを連想配列のインデックスとして使用するという考え方です。その後、各日はビットを表します：月曜日=ビット0、火曜日=ビット1、水曜日=ビット2など。連想配列のメンバーの実際の値は、バイナリORを使用して日の各ビットによって計算されます。

その後、連想配列メンバーにビット0から始まる連続するビットがいくつあるかを確認する必要があります。

ビット0とビット6が設定されている場合、週の折り返しがあります。その場合、次のビットシーケンスの開始点を探し始め、この開始位置を記憶します。残りのシーケンスを出力します。ビット6に達すると、すぐに記憶された位置で日付範囲を終了する必要があります。

LOCAL n$[]={"mon","tue","wed","thu","fri","sat","sun"}
GLOBAL p ASSOC int
SUB s(VAR t$ SIZE a)
    FOR i = 0 TO a-1
        p(t$[i])=p(t$[i])|BIT(i)
    NEXT
    LOOKUP p TO c$ SIZE o
    b=e=0
    REPEAT
        FOR i=0 TO o-1
            IF p(c$[i])&BIT(b) THEN
                IF b=0 AND p(c$[i])&65=65 THEN
                    WHILE p(c$[i])&BIT(b)
                        INCR b
                    WEND
                    e=b
                    BREAK
                FI
                ?n$[b];
                r=b
                REPEAT
                    INCR b
                UNTIL NOT(p(c$[i])&BIT(b))
                IF e AND b>6 THEN
                    ?"-",n$[e-1];
                ELIF b-r>1 THEN
                    ?"-",n$[b-1];
                FI
                ?" ",c$[i]
            FI
        NEXT
    UNTIL b>6
    FREE p
ENDSUB

次の呼び出しを使用してSUBを呼び出します。

s("0900-1800", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500", "1100-1500")
PRINT "======"
s("0900-1800", "0900-1800", "0900-1800", "0930-1700", "0900-1800", "1100-1500", "1100-1500")
PRINT "======"
s("1100-1500", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500", "1100-1500")
PRINT "======"
s("1100-1500", "1100-1500", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500")
PRINT "======"
s("1200-1500", "1100-1500", "0900-1800", "0900-1800", "0900-1800", "0900-1800", "1100-1500")

出力：

mon-fri 0900-1800
sat-sun 1100-1500
======
mon-wed 0900-1800
thu 0930-1700
fri 0900-1800
sat-sun 1100-1500
======
tue-fri 0900-1800
sat-mon 1100-1500
======
wed-sat 0900-1800
sun-tue 1100-1500
======
mon 1200-1500
tue 1100-1500
wed-sat 0900-1800
sun 1100-1500