JS 依照元素出現數量排序

同樣是最近遇到的狀況,需要利用陣列內元素出現的數量進行排序,以下為範例程式:

var array = ["1", "2", "4", "5", "2", "4", "2", "3"];
var str = array.toString();
var filter = [];
var result = [];
document.write("原始陣列:" + array + "<br>");

var get = function (str, tar, arr, tmp) {
    if (str.indexOf(tar) >= 0) {
        tmp = str.slice(str.indexOf(tar) + 1);
        arr.push(tar);
        get(tmp, tar, arr, tmp);
    }
    return arr;
}

for (i in array) {
    var elm = [];
    var tmp;
    var fstr = filter.join();
    if (fstr.indexOf(array[i]) >= 0) {
        continue;
    } else {
        var tmp_arr = get(str, array[i], elm, tmp);
        result.push(tmp_arr.length + ':' + tmp_arr[0]);
        filter.push(array[i]);
    }
}

result.sort();
result.reverse();

//按照出現次數排序,不刪除重複元素
var finishArray = [];

for (index in result) {
    var show = result[index].split(':');
    for (i = 0; i < show[0]; i++) {
        finishArray.push(show[1]);
    }
}
document.write("按出現次數排序,不刪除重複元素:" + finishArray + "<br>");

//按照出現次數排序,刪除重複元素
var finishArray = [];
for (index in result) {
    var show = result[index].split(':');
    finishArray.push(show[1]);
}
document.write("按出現次數排序,刪除重複元素:" + finishArray + "<br>");

輸出結果:

原始陣列:1,2,4,5,2,4,2,3
按出現次數排序,不刪除重複元素:2,2,2,4,4,5,3,1
按出現次數排序,刪除重複元素:2,4,5,3,1

You may also like...

1,527,754 Responses

  1. MichaelGeony表示:

    online pharmacy non prescription drugs https://familypharmacy.company/# Online pharmacy USA

  2. MarkWat表示:

    Привет. Подскажите, где найтиполезные статьи о кредитах? Пока нашел – https://perspectiva-leasing.ru

  3. Champion Slots Казино — это пространство, где азарт становится реальностью. Мы предлагаем игрокам самые увлекательные слоты и настольные игры, которые обеспечивают невероятные выигрыши и эмоции. Каждая игра — это не просто времяпрепровождение.

    Почему нас выбирают игроки? Наши акции и турниры обеспечивают постоянную вовлеченность и шанс на успех. Мы предлагаем широкий выбор для игроков любого уровня. Неважно, новичок вы или профессионал, каждый может стать победителем.

    Когда начать играть в Champion Slots? Сейчас самое подходящее время! Не упустите шанс испытать удачу.

    Перед игрой ознакомьтесь с правилами, чтобы наслаждаться каждой минутой игры.
    Для преданных игроков, мы предлагаем VIP-условия, которые откроют новые возможности для успеха.
    Для новичков и тех, кто не играл некоторое время, мы рекомендуем попробовать демо-версии, чтобы быстро войти в курс игры.

  4. What’s The Job Market For Rear Facing Infant Car Seat Professionals?
    Rear Facing Infant Car Seat

  5. 15 Presents For The Pallet For Sale Lover In Your Life New Wood Pallet For Sale

  6. Davidnof表示:

    dark internet https://github.com/darkwebwebsites/darkwebwebsites – darknet marketplace dark market 2025

  7. MichaelGeony表示:

    online pharmacy prescription https://megaindiapharm.com/# Mega India Pharm

  8. Davidnof表示:

    dark web websites https://github.com/darkwebwebsites/darkwebwebsites – dark web search engine deep web drug links

  9. MichaelIncap表示:

    dark web market https://github.com/darknetmarketslinks/darknetmarketlinks – darkmarket url tor marketplace

  10. Drugs prescribing information. Generic Name.
    order fosamax pills
    Actual trends of medicament. Get information here.

  11. mostbet_hipa表示:

    скачат мостбет https://gtrtt.com.kg .

  12. Williamkem表示:

    1xBet – одна из ведущих компаний в сфере ставок, которая предлагает игрокам широкий выбор видов спорта и разнообразные ставки. Одним из преимуществ игры в 1xBet являются бонусные предложения, которые помогут вам увеличить свои шансы на успех и получить дополнительные выгоды http://gunsmil.com/design/pgs/1xbet_promokod_na_segodnya_besplatno.html

  13. MarkWat表示:

    Всем привет! Может кто знает, где найтиразные статьи о займах? Пока нашел – sport-pay.ru

  14. MichaelIncap表示:

    darknet sites https://github.com/darknetmarketslinks/darknetmarketlinks – darknet drug store the dark internet

  15. Hey there would you mind stating which blog platform you’re
    working with? I’m going to start my own blog in the near future but I’m having
    a tough time selecting between BlogEngine/Wordpress/B2evolution and Drupal.
    The reason I ask is because your design and style seems different then most blogs and I’m
    looking for something completely unique. P.S My apologies for being off-topic but I had to ask!

  16. mostbet_ptpa表示:

    мостбет скачать на компьютер gtrtt.com.kg .

  17. Davidmoits表示:

    Mega India Pharm: Mega India Pharm – Mega India Pharm

  18. I all the time emailed this blog post page to all my friends,
    since if like to read it then my links will too.

    My blog :: online casino 300 bonus

  19. Achat de cialis pas cher, prescription du tadalafil, Aiasc Drugstore. Vente de cialis, cialis en ligne Canada, Ecole-stcharles Pharmacie. Exemplaire de viagra, viagra en vente, Petwalk Pharmacie. Vente Vardenafil, Pharmacie en ligne en France, Belgique.Probleme erection. Les prix de viagra, viagra pharmacie suisse, Petrochemistry. Vente de viagra, viagra pharmacie sans ordonnance, Iab-romania. Acheter viagra en ligne, viagra ordonnance en ligne, piramida Sunca. LInde achetez le levitra viagra en ligne pharmacie acheter en pharmacie prix. Le prix de viagra, le meilleur viagra, Twis Pharmacie en ligne, Les. https://eurogeneriqueetfrance.com/ketorolac/ Generique Ketorolac Pharmacie

  20. Charleskepsy表示:

    no prescription pharmacy paypal https://discountdrugmart.pro/# drug mart

  21. MichaelGeony表示:

    online pharmacy no prescription needed http://megaindiapharm.com/# MegaIndiaPharm

  22. Dollyfut表示:

    dark web drug marketplace https://github.com/tormarkets2025ukaz1/tormarkets2025 – dark web market

  23. MichaelGeony表示:

    no prescription pharmacy paypal http://xxlmexicanpharm.com/# reputable mexican pharmacies online

  24. See What Gas Engineers Near Me Tricks The Celebs Are Utilizing Gas engineers near me (images.google.co.za)

  25. Michaelkig表示:

    darknet websites https://github.com/darknetmarkets2025/darknetmarketlinks – darkweb marketplace deep dark web

  26. mostbet_gypa表示:

    mostbet ставки скачать http://gtrtt.com.kg/ .

發佈留言

發佈留言必須填寫的電子郵件地址不會公開。