Mathematica
Beberapa istilah yang biasa muncul dalam akronim.
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"};
Kode
f[c_]:=RandomChoice[Select[terms,(StringTake[#,1]==c)&]]
g[acronym_]:=Map[f,Characters@acronym]
Contohnya
Sepuluh kandidat yang dihasilkan secara acak untuk akronim ABC .
Table[Row[g["ABC"], " "], {10}] // TableForm
Aksi Breakdown Korps
Akuntansi Anggaran Commerce
Air Penganggaran Kontrol
Akuisisi Breakdown Komputer
tindakan Anggaran Biaya
Blok Breakdown umum
Blok Penganggaran Course
Penasehat Penganggaran Kemampuan
Blok Battlespace umum
Anti-Surveillance Battlespace Comptroller
FMP
Table[Row[g["FMP"], " "], {10}] // TableForm
Temuan-temuan Manajer Protokol
Manual Akhir Pembelian
Personel Pengukuran Terbang Personil
Bidang Pabrikan Penuh
Formulir Pengukuran Pemrograman
Model Keuangan Programmatic
Masa Depan Modernisasi Proposal
Formulir
Paket Pengukuran Keuangan
, Perencanaan Pemeliharaan
Pemodelan Lengkap Programmatic
STM
Table[Row[g["STM"], " "], {10}] // TableForm
Standardisasi Total
Layanan Modernisasi Milestone Taktis
Pengawasan Manajemen Transportasi
Subsistem Masalah Bahan
Uji Struktur
Skala Militer Bahan Uji
Strategi Alat Modernisasi
Teknologi Kecil
Dukungan Kecil Transportasi Status Manufaktur Manajemen Alat
CRPB
Table[Row[g["CRPB"], " "], {10}] // TableForm
Perlindungan Peraturan Kerjasama
Komandan Bisnis Permintaan Kebijakan
Perubahan Pangkalan Perbaikan Pemrograman,
Tinjauan Penutupan Bisnis Anggaran Proyek
Peraturan Perdagangan Parameter Dasar
Kontrak Cepat Harga Dasar
Perguruan Tinggi Praktek Penganggaran
Kursus Pelaporan Personil Battlespace
Course Persyaratan Prosedur Prosedur Anggaran
SARDE
Table[Row[g["SARDE"], " "], {10}] // TableForm
Tindakan Tambahan yang Memerlukan Arahan
Skala Perkiraan Persyaratan yang
Diperlukan Sekretaris Perkiraan Harian Direktur Perolehan Atlantik Pengeluaran
Perangkat Lunak Tinjauan Tindakan
Dukungan Langsung Kesiapan Pertahanan
Perangkat Lunak Elektromagnetik Disingkat Persyaratan Pengambilan Keputusan Pertukaran
Pengajuan Penilaian Permintaan Deskripsi Eksekutif
Perampingan Akuntansi Tingkat Akuntansi Depot Evaluasi
Surveillance Assistant Asisten Penempatan Depot Keterlibatan
Survei Survei Sumber Daya Bantuan Defisiensi Biaya Sumber Daya