mod io { #[macro_export] macro_rules! parse { ($b:expr, [u8]) => ($b); ($b:expr, String) => ($b.into_iter().map(|b| b as char).collect::()); ($b:expr, $t:ty) => (parse!($b, String).parse::<$t>().unwrap()); } #[macro_export] macro_rules! scan { ($r:expr, [$t:tt; $n:expr]) => ((0..$n).map(|_| scan!($r, $t)).collect::>()); ($r:expr, ($($t:tt),*)) => (($(scan!($r, $t)),*)); ($r:expr, $t:tt) => (parse!(io::scan($r), $t)); } use std::io::{BufRead, ErrorKind}; pub fn scan(r: &mut R) -> Vec { let mut buf = Vec::new(); loop { let (done, used) = { let available = match r.fill_buf() { Ok(n) => n, Err(ref e) if e.kind() == ErrorKind::Interrupted => continue, Err(e) => panic!(e), }; match available.iter().position(u8::is_ascii_whitespace) { Some(i) => { buf.extend_from_slice(&available[..i]); (buf.len() > 0, i + 1) } None => { buf.extend_from_slice(available); (false, available.len()) } } }; r.consume(used); if done || used == 0 { return buf; } } } } use std::io::{BufRead, Write}; fn run(reader: &mut R, writer: &mut W) { let (n, k) = scan!(reader, (usize, usize)); let p = scan!(reader, [usize; n]); let mut map = std::collections::BTreeMap::new(); for p in p { *map.entry(p).or_insert(0) += 1; } let mut ans = 0; for value in map.values().rev() { if ans + value > k { break; } ans += value; } writeln!(writer, "{}", ans).ok(); } fn main() { let (stdin, stdout) = (std::io::stdin(), std::io::stdout()); let mut reader = std::io::BufReader::new(stdin.lock()); let mut writer = std::io::BufWriter::new(stdout.lock()); run(&mut reader, &mut writer); }