Математика
Деякі терміни, які зазвичай фігурують в абревіатурах.
terms = {"Abbreviated", "Accounting", "Acquisition", "Act", "Action", "Actions", "Activities", "Administrative", "Advisory", "Afloat", "Agency", "Agreement", "Air", "Aircraft", "Aligned", "Alternatives", "Analysis", "Anti-Surveillance", "Appropriation", "Approval", "Architecture", "Assessment", "Assistance", "Assistant", "Assurance", "Atlantic", "Authority", "Aviation", "Base", "Based", "Battlespace", "Board", "Breakdown", "Budget", "Budgeting", "Business", "Capabilities", "Capability", "Capital", "Capstone", "Category", "Center", "Centric", "Chairman", "Change", "Changes", "Chief", "Chief,", "Chiefs", "Closure", "College", "Combat", "Command", "Commandant", "Commander","Commander,", "Commanders", "Commerce", "Common", "Communications", "Communities", "Competency", "Competition", "Component", "Comptroller", "Computer", "Computers,", "Concept", "Conference", "Configuration", "Consolidated", "Consulting", "Contract", "Contracting", "Contracts", "Contractual", "Control", "Cooperative", "Corps", "Cost", "Council", "Counterintelligence", "Course", "Daily", "Data", "Date", "Decision", "Defense", "Deficiency", "Demonstration", "Department", "Depleting", "Deployment", "Depot", "Deputy", "Description", "Deskbook", "Determination", "Development", "Direct", "Directed", "Directive", "Directives", "Director", "Distributed", "Document", "Earned", "Electromagnetic", "Element", "Engagement", "Engineer", "Engineering", "Enterprise", "Environment", "Environmental", "Equipment", "Estimate", "Evaluation", "Evaluation)", "Exchange", "Execution", "Executive", "Expense", "Expert", "Exploration", "Externally", "Federal", "Final", "Financial", "Findings", "Fixed","Fleet", "Fleet;", "Flight", "Flying", "Followup", "Force", "Forces,", "Foreign", "Form", "Framework", "Full", "Function", "Functionality", "Fund", "Funding", "Furnished", "Future", "Government", "Ground", "Group", "Guidance", "Guide", "Handbook", "Handling,", "Hazardous", "Headquarters", "Health", "Human", "Identification", "Improvement", "Incentive", "Incentives", "Independent", "Individual", "Industrial", "Information", "Initial", "Initiation", "Initiative", "Institute", "Instruction", "Integrated", "Integration", "Intelligence", "Intensive", "Interdepartmental", "Interface", "Interference", "Internet", "Interoperability", "Interservice", "Inventory", "Investment", "Joint", "Justification", "Key", "Knowledge", "Lead", "Leader", "Leadership", "Line", "List", "Logistics", "Maintainability", "Maintenance", "Management", "Manager", "Manual", "Manufacturing", "Marine", "Master", "Material", "Materials", "Maturity", "Measurement", "Meeting", "Memorandum", "Milestone", "Milestones", "Military", "Minor", "Mission", "Model", "Modeling", "Modernization", "National", "Naval", "Navy", "Needs", "Network", "Networks", "Number", "Objectives", "Obligation", "Observation", "Occupational", "Offer", "Office", "Officer", "Operating", "Operational", "Operations", "Order", "Ordering", "Organization", "Oversight", "Ozone", "Pacific", "Package", "Packaging,", "Parameters", "Participating", "Parts", "Performance", "Personal", "Personnel", "Planning", "Planning,", "Plans", "Plant", "Point", "Policy", "Pollution", "Practice", "Preferred", "Prevention", "Price", "Primary", "Procedure", "Procedures", "Process", "Procurement", "Product", "Production", "Professional", "Program", "Programmatic", "Programming", "Project", "Proposal", "Protection", "Protocol", "Purchase", "Quadrennial", "Qualified", "Quality", "Rapid", "Rate", "Readiness", "Reconnaissance", "Regulation", "Regulations", "Reliability", "Relocation", "Repair", "Repairables", "Report", "Reporting", "Representative", "Request", "Requirement", "Requirements", "Requiring", "Requisition", "Requisitioning", "Research", "Research,", "Reserve", "Resources", "Responsibility", "Review", "Reviews", "Safety", "Sales", "Scale", "Secretary", "Secure", "Security", "Selection", "Senior", "Service", "Services", "Sharing", "Simulation", "Single", "Small", "Software", "Source", "Staff", "Standard", "Standardization", "Statement", "Status", "Storage,", "Strategy", "Streamlining", "Structure", "Submission", "Substance", "Summary", "Supplement", "Support", "Supportability", "Surveillance", "Survey", "System", "Systems", "Subsystem", "Tactical", "Target", "Targets", "Team", "Teams", "Technical", "Technology", "Test", "Tool", "Total", "Training", "Transportation", "Trouble", "Type", "Union", "Value", "Variable", "Warfare", "Weapon", "Work", "Working", "X-Ray", "Xenon", "Year", "Yesterday", "Zenith", "Zoology"};
Код
f[c_]:=RandomChoice[Select[terms,(StringTake[#,1]==c)&]]
g[acronym_]:=Map[f,Characters@acronym]
Приклади
Десять випадково сформованих кандидатів на абревіатуру ABC .
Table[Row[g["ABC"], " "], {10}] // TableForm
Корпус розбиття дій
Бухгалтерський облік Бюджет Комерція
Повітряне бюджетування Контроль
закупівлі Комп'ютер
Дія бюджету Витрати
Вирівнювання Розбиття Загальний
узгоджений курс
бюджету Консультативне бюджетування Здатність
Вирівняний Бойовий простір Загальний
контролер бойового простору
FMP
Table[Row[g["FMP"], " "], {10}] // TableForm
Протокол менеджера констатацій
Підсумковий посібник Покупки
літаючих вимірювальних кадрів
Повні виробничі плани
Форма вимірювання Програмування
Фінансова модель Програмна
перспектива Модернізація Пропозиція щодо подальшої модернізації
Форма
пакету фінансових вимірювань
, Планування технічного обслуговування
Повне моделювання Програмна програма
STM
Table[Row[g["STM"], " "], {10}] // TableForm
Стандартизація Повна
послуга з модернізації Тактична віха
Нагляд за управлінням транспорту
Підсистема
Структура
проблемних матеріалів Тест Військова
шкала Тестові матеріали
Стратегія Інструмент Модернізація
Малі технології Незначна
підтримка Транспорт Виробництво Статус Інструмент Управління
CRPB
Table[Row[g["CRPB"], " "], {10}] // TableForm
Захист регулювання кооперативів Бізнес-
командир Запит на політику Заміна
змін в програмі ремонту,
Відкриття бізнесу Огляд бюджету Проект
Правила торгівлі Параметри Базові
контракти Швидка база цін
Коледж Переїзд Практика Бюджет
Курс Звітування персоналу Бойовий простір
Курс Требовання Процедури Бюджет
САД
Table[Row[g["SARDE"], " "], {10}] // TableForm
Доповнення Дія , що вимагають директиви Естімейт
Масштаб вирівнювання Вимоги Щодня Розрахунковий
секретар Atlantic Вилучення директор Витрати
Огляд програмного забезпечення Action Direct Exploration
Support Act Readiness Defense Електромагнітного
Software Скороченого Вимога Рішення Обмін
Подання оцінка реквізиція Опис Executive
Впорядкування Accounting Rate Depot Оцінка
Surveillance Assistant Вилучення Depot Engagement
Survey Допомога Ресурси дефіцит Expense